File: delay.c

package info (click to toggle)
clisp 1997-12-06-1
  • links: PTS
  • area: main
  • in suites: hamm, slink
  • size: 20,744 kB
  • ctags: 8,390
  • sloc: ansic: 37,808; lisp: 37,255; asm: 6,393; sh: 3,077; objc: 2,481; makefile: 1,174; sed: 96; perl: 14
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);
}