1
0
mirror of https://github.com/cc65/cc65.git synced 2024-07-04 13:29:35 +00:00
cc65/libsrc/atari/lseek.s
cpg 743b215bac fixed setting of errno
git-svn-id: svn://svn.cc65.org/cc65/trunk@276 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-08-11 22:14:21 +00:00

33 lines
482 B
ArmAsm

;
; Christian Groessler, August 2000
;
; this file provides the lseek() function
;
; off_t __fastcall__ lseek(int fd, off_t offset, int whence);
;
.export _lseek
.import incsp6,__errno,__oserror
.importzp sreg
.include "atari.inc"
.include "../common/errno.inc"
.proc _lseek
; dummy implementation, return -1 and ENOSYS errno value
jsr incsp6
lda #<ENOSYS
sta __errno
lda #>ENOSYS
sta __errno+1
ldx #0
stx __oserror
dex
txa
sta sreg
sta sreg+1
rts
.endproc