;* 8
.fill 1, 0x2A38
-stack:
-.fill 256, 0
-
;needed for jumps
;assuming that no more than 42 instr are used
instrtable:
prog_eof:
.ifill pop r7
-.ifill mov r0, r6
.ifill ret+
prog_mul:
call+ prog_start
; benchepilog
- push r0
+ push r6
call+ t_init
call+ t_stop
call+ t_valget
- subi r0, r0, 0xd ; offset abziehen
+ subi r0, r0, 0xc ; offset abziehen
pop r3
push r0
push r3
stw r0, PDATA(r13)
ldw r0, 4(r4)
stw r0, PDATA(r13)
- ldw r0, 8(r4)
- stw r0, PDATA(r13)
;end of program
;now it is time to clear up the defer table