1
0
mirror of https://github.com/PDP-10/its.git synced 2026-03-27 10:30:50 +00:00

Edit SAIL files to be like the originals from ITS.

Rename according to SAIL file C.LIB[C,SYS].  Fix E stuff and remove
trailing ^C and ^@s.
This commit is contained in:
Lars Brinkhoff
2018-10-26 10:25:14 +02:00
parent d53ad64300
commit aec62f3117
38 changed files with 0 additions and 23 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@@ -94,4 +94,3 @@ the UUO handler, however (in uuoh.midas).
try out the TESTC program. If that works, compile and test the
compiler, itself.
.end_list


View File

@@ -394,4 +394,3 @@ c_term:
| integer
| '(' constant ')' {val=#2;}


Binary file not shown.

View File

@@ -1422,4 +1422,3 @@ wcstore ()
**********************************************************************/
errlex (errno, a1, a2, a3, a4) {error (errno, lexline, a1, a2, a3, a4);}


View File

@@ -46,4 +46,3 @@ extern type TUNDEF;
extern type TPCHAR;
extern type TACHAR;
extern type TFINT;


View File

@@ -329,4 +329,3 @@ stkunf (line) {error (6033, line);}
tkbovf (line) {error (6008, line);}
badtwp (line) {error (6032, line);}
badtok (line, i) {error (6000, line, i);}


View File

@@ -305,4 +305,3 @@ aentry (idn, stmt)
{return (stmt);} /* not implemented */


View File

@@ -1144,4 +1144,3 @@ fixstr (t) type t;
**********************************************************************/
errcidn (errno) {errx (errno, TIDN, cidn);}


View File

@@ -909,4 +909,3 @@ int pa[] {
2429, 2432, 2441, 2442, 2443, 2444, 703, 2447, -1};


View File

@@ -99,4 +99,3 @@ extern type TUNDEF;
extern type TPCHAR;
extern type TACHAR;
extern type TFINT;


View File

@@ -460,4 +460,3 @@ cgswitch (np, lp, l1) int *np, *lp, l1;
expr (ep, xp) enode *ep;
{return (ttexpr (opt (ep), xp));}


View File

@@ -998,4 +998,3 @@ enode *opt (ep) enode *ep;
return (ep);
yes: return (intcon (v));
}


View File

@@ -1332,4 +1332,3 @@ int unmark (ep) enode *ep;
}
return (0);
}


View File

@@ -534,4 +534,3 @@ prelist (np)
}
# endif


Binary file not shown.

View File

@@ -342,4 +342,3 @@ errx (n)
char *fn_error;
int f_error;
cleanup () {cexit (0);}


View File

@@ -475,4 +475,3 @@ pridn (i, f) {;}
# endif


View File

@@ -43,4 +43,3 @@ int atoi (s) char s[];
return (sign*i);
}


View File

@@ -68,4 +68,3 @@ int xopen (file, mode, opt)
return (i);
}


View File

@@ -411,4 +411,3 @@ DEFINE TSWITCH LO,HI,DEFLT ; TABLE SWITCH
DEFINE ETSWIT LO,HI,DEFLT
TERMIN


View File

@@ -8,4 +8,3 @@
1,1,1,1,1,1,1,1,1,1,
5,3,2,3,3,5,4,3,3,6,
3,3,1,1


View File

@@ -15,4 +15,3 @@ e: e '+' e {val = #1 + #3;}
p: '-' p {val = - #2;}
| '(' e ')' {val = #2;}
| int


View File

@@ -50,4 +50,3 @@ ji/*
eipwef c26 c
]6 ]5 ]4 ]3


Binary file not shown.

Binary file not shown.

View File

@@ -340,4 +340,3 @@ char *sconcat (b, n, s1, s2, s3, s4, s5, s6, s7, s8)
return (b);
}


View File

@@ -533,4 +533,3 @@ rtoken(p) token *p;
one may easily substitute other routines for them.
*/