mirror of
https://github.com/PDP-10/its.git
synced 2026-01-29 05:11:14 +00:00
Add %XUNA and %XJNA, which MUDITS uses.
This commit is contained in:
committed by
Adam Sampson
parent
5a75505e8b
commit
6b0d849f94
@@ -4,7 +4,7 @@ RELOCA
|
||||
|
||||
MAIN==1
|
||||
.GLOBAL TYPVLC,PBASE,TYPBOT,MAINPR,PTIME,IDPROC,ROOT,TTICHN,TTOCHN,TYPVEC
|
||||
.GLOBAL %UNAM,%JNAM,NOTTY,GCHAPN,INTHLD,PURBOT,PURTOP,N.CHNS,SPCCHK,CURFCN
|
||||
.GLOBAL %UNAM,%JNAM,%XUNA,%XJNA,NOTTY,GCHAPN,INTHLD,PURBOT,PURTOP,N.CHNS,SPCCHK,CURFCN
|
||||
.GLOBAL TD.GET,TD.PUT,TD.LNT,NOSHUF,GLOTOP,RSTACK,RCYCHN,START,TVSTRT,REALTV
|
||||
.GLOBAL IJFNS,IJFNS1,SJFNS,OPSYS,HASHTB,MULTSG,PURBTB,NSEGS,NOATMS,NOSETG,NOSET
|
||||
|
||||
@@ -27,7 +27,9 @@ IMPURE
|
||||
LOC100: JRST START
|
||||
IFN ITS,[
|
||||
%UNAM: 0 ; HOLDS UNAME
|
||||
%XUNA: 0 ; HOLDS XUNAME
|
||||
%JNAM: 0 ; HOLDS JNAME
|
||||
%XJNA: 0 ; HOLDS XJNAME
|
||||
OPSYS: -1 ; MINUS ONE (-1) IF ITS
|
||||
RLTSAV: -1 ; SAVED ARG TO REALTIMER
|
||||
]
|
||||
Reference in New Issue
Block a user