1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 15:27:28 +00:00

Move setting of %OPLIV to after TV-11 is up.

Or else NAMDRG may be .HANGing when ITS is trying to shut down.
This commit is contained in:
Lars Brinkhoff 2019-01-16 20:32:00 +01:00 committed by Eric Swenson
parent 380fc78f77
commit 35873d9e63

View File

@ -226,9 +226,6 @@ init: setz a,
name: .close 1, ;close the channel we were loaded on
move p,[-lpdl,,pdl-1]
.suset [.roption,,a]
tlo a,%opint+%opliv+%opopc
.suset [.soption,,a]
move b,[squoze 0,nf11ty]
.eval b, ;TTY # of console free display
.value
@ -273,6 +270,9 @@ name2: .call [ setz ? 'cnsget ? 1000,,tyoc ? 2000,,tcmxv ? 2000,,tcmxh
pushj p,clrpts ;clear user name ptrs
skipl @tt11p ;wait for TV 11 to come up
.hang
.suset [.roption,,a]
tlo a,%opint+%opliv+%opopc
.suset [.soption,,a]
pushj p,map11
move a,@dmnbd ;find our initial dmnbf ptr
movem a,logcnt