X-Git-Url: http://git.hungrycats.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=utils%2Fusleep.c;h=2de351eb3cde326c43f940d86a2c283c2956406d;hb=6edc84f12f15860a71430c45e8392a5e4ef8203c;hp=ad0f4b6ba983e9722fb23f7295270d949c3aee0f;hpb=65740e2a8dea3d6309ae6e8914a0fb79e993ada8;p=xscreensaver

diff --git a/utils/usleep.c b/utils/usleep.c
old mode 100755
new mode 100644
index ad0f4b6b..2de351eb
--- a/utils/usleep.c
+++ b/utils/usleep.c
@@ -16,15 +16,6 @@
 #include <X11/Xlib.h>
 #include <X11/Xos.h>	/* lazy way out */
 
-#ifdef VMS
-#include <descrip.h>
-#include <stdio.h>
-extern char *progname;
-#include <lib$routines.h>
-unsigned long int statvms;
-float seconds;
-#endif
-
 /* usleep() doesn't exist everywhere, and select() is faster anyway.
  */
 
@@ -95,17 +86,12 @@ screenhack_usleep (usecs)
      unsigned long usecs;
 {
   int status, *bin_delta;
-
-/*  extern int SYS$SCHWDK (), SYS$HIBER ();                               */
-/*#define TICK_INTERVAL 1000                                              */
-/*                                                                        */
-/*  if (!deltas_set) set_deltas ();                                       */
-/*  bin_delta = (usecs == TICK_INTERVAL) ? &bin_tick_delta : &bin_sec_delta; */
-/*  status = SYS$SCHDWK (0, 0, bin_delta, 0);                             */
-/*  if ((status & 1)) (void) SYS$HIBER ();                                */
-
-      seconds = ((float) usecs)/1000000.0;
-      statvms = lib$wait(&seconds);
+  extern int SYS$SCHWDK (), SYS$HIBER (); 
+  
+  if (!deltas_set) set_deltas ();
+  bin_delta = (usecs == TICK_INTERVAL) ? &bin_tick_delta : &bin_sec_delta;
+  status = SYS$SCHDWK (0, 0, bin_delta, 0);
+  if ((status & 1)) (void) SYS$HIBER ();
 }
 
 #endif /*VMS */