[MLton-commit] r6011
Matthew Fluet
fluet at mlton.org
Tue Sep 11 17:36:22 PDT 2007
Comment and formatting
----------------------------------------------------------------------
U mlton/trunk/runtime/gc/copy-thread.c
----------------------------------------------------------------------
Modified: mlton/trunk/runtime/gc/copy-thread.c
===================================================================
--- mlton/trunk/runtime/gc/copy-thread.c 2007-09-12 00:08:26 UTC (rev 6010)
+++ mlton/trunk/runtime/gc/copy-thread.c 2007-09-12 00:36:21 UTC (rev 6011)
@@ -12,13 +12,12 @@
if (DEBUG_THREADS)
fprintf (stderr, "copyThread ("FMTPTR")\n", (uintptr_t)from);
/* newThread may do a GC, which invalidates from.
- * Hence we need to stash from where the GC can find it.
+ * Hence we need to stash from someplace that the GC can find it.
*/
assert (s->savedThread == BOGUS_OBJPTR);
s->savedThread = pointerToObjptr((pointer)from - offsetofThread (s), s->heap.start);
to = newThread (s, size);
- from = (GC_thread)(objptrToPointer(s->savedThread, s->heap.start)
- + offsetofThread (s));
+ from = (GC_thread)(objptrToPointer(s->savedThread, s->heap.start) + offsetofThread (s));
s->savedThread = BOGUS_OBJPTR;
if (DEBUG_THREADS) {
fprintf (stderr, FMTPTR" = copyThread ("FMTPTR")\n",
More information about the MLton-commit
mailing list