Added some unix signal handling

1988-04-29 14:38:36 +00:00
parent f7efb51155
commit 4d528bbc24
9 changed files with 140 additions and 9 deletions
--- a/lang/m2/libm2/Unix.def
+++ b/lang/m2/libm2/Unix.def
@@ -99,6 +99,8 @@ DEFINITION MODULE Unix;
  PROCEDURE signal(sig: INTEGER;
 		   func: SignalPrc;
 		   VAR oldfunc: SignalPrc) : INTEGER;
+  PROCEDURE sigtrp(trapno, signo: INTEGER) : INTEGER;
+  (* Let Unix signal signo cause EM trap trapno to occur *)
  PROCEDURE stat(path: ADDRESS; statbuf: ADDRESS) : INTEGER;
  PROCEDURE fstat(fildes: INTEGER; statbuf: ADDRESS) : INTEGER;
  PROCEDURE stime(t: LONGINT) : INTEGER;