X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=%3Cmdl.int%3E%2Freadch.215;fp=%3Cmdl.int%3E%2Freadch.215;h=7d033a8e6e39ee2e74f8754a192fd7cb80a0e835;hb=4fdf1ca55bc9fcf21052136b15418cab8f0541da;hp=174dea1a04ff85c012977afd3fdbbdb38b8475f7;hpb=5647f4fd3cea04a87dcc4e9fd4fa1d53f9b74b3a;p=pdp10-muddle.git

diff --git a/<mdl.int>/readch.215 b/<mdl.int>/readch.215
index 174dea1..7d033a8 100644
--- a/<mdl.int>/readch.215
+++ b/<mdl.int>/readch.215
@@ -947,8 +947,8 @@ TTYOPEN:
 	POPJ	P,
 	.CALL	[SETZ
 		SIXBIT /OPEN/
-		[1000,,TTYIN]
-		SETZ [[SIXBIT /TTY   /]]]
+		1000,,TTYIN
+		SETZ [SIXBIT /TTY   /]]
 	JRST	TTYNO
 	DOTCAL	OPEN,[[1000,,TTYOUT],[[SIXBIT /TTY   /]],[5000,,1]]
 	FATAL CANT OPEN TTY