1985-02-07 15:58:40 +00:00
|
|
|
.define _time
|
|
|
|
.define _ftime
|
1987-01-27 20:37:46 +00:00
|
|
|
.sect .text
|
|
|
|
.sect .rom
|
|
|
|
.sect .data
|
|
|
|
.sect .bss
|
|
|
|
.sect .text
|
1985-02-07 15:58:40 +00:00
|
|
|
.extern _time
|
|
|
|
_time:
|
|
|
|
trap #0
|
1987-01-27 20:37:46 +00:00
|
|
|
.data2 0xD
|
1985-02-07 15:58:40 +00:00
|
|
|
tst.l 4(sp)
|
|
|
|
beq 1f
|
|
|
|
move.l 4(sp),a0
|
|
|
|
move.l d0,(a0)
|
|
|
|
1:
|
|
|
|
rts
|
|
|
|
.extern _ftime
|
|
|
|
_ftime:
|
|
|
|
trap #0
|
1987-01-27 20:37:46 +00:00
|
|
|
.data2 0x23
|
1985-02-07 15:58:40 +00:00
|
|
|
bcc 1f
|
|
|
|
jmp cerror
|
|
|
|
1:
|
|
|
|
clr.l d0
|
|
|
|
rts
|