.export _time
.import __systime
- .import __errno
.importzp ptr1, sreg, tmp1
.include "errno.inc"
@L1: ldy sreg+1
bpl @L2
-
- lda #$00
- sta __errno+1
+
lda #ENOSYS ; Function not implemented
- sta __errno
+ jsr __seterrno ; Set __errno
; Reload the low byte of the result and return