github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-02-02 06:51:04 +00:00
Code Issues Releases Wiki Activity

File must be allocated when calling DISINI with two arguments.

Browse Source
This commit is contained in:
Lars Brinkhoff
2021-01-09 16:07:05 +01:00
parent f3239702f6
commit 3b22323dd0
1 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/l/slave.9 → src/l/slave.10
View File

@@ -195,14 +195,17 @@ CLSSX7: SETZ
402000,,SIXPG ;THIS PAGE
OPNSIX: SKIPE SIXOPD
POPJ P,
MOVE T,[SIXBIT \USR\]
GTSIXF: MOVE T,[SIXBIT \USR\]
PUSHJ P,ALFILE
MOVEM A,SIXFIL
MOVE TT,F
JSP T,FXCONS
MOVEM A,SIXCHN
POPJ P,
OPNSIX: SKIPE SIXOPD
POPJ P,
PUSHJ P,GTSIXF
LOCKI ;R<0 => SLAVE IS PDP6, >0 => PDP10
MOVNI R,1 ;R=0 => TRYING TO LOAD 6'S MEMORY AND START UP
.CALL [ SETZ
@@ -363,6 +366,7 @@ DISINI: AOJG T,DCLR1
HLRZ F,TT
PUSHJ P,CLSSIX
LOCKI
PUSHJ P,GTSIXF
PUSHJ P,OPNTEN
JRST DCLR5A