@@ -497,10 +497,10 @@ static void traverseweakvalue (global_State *g, Table *h) {
         hasclears = 1;  /* table will have to be cleared */
     }
   }
-  if (g->gcstate == GCSatomic && hasclears)
-    linkgclist(h, g->weak);  /* has to be cleared later */
-  else
+  if (g->gcstate == GCSpropagate)
     linkgclist(h, g->grayagain);  /* must retraverse it in atomic phase */
+  else if (hasclears)
+      linkgclist(h, g->weak);  /* has to be cleared later */
 }
Original file line number	Diff line number	Diff line change
`@@ -497,10 +497,10 @@ static void traverseweakvalue (global_State g, Table h) {`
`497`	`497`	`hasclears = 1; /* table will have to be cleared */`
`498`	`498`	`}`
`499`	`499`	`}`
`500`		`- if (g->gcstate == GCSatomic && hasclears)`
`501`		`- linkgclist(h, g->weak); /* has to be cleared later */`
`502`		`- else`
	`500`	`+ if (g->gcstate == GCSpropagate)`
`503`	`501`	`linkgclist(h, g->grayagain); /* must retraverse it in atomic phase */`
	`502`	`+ else if (hasclears)`
	`503`	`+ linkgclist(h, g->weak); /* has to be cleared later */`
`504`	`504`	`}`
`505`	`505`
`506`	`506`