home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
rtsi.com
/
2014.01.www.rtsi.com.tar
/
www.rtsi.com
/
OS9
/
OSK
/
EFFO
/
forum4.lzh
/
SPRACHEN
/
C
/
EVENTS
/
eset.c
< prev
next >
Wrap
Text File
|
1988-02-14
|
625b
|
33 lines
/* eset setzt event auf neuen Wert */
/* Stand: 14.2.88 Autor: Uwe Simon */
#include <events.h>
#include <stdio.h>
usage()
{
fprintf(stderr,"Syntax: edir <event> <num> [<opts>]\n");
fprintf(stderr,"Function: set event to a new value\n");
fprintf(stderr,"Options:\n");
fprintf(stderr,"\t-a\tstart all waiting processes\n");
exit(1);
}
main(argc,argv)
int argc;
char *argv[];
{
int ev,val,fl;
if(argc!=3) usage();
if((ev=_ev_link(argv[1]))==-1) exit(_errmsg(1,"can't link to %s\n",argv[1]));
val=atoi(argv[2]);
if(strcmp(argv[3],"-a")==0) fl=EV_ALLPROCS;
else fl=0;
_ev_set(ev,val,fl);
_ev_unlink(ev);
}