1997-09-17 05:27:56 +00:00
|
|
|
.include "t-macros.i"
|
|
|
|
|
|
|
|
start
|
|
|
|
|
|
|
|
# Set the callt base pointer
|
|
|
|
load r1 callt_base
|
|
|
|
ldsr r1, ctbp
|
1997-09-19 06:40:11 +00:00
|
|
|
|
1997-09-17 05:27:56 +00:00
|
|
|
test_callt:
|
|
|
|
callt 2
|
|
|
|
exit47
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.align 1
|
|
|
|
callt_base:
|
|
|
|
.short -1
|
|
|
|
.short -1
|
|
|
|
.short (dest - callt_base)
|
|
|
|
.short -1
|
|
|
|
.short -1
|
|
|
|
|
|
|
|
dest:
|
|
|
|
stsr ctpc, r2
|
|
|
|
check1 r2 test_callt+2
|
|
|
|
|
|
|
|
exit0
|