godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

many minor mods: name changes

Browse Source
This commit is contained in:
ceriel
1988-03-23 17:55:57 +00:00
parent e511419efc
commit 5a047b837b
17 changed files with 111 additions and 101 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lang/m2/libm2/catch.c
View File

@@ -52,7 +52,7 @@ static struct errm {
extern exit();
_catch(trapno)
catch(trapno)
int trapno;
{
register struct errm *ep = &errors[0];
@@ -64,7 +64,7 @@ _catch(trapno)
while (ep->errno != trapno && ep->errmes != 0) ep++;
if (p = ep->errmes) {
while (*p) p++;
_Traps_Message(ep->errmes, 0, (int) (p - ep->errmes), 1);
_Traps__Message(ep->errmes, 0, (int) (p - ep->errmes), 1);
}
else {
int i = trapno;
@@ -81,8 +81,8 @@ _catch(trapno)
while (i /= 10);
while (s > buf) *p++ = *--s;
*p = 0;
_Traps_Message(q, 0, (int) (p - q), 1);
_Traps__Message(q, 0, (int) (p - q), 1);
}
if (trapno != M2_FORCH) exit(trapno);
SIG(_catch);
SIG(catch);
}