help-smalltalk
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Help-smalltalk] Bug when nanosleep() is present


From: Samuel Tardieu
Subject: [Help-smalltalk] Bug when nanosleep() is present
Date: Mon, 22 Mar 2004 19:12:40 +0100
User-agent: Mutt/1.5.6i

If nanosleep() exists, the declaration of ts will come after the
_gst_primitives_executed++ statement, which is illegal.

  Sam

--- orig/libgst/prims.def
+++ mod/libgst/prims.def
@@ -2733,7 +2733,6 @@
 primitive VMpr_Process_yield [succeed,check_interrupt]
 {
   OOP oop1;
-  _gst_primitives_executed++;
 
 #if defined HAVE_NANOSLEEP
   struct timespec ts = { 0, 1000000 };
@@ -2742,6 +2741,7 @@
   usleep (1000);               /* exhibit good behavior */
 #endif
 
+  _gst_primitives_executed++;
   oop1 = STACKTOP ();
   if (oop1 == get_active_process ())
     {







reply via email to

[Prev in Thread] Current Thread [Next in Thread]