From 809da313c832e34755d3972421d6b3be23270990 Mon Sep 17 00:00:00 2001 From: Adam Sampson Date: Fri, 20 Apr 2018 16:46:22 +0100 Subject: [PATCH] NTTYP/CLRSTR are Tenex-only. This code is adding them to a list of symbols visible to the compiler. --- /initm.373 | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a//initm.373 b//initm.373 index a58362a..9c6d748 100644 --- a//initm.373 +++ b//initm.373 @@ -883,10 +883,16 @@ CGBOUN,IIGLOC,MAKTU2,CIFLTZ,CIUPRS,SAT,TFA,WTYP,NAPT,PTYPE,APLQ,PURBOT,GCSBOT GLOTOP,TYPVEC,1STEPR,LSTRES,NODES,MAINPR,CVTYPE,CSPNAM,CSBSTR,INTBCK,CICRLF CERR1,CERR2,CERR3,CANDP,CORP,CSQUTA,CIMAGE,ATOSQ,CFILLE,CPRTYC,FMPOPJ TD.PUT,TD.GET,TD.LNT,CBYTES,MARK,MARK2G,TD.AGC,DSTORE,RCLV,NUMSAT,RMCALL,NPRFLG -NSPOPJ,NFPOPJ,PURCLN,FRETOP,PURVEC,SWAPGC,NTTYPE,CLRSTR,VECBOT] +NSPOPJ,NFPOPJ,PURCLN,FRETOP,PURVEC,SWAPGC,VECBOT] .GLOBAL A ADDSQU A TERMIN +IFE ITS,[ +IRP A,,[NTTYPE,CLRSTR] + .GLOBAL A + ADDSQU A +TERMIN +] VECRET -- 2.31.1