mirror of
https://github.com/PDP-10/its.git
synced 2026-01-13 15:27:28 +00:00
Revert change to CC for LP phase.
Because the new CC now passes the wrong number of arguments to _LP BIN, we keep the old around as OCC and use it until the new _LP BIN is built.
This commit is contained in:
parent
283a604bed
commit
120ae989fa
@ -1142,6 +1142,7 @@ respond "*" ":delete c; \[crel\] 16\r"
|
||||
|
||||
# CC
|
||||
respond "*" ":cwd c\r"
|
||||
respond "*" ":copy ts cc, ts occ\r"
|
||||
respond "*" ":cc cc.>\r"
|
||||
expect ":KILL"
|
||||
respond "*" ":cc c5.c\r"
|
||||
@ -1154,7 +1155,7 @@ respond "*" ":stinkr cc\r"
|
||||
expect ":KILL"
|
||||
|
||||
# GT
|
||||
respond "*" ":cc g0.c g1.c g2.c g3.c g4.c g5.c c25.c\r"
|
||||
respond "*" ":c;occ g0.c g1.c g2.c g3.c g4.c g5.c c25.c\r"
|
||||
expect ":KILL"
|
||||
respond "*" ":stinkr gt\r"
|
||||
|
||||
@ -1170,7 +1171,7 @@ respond "*" ":link sys; ts tj6, sys; ts ntj6\r"
|
||||
|
||||
# OINIT
|
||||
respond "*" ":cwd c\r"
|
||||
respond "*" ":cc sysen2/oinit\r"
|
||||
respond "*" ":c;occ sysen2/oinit\r"
|
||||
expect ":KILL"
|
||||
respond "*" ":stinkr\r"
|
||||
respond "=" "x c/clib\r"
|
||||
|
||||
@ -119,12 +119,12 @@ int kflag, cflag, gflag, xflag, bflag, sflag;
|
||||
# define phase_E 5
|
||||
# define phase_S 6
|
||||
|
||||
# define ARGC_LP 11 /* arg counts without optional args */
|
||||
# define ARGC_LP 10 /* arg counts without optional args */
|
||||
# define ARGC_P 8
|
||||
# define ARGC_C 6
|
||||
|
||||
char *argv_L[] {debug, 0, fnto, fncs, fner, fnst};
|
||||
char *argv_LP[] {debug, 0, "ITS", fnno, fnty, fner, fnma, fncs, fnst, fnhm, fnsy, 0};
|
||||
char *argv_LP[] {debug, 0, fnno, fnty, fner, fnma, fncs, fnst, fnhm, fnsy, 0};
|
||||
char *argv_P[] {debug, fnto, fnno, fnty, fner, fnma, fnhm, fnsy, 0};
|
||||
char *argv_C[] {debug, fner, fnno, fnty, fnma, "3000"};
|
||||
char *argv_M[] {debug, 0, fncs, fner, fnma, fnst, fnhm};
|
||||
Loading…
x
Reference in New Issue
Block a user