-#define SEC_DELTA "0000 00:00:01.00"
-#define TICK_DELTA "0000 00:00:00.08"
-static int bin_sec_delta[2], bin_tick_delta[2], deltas_set = 0;
-
-static void
-set_deltas ()
-{
- int status;
- extern int SYS$BINTIM ();
- $DESCRIPTOR (str_sec_delta, SEC_DELTA);
- $DESCRIPTOR (str_tick_delta, TICK_DELTA);
- if (!deltas_set)
- {
- status = SYS$BINTIM (&str_sec_delta, &bin_sec_delta);
- if (!(status & 1))
- {
- fprintf (stderr, "%s: cannot convert delta time ", progname);
- fprintf (stderr, SEC_DELTA);
- fprintf (stderr, "; status code = %d\n", status);
- exit (status);
- }
- status = SYS$BINTIM (&str_tick_delta, &bin_tick_delta);
- if (!(status & 1))
- {
- fprintf (stderr, "%s: cannot convert delta time ", progname);
- fprintf (stderr, TICK_DELTA);
- fprintf (stderr, "; status code = %d\n", status);
- exit (status);
- }
- deltas_set = 1;
- }
-}
+#else /* !VMS && !HAVE_SELECT */
+ /* If you don't have select() or usleep(), I guess you lose...
+ Maybe you have napms() instead? Let me know. */
+ usleep (usecs);