User`s manual

Dynamic C User’s Manual digi.com 81
taisr_decnesting:
push ip (8)
ipset 1
ld hl,bios_intnesting ; nesting counter == 1?
dec (hl) (9)
jr nz,taisr_noswitch
ld a,(bios_swpend) ; switch pending? (10)
or a
jr z,taisr_noswitch
push de (11)
push bc
ex af,af’
push af
exx
push hl
push de
push bc
push iy
lcall bios_intexit
pop iy
pop bc
pop de
pop hl
exx
pop af
ex af,af’
pop bc
pop de
taisr_noswitch:
pop ip
taisr_done:
pop hl (12)
pop af
ipres
ret
#endasm