github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-04-26 20:27:13 +00:00
Code Issues Releases Wiki Activity

Use .CALL /LOGIN/ instead of .LOGIN.

Browse Source 
SYSDOC; UUOS says the .LOGIN UUO doesn't exist any more.
This commit is contained in:
Adam Sampson
2018-06-18 17:32:23 +01:00
committed by Adam Sampson
parent 164fbccb5a
commit 2b0963aeaf
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/syseng/monit.114 → src/syseng/monit.ats115
View File

@@ -439,7 +439,7 @@ COMTTT: SKIPE C
LOGIN: PUSHJ P,GETSYL LOGIN: PUSHJ P,GETSYL
MOVEM B,USRF+1 ;SET NEW UNAME (? SO CAN HACK OTHERS DISOWNED PROCEDURES) MOVEM B,USRF+1 ;SET NEW UNAME (? SO CAN HACK OTHERS DISOWNED PROCEDURES)
.LOGIN B, .CALL LBLK
JRST CANNOT JRST CANNOT
MOVEM B,LOGNAM MOVEM B,LOGNAM
MOVEM B,COMPF+1 MOVEM B,COMPF+1
@@ -449,6 +449,10 @@ LOGIN: PUSHJ P,GETSYL
JRST BEG ;NO COM:USER MAIL JRST BEG ;NO COM:USER MAIL
JRST XPRINT JRST XPRINT
LBLK: 400000,,0
SIXBIT /LOGIN/
400000,,B
DISOWN: PUSHJ P,CKRUN DISOWN: PUSHJ P,CKRUN
PUSHJ P,DISOW PUSHJ P,DISOW
JRST BEG JRST BEG