From 3b22323dd0290686f104389ac2c271066c192c57 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Sat, 9 Jan 2021 16:07:05 +0100
Subject: [PATCH] File must be allocated when calling DISINI with two
 arguments.

---
 src/l/{slave.9 => slave.10} | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)
 rename src/l/{slave.9 => slave.10} (99%)

diff --git a/src/l/slave.9 b/src/l/slave.10
similarity index 99%
rename from src/l/slave.9
rename to src/l/slave.10
index d815d36d..86fdbee1 100644
--- a/src/l/slave.9
+++ b/src/l/slave.10
@@ -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