[m-rev.] diff: msvc fix to thread.m

[Peter Ross]

Hi,


===================================================================


Get the library compiling in the LLDS grades using MSVC.

library/thread.m:
	Don't attempt to take the address of a label if nonlocal gotos
	aren't supported.

Index: library/thread.m
===================================================================
RCS file: /home/mercury1/repository/mercury/library/thread.m,v
retrieving revision 1.13
diff -u -r1.13 thread.m
--- library/thread.m	24 Oct 2007 00:50:00 -0000	1.13
+++ library/thread.m	11 Dec 2007 06:28:43 -0000
@@ -58,7 +58,7 @@
 
 :- pragma foreign_decl("C", "
 #ifndef MR_HIGHLEVEL_CODE
-  #if !defined(MR_EXEC_TRACE) && !defined(MR_DEEP_PROFILING)
+  #if (!defined(MR_EXEC_TRACE) && !defined(MR_DEEP_PROFILING)) || !defined(MR_USE_GCC_NONLOCAL_GOTOS)
     /*
     ** In calling thread.yield, semaphore.wait or semaphore.signal, the
     ** calling context may need to suspend and yield to another context.

--------------------------------------------------------------------------
mercury-reviews mailing list
Post messages to:       mercury-reviews at csse.unimelb.edu.au
Administrative Queries: owner-mercury-reviews at csse.unimelb.edu.au
Subscriptions:          mercury-reviews-request at csse.unimelb.edu.au
--------------------------------------------------------------------------