Unix.st
changeset 348 5ac1b6b43600
parent 345 cf2301210c47
child 354 f8cdd814a21c
--- a/Unix.st	Wed May 17 14:17:43 1995 +0200
+++ b/Unix.st	Thu May 18 17:10:35 1995 +0200
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1988 by Claus Gittinger
 	     All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.34 1995-05-16 17:09:31 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.35 1995-05-18 15:10:35 claus Exp $
 '!
 
 !OperatingSystem primitiveDefinitions!
@@ -156,7 +156,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.34 1995-05-16 17:09:31 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.35 1995-05-18 15:10:35 claus Exp $
 "
 !
 
@@ -2001,11 +2001,6 @@
 #if defined(ITIMER_VIRTUAL)
     struct itimerval dt;
 
-    dt.it_interval.tv_sec = 0;
-    dt.it_interval.tv_usec = 0;
-    dt.it_value.tv_sec = 0;
-    dt.it_value.tv_usec = 1000;   /* 1000 Hz */
-    setitimer(ITIMER_VIRTUAL, &dt, 0);
 # ifndef xxxSYSV4
 #  if defined(BSD) || defined(HAS_SIGSETMASK)
     sigsetmask(0);
@@ -2018,6 +2013,12 @@
     signal(SIGALRM, __spyInterrupt);
 # endif
 
+    dt.it_interval.tv_sec = 0;
+    dt.it_interval.tv_usec = 0;
+    dt.it_value.tv_sec = 0;
+    dt.it_value.tv_usec = 1000;   /* 1000 Hz */
+    setitimer(ITIMER_VIRTUAL, &dt, 0);
+
     RETURN (true);
 #endif
 %}
@@ -2055,17 +2056,18 @@
 #if defined(ITIMER_REAL)
     struct itimerval dt;
 
-    dt.it_interval.tv_sec = 0;
-    dt.it_interval.tv_usec = 0;
-    dt.it_value.tv_sec = _intVal(millis) / 1000;
-    dt.it_value.tv_usec = (_intVal(millis) % 1000) * 1000;  
-    setitimer(ITIMER_REAL, &dt, 0);
 # ifndef xxxSYSV4
 #  if defined(BSD) || defined(HAS_SIGSETMASK)
     sigsetmask(0);
 #  endif
 # endif
     signal(SIGALRM, __signalTimerInterrupt);
+
+    dt.it_interval.tv_sec = 0;
+    dt.it_interval.tv_usec = 0;
+    dt.it_value.tv_sec = _intVal(millis) / 1000;
+    dt.it_value.tv_usec = (_intVal(millis) % 1000) * 1000;  
+    setitimer(ITIMER_REAL, &dt, 0);
     RETURN (true);
 #endif
 %}