Merge pull request #1786 from Kelimion/thread_fix

Fix thread pool join.

core/thread/thread_pool.odin

@@ -39,6 +39,7 @@ Pool :: struct {
 
 	threads: []^Thread,
 
+
 	tasks:      [dynamic]Task,
 	tasks_done: [dynamic]Task,
 }
@@ -102,9 +103,20 @@ pool_join :: proc(pool: ^Pool) {
 
 	yield()
 
+	// Because we already stopped the pool, there's no need to take a lock here.
+
+	started_count: int
+	for started_count < len(pool.threads) {
+		started_count = 0
 		for t in pool.threads {
+			if .Started in t.flags {
+				started_count += 1
+			}
+			if .Joined not_in t.flags {
 				join(t)
 			}
+		}
+	}
 }
 
 // Add a task to the thread pool.