github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 23:36:30 +00:00
Code Issues Releases Wiki Activity

Fix use of SYSCAL. It's wrong to add SETZ to the last argument!

Browse Source
This commit is contained in:
Lars Brinkhoff 2019-01-19 11:46:05 +01:00 committed by Eric Swenson
parent 8febbad96b
commit 9bf03afa52
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/sysen2/namdrg.149
View File

@ -254,9 +254,9 @@ name: .close 1, ;close the channel we were loaded on
jrst name2
name1: ;char unit out, disp. mode, no continuation lns
syscal OPEN,[ [%tjmor+%tjctn+%tjdis+.uao,,tyoc] ? setz b ]
syscal OPEN,[ [%tjmor+%tjctn+%tjdis+.uao,,tyoc] ? b ]
.value
syscal OPEN,[ [%tjmor+%tjctn+%tjdis+.bao,,tybc] ? setz b ]
syscal OPEN,[ [%tjmor+%tjctn+%tjdis+.bao,,tybc] ? b ]
.value
name2: .call [ setz ? 'cnsget ? 1000,,tyoc ? 2000,,tcmxv ? 2000,,tcmxh
2000,,a ? 2000,,a ? setzm a]