diff --git a/src/sysen2/peek.631 b/src/sysen2/peek.631 index 849575ce..693d1eee 100755 --- a/src/sysen2/peek.631 +++ b/src/sysen2/peek.631 @@ -498,9 +498,9 @@ IPGWTN:IPGWTG:IPGWTI:IPGWTM:SBNRUT: PGIHTB:SWPHTB:OVHTB1: IPUQHD:IPFDPE:XBITQH:XBORTQ:XBOCOS: DG2:DRTM:EUPOS:UDIR:UDIRO:UGOAL:ULCTM:UTASS:UTBFS: -UTTNO:UTUSR:UMNTR:] +UTTNO:UTUSR:UMNTR:MPXBUF:] -;No longer used: MPXBUF: +;No longer used: ; IMSOC1:IMSOC2:IMSOC3:IMSOC4:IMSOC5:IMSOC6:IMSOC7:IMSOC8: ;+SYSBEG(U) @@ -1115,14 +1115,12 @@ BEG1: SETZM TOPFLG PUSHJ P,TMPT ;OUTPUT HH:MM:SS PUSHJ P,CRR BEG1LN: HRRZ D,MODE ;GET MODE -IFN 0,[ SKIPGE XCHFLG JRST [ CAIN D,%MDMPX ; Mplxrs open, skip if should be off JRST .+1 ; Still on, OK. .CLOSE IMXC, ; We were interrupted out of mplxr mode SETZM XCHFLG ; to another mode, so turn mplxrs off. JRST .+1] -];IFN 0 CAIE D,%MDOVH SETOM OVHTIM ;Allow for RHIST to get clobbered MOVE A,MDTAB(D) ; Get mode dispatch table entry @@ -1224,9 +1222,7 @@ MDTAB: %MD1LN::MODEF "F,1PEEK,, "Fast 1-line (job#)" %MDSCH::MODEF "G,NORMAL,, "Swap variables" MODEF "H,MEML,%MFERO, "Histogram of mem usage" -IFN 0,[ -%MDMPX::MODEF "I,MPXR,, "IMX??" -];IFN 0 +%MDMPX::MODEF "I,MPXR,, "IMX" %MDJHK::MODEF "J,JHACK,, "Joint S+C+A (job#)" %MDCHA::MODEF "K,KAOS,, "Chaosnet connections" MODEF "L,LINES,, "tty Lines (job#)" @@ -2692,8 +2688,6 @@ UMSPLS: ATYPE [ASCIZ /MSP: LOSER??/] SUBTTL Mode "I" - IMX/OMX display (obsolete) -IFN 0,[ - ;INPUT AND OUTPUT MULTIPLEXORS DISPLAY MPXR: SKIPL XCHFLG JRST [ SKIPE CRASHF @@ -2729,7 +2723,6 @@ MPXRL2: ILDB B,X MPXRL3: ONUM 5,B AOBJN D,MPXRL1 RET -];IFN 0 SUBTTL Mode "nmM" - Job memory map display