1
0
mirror of https://github.com/PDP-10/its.git synced 2026-03-06 11:23:32 +00:00

"Hack hack" test.

The 340 interrupt handling uses a special hack.  PDP-10 emulators may
not support this.  See src/maint/hhtest.1 for longer explanation.
This commit is contained in:
Lars Brinkhoff
2023-03-24 12:51:34 +01:00
parent 78ae9769b8
commit c66f7dc49e
2 changed files with 54 additions and 0 deletions

47
src/maint/hhtest.1 Normal file
View File

@@ -0,0 +1,47 @@
TITLE "HACK HACK" TEST
;This tests the ITS "hack hack" for handling Type 340 display
;interrupts. Data is output to the display through a BLKO from a low
;priority data channel, whereas other conditions are handled through a
;higher priority special channel. The "hack hack" is that when the
;BLKO overflows, ITS triggers an interrupt on the special channel.
;This interrupt is handled still in the overflow state, so the second
;interrupt location should be used. This hack goes back to at least
;ITS 672.
NOSYMS
RIM10
APR==0
PI==4
TTY==120
SCHN==4
DCHN==6
LOC 40+2*DCHN
BLKO TTY,PTR ;2. BLKO overflows.
CONO PI,4000+200_<-SCHN> ;3. Trigger special interrupt.
LOC 40+2*SCHN
JRST 4,.
JSR OFLOW ;4. Execute second instruction.
LOC 100
GO: CONO APR,675550 ;Reset APR.
CONO PI,711377 ;Reset PI.
CONO PI,2000+<200_<-SCHN>>+<200_<-DCHN>> ;Enable channels.
CONO TTY,DCHN
CONO PI,4000+200_<-DCHN> ;1. Trigger data interrupt.
REPEAT 10,JFCL
JRST 4,. ;Unsuccessful test ends here.
LOC 200
OFLOW: 0
JRST 4,. ;5. Successful test ends here.
PTR: -1,,["A]-1
END GO