Ausam/sys/conf/other/l.s
/ low core
br4 = 200
br5 = 240
br6 = 300
br7 = 340
. = 0^.
br 1f
4
/ trap vectors
trap; br7+0. / bus error
trap; br7+1. / illegal instruction
trap; br7+2. / bpt-trace trap
trap; br7+3. / iot trap
trap; br7+4. / power fail
trap; br7+5. / emulator trap
trap; br7+6. / system entry
. = 40^.
.globl start, dump
1: jmp start
jmp dump
. = 60^.
klin; br4
klou; br4
. = 100^.
kwlp; br6
kwlp; br6
. = 114^.
trap; br7+7. / 11/70 parity
.=200^.
lpou; br4
. = 224^.
htio; br5
. = 230^.
crin; br6
. = 240^.
trap; br7+7. / programmed interrupt
trap; br7+8. / floating point
trap; br7+9. / segmentation violation
. = 254^.
hpio; br5
/ floating vectors
. = 300^.
. = 310^.
klin; br4+1.
klou; br4+1.
klin; br4+2.
klou; br4+2.
. = 330^.
djin; br5+0.
djou; br5+0.
. = 340^.
dzin; br5+0.
dzou; br5+0.
//////////////////////////////////////////////////////
/ interface code to C
//////////////////////////////////////////////////////
.globl call, trap
.globl _klrint
klin: jsr r0,call; _klrint
.globl _klxint
klou: jsr r0,call; _klxint
.globl _clock
kwlp: jsr r0,call; _clock
.globl _lpint
lpou: jsr r0,call; _lpint
.globl _htintr
htio: jsr r0,call; _htintr
.globl _crint
crin: jsr r0,call; _crint
.globl _hpintr
hpio: jsr r0,call; _hpintr
.globl _djrint
djin: jsr r0,call; _djrint
.globl _djxint
djou: jsr r0,call; _djxint
.globl _dzrint
dzin: jsr r0,call; _dzrint
.globl _dzxint
dzou: jsr r0,call; _dzxint