%XUNA and %XJNA are used by MUDITS.
authorAdam Sampson <ats@offog.org>
Fri, 20 Apr 2018 15:48:57 +0000 (16:48 +0100)
committerAdam Sampson <ats@offog.org>
Fri, 20 Apr 2018 15:51:22 +0000 (16:51 +0100)
I'm assuming they would have been defined here along with %UNAM etc.

<mdl.int>/specs.111

index efe5a47f970824aa3c9cb2b092da6d8fe0fa641b..000c161c474f1e8ba2bc6dc4dcd58d774fb4da43 100644 (file)
@@ -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
 ]