/* SCONTROL.C */ /* 7 SEP 84, ES=6.01 */ /* 28 DEC 84, ES=7.00 */ #include #include "system.h" #define PBLK struct _pblock EXTERN LONG __OSIF(); EXTERN VOID zerofil(); PBLK { BYTE pb_mode; BYTE pb_option; WORD pb_flags; LONG pb_swi; LONG pb_id; LONG pb_buffer; LONG pb_bufsiz; LONG pb_p1; LONG pb_p2; LONG pb_p3; }; LONG s_control(option,pid,buffer,bufsiz,target,tpid) UWORD option; LONG pid,buffer,bufsiz,target,tpid; { PBLK p; zerofil(&p,sizeof(PBLK)); p.pb_flags = option; p.pb_id = pid; p.pb_buffer = buffer; p.pb_bufsiz = bufsiz; p.pb_p1 = target; p.pb_p2 = tpid; return(__OSIF(F_CONTROL,&p)); }