lseek.o: new object file
git-svn-id: svn://svn.cc65.org/cc65/trunk@266 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -21,7 +21,7 @@ S_OBJS = crt0.o kbhit.o conio.o clrscr.o cputc.o ctype.o chline.o cvline.o \
|
|||||||
color.o gotoxy.o cclear.o revers.o readjoy.o break.o where.o write.o \
|
color.o gotoxy.o cclear.o revers.o readjoy.o break.o where.o write.o \
|
||||||
gotox.o gotoy.o savevec.o rwcommon.o cgetc.o read.o getargs.o close.o \
|
gotox.o gotoy.o savevec.o rwcommon.o cgetc.o read.o getargs.o close.o \
|
||||||
open.o oserror.o fdtable.o setcolor.o scroll.o mul40.o graphuse.o \
|
open.o oserror.o fdtable.o setcolor.o scroll.o mul40.o graphuse.o \
|
||||||
ostype.o clock.o
|
ostype.o clock.o lseek.o
|
||||||
|
|
||||||
all: $(C_OBJS) $(S_OBJS)
|
all: $(C_OBJS) $(S_OBJS)
|
||||||
|
|
||||||
|
|||||||
32
libsrc/atari/lseek.s
Normal file
32
libsrc/atari/lseek.s
Normal file
@@ -0,0 +1,32 @@
|
|||||||
|
;
|
||||||
|
; 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
|
||||||
|
ldx #0
|
||||||
|
stx __oserror
|
||||||
|
dex
|
||||||
|
txa
|
||||||
|
sta sreg
|
||||||
|
sta sreg+1
|
||||||
|
rts
|
||||||
|
|
||||||
|
.endproc
|
||||||
Reference in New Issue
Block a user