Index: runtime/mercury_thread.c

===================================================================
RCS file: /home/mercury1/repository/mercury/runtime/mercury_thread.c,v
retrieving revision 1.29
diff -u -r1.29 mercury_thread.c
--- runtime/mercury_thread.c	12 Jan 2007 05:00:31 -0000	1.29
+++ runtime/mercury_thread.c	16 Jan 2007 23:42:33 -0000
@@ -234,7 +234,7 @@
 #ifdef MR_THREAD_SAFE
     pthread_mutex_init(&muts->MR_tlm_lock, MR_MUTEX_ATTR);
 #endif
-    muts->MR_tlm_values = MR_NEW_ARRAY(MR_Word, numslots);
+    muts->MR_tlm_values = MR_GC_NEW_ARRAY(MR_Word, numslots);

     return muts;
 }
This commit is contained in:
Peter Wang
2007-01-16 23:45:05 +00:00
parent cd488ea5e6
commit d0f1ea2529

View File

@@ -234,7 +234,7 @@ MR_create_thread_local_mutables(MR_Unsigned numslots)
#ifdef MR_THREAD_SAFE
pthread_mutex_init(&muts->MR_tlm_lock, MR_MUTEX_ATTR);
#endif
muts->MR_tlm_values = MR_NEW_ARRAY(MR_Word, numslots);
muts->MR_tlm_values = MR_GC_NEW_ARRAY(MR_Word, numslots);
return muts;
}