%XUNA and %XJNA are used by MUDITS.

[pdp10-muddle.git] / <mdl.int> / specs.111

diff --git a/<mdl.int>/specs.111 b/<mdl.int>/specs.111
index efe5a47f970824aa3c9cb2b092da6d8fe0fa641b..000c161c474f1e8ba2bc6dc4dcd58d774fb4da43 100644 (file)
--- a/<mdl.int>/specs.111
+++ b/<mdl.int>/specs.111
@@ -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
 ]