File: delay.c

package info (click to toggle)
clisp 1999-07-22-5
  • links: PTS
  • area: main
  • in suites: potato
  • size: 36,876 kB
  • ctags: 19,900
  • sloc: ansic: 76,750; lisp: 65,522; asm: 16,504; sh: 8,971; fortran: 8,277; makefile: 3,251; objc: 2,481; perl: 1,744; java: 553; sed: 96
file content (16 lines) | stat: -rw-r--r-- 347 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
/* Tiny DELAY utility. */
/* "DELAY.EXE n" delays for n seconds, n a small positive decimal integer. */
/* Can be compiled with Turbo C 2.0. */
/* Copyright (C) Bruno Haible 31.7.1993 */

#include <dos.h>

main (int argc, char** argv)
{ if (argc > 1)
    { int amount = atoi(argv[1]);
      if (amount > 0)
	{ sleep(amount); }
    }
  exit(0);
}