home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Atari FTP
/
ATARI_FTP_0693.zip
/
ATARI_FTP_0693
/
Mint
/
mntlib25.zoo
/
alarm.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-09-05
|
340b
|
27 lines
/*
* alarm: a public domain alarm for MiNT (by ers)
*/
#include <errno.h>
#include <mintbind.h>
extern int __mint;
unsigned int
alarm(secs)
unsigned secs;
{
long r;
if (__mint == 0)
r = -EINVAL;
else
r = Talarm((long)secs);
if (r < 0) {
errno = - (int)r;
r = -1;
}
return (unsigned int) r;
}