[m-dev.] trivial diff: fix typo bug in extras/concurrency/semaphore.m

Robert Jeschofnik rejj at students.cs.mu.oz.au
Mon Jul 24 20:07:07 AEST 2000


Fergus did this on my terminal this afternoon..


Estimated hours taken: 0.2

Fix a bug that caused semaphore.m to fail to compile in .par grades

extras/concurrency/semaphore.m:
  Add some #includes for appropriate runtime headers
	Fix a typo - s/MR_Lock/MercuryLock/


Index: semaphore.m
===================================================================
RCS file: /home/mercury1/repository/mercury/extras/concurrency/semaphore.m,v
retrieving revision 1.1
diff -u -r1.1 semaphore.m
--- semaphore.m	2000/02/29 22:37:14	1.1
+++ semaphore.m	2000/07/24 08:01:18
@@ -52,12 +52,14 @@
 
 :- pragma c_header_code("
 	#include <stdio.h>
+	#include ""mercury_context.h""
+	#include ""mercury_thread.h""
 
 	typedef struct ME_SEMAPHORE_STRUCT {
 		int		count;
 		MR_Context	*suspended;
 #ifdef MR_THREAD_SAFE
-		MR_Lock		lock;
+		MercuryLock		lock;
 #endif
 	} ME_Semaphore;
 ").

--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------



More information about the developers mailing list