github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-14 07:40:05 +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
Show Stats 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
MOVEM B,USRF+1 ;SET NEW UNAME (? SO CAN HACK OTHERS DISOWNED PROCEDURES)
.LOGIN B,
.CALL LBLK
JRST CANNOT
MOVEM B,LOGNAM
MOVEM B,COMPF+1
@ -449,6 +449,10 @@ LOGIN: PUSHJ P,GETSYL
JRST BEG ;NO COM:USER MAIL
JRST XPRINT
LBLK: 400000,,0
SIXBIT /LOGIN/
400000,,B
DISOWN: PUSHJ P,CKRUN
PUSHJ P,DISOW
JRST BEG