~ chicken-core (chicken-5) b05638576bce31fbea8b5ad327e3a403f4c047ea


commit b05638576bce31fbea8b5ad327e3a403f4c047ea
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Nov 8 20:34:23 2010 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Mon Nov 8 20:34:23 2010 +0100

    added comment in copy_closure_2

diff --git a/runtime.c b/runtime.c
index bea726bf..13df40bb 100644
--- a/runtime.c
+++ b/runtime.c
@@ -8583,6 +8583,7 @@ static void copy_closure_2(void *dummy)
     *p = ptr;
 
   *(p++) = C_CLOSURE_TYPE | cells;
+  /* this is only allowed because the storage is freshly allocated: */
   C_memcpy_slots(p, C_data_pointer(proc), cells);
   C_kontinue(k, (C_word)ptr);
 }
Trap