Put back the original code from scans.

This commit is contained in:
Warren Toomey
2016-03-20 08:42:26 +10:00
parent c948eb8012
commit 2409028f15
+1 -2
View File
@@ -324,8 +324,7 @@ putsc: 0
dac i sctalp " save pointer
sma cla " skip if minus & clear AC
jmp 1f " AC positive
lacq
als 9 " get char in high 9 bits, zero in low
llss 27 " get char in high 9 bits, zero in low
dac i sctal " store word
lrss 9 " shift char back down
jmp i putsc " return