lseek.o: new object file

git-svn-id: svn://svn.cc65.org/cc65/trunk@266 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/atari/Makefile

@@ -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 \
 	 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 \
-	 ostype.o clock.o
+	 ostype.o clock.o lseek.o
 
 all:	$(C_OBJS) $(S_OBJS)
 

libsrc/atari/lseek.s

@@ -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