changed interface to CSA and CSB
This commit is contained in:
parent
5187e46404
commit
13c2a9a2a5
2 changed files with 4 additions and 4 deletions
|
@ -6,8 +6,8 @@
|
||||||
|
|
||||||
.sect .text
|
.sect .text
|
||||||
.csa:
|
.csa:
|
||||||
move.l (sp)+,a0 ! case descriptor
|
! case descriptor in a0
|
||||||
move.l (sp)+,d0 ! index
|
! index in d0
|
||||||
move.l (a0)+,a1 ! default address
|
move.l (a0)+,a1 ! default address
|
||||||
sub.l (a0)+,d0 ! index - lower bound
|
sub.l (a0)+,d0 ! index - lower bound
|
||||||
blt 1f
|
blt 1f
|
||||||
|
|
|
@ -6,8 +6,8 @@
|
||||||
|
|
||||||
.sect .text
|
.sect .text
|
||||||
.csb:
|
.csb:
|
||||||
move.l (sp)+,a0 ! case descriptor
|
! case descriptor in a0
|
||||||
move.l (sp)+,d0 ! index
|
! index in d0
|
||||||
move.l (a0)+,a1 ! default jump address
|
move.l (a0)+,a1 ! default jump address
|
||||||
move.l (a0)+,d1 ! # entries
|
move.l (a0)+,d1 ! # entries
|
||||||
beq 2f
|
beq 2f
|
||||||
|
|
Loading…
Reference in a new issue