Added _systime for all platforms

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

libsrc/apple2/Makefile

@@ -28,12 +28,13 @@ S_OBJS=	_scrsize.o	\
         randomize.o     \
 	read.o		\
 	revers.o	\
+        systime.o       \
 	where.o		\
 	write.o
 
 all:	$(C_OBJS) $(S_OBJS)
 
 clean:
-	@rm -f $(C_OBJS:.c=.s) $(C_OBJS) $(S_OBJS) crt0.o
+	@rm -f $(C_OBJS:.c=.s) $(C_OBJS) $(S_OBJS)
 
 

libsrc/apple2/systime.s

@@ -0,0 +1,28 @@
+;
+; Ullrich von Bassewitz, 12.11.2002
+;
+; time_t _systime (void);
+; /* Similar to time(), but:
+;  *   - Is not ISO C
+;  *   - Does not take the additional pointer
+;  *   - Does not set errno when returning -1
+;  */
+;
+
+	.export		__systime
+
+        .importzp       sreg
+
+.code
+
+.proc   __systime
+
+        lda     #$FF
+        tax
+        sta     sreg
+        sta     sreg+1
+        rts                     ; Return -1
+
+.endproc
+
+

libsrc/atari/Makefile

@@ -61,6 +61,7 @@ OBJS =	_scrsize.o   \
 	scroll.o     \
 	setcolor.o   \
 	siocall.o    \
+        systime.o    \
 	tvtype.o     \
 	ucase_fn.o   \
 	where.o      \

libsrc/atari/systime.s

@@ -0,0 +1,28 @@
+;
+; Ullrich von Bassewitz, 12.11.2002
+;
+; time_t _systime (void);
+; /* Similar to time(), but:
+;  *   - Is not ISO C
+;  *   - Does not take the additional pointer
+;  *   - Does not set errno when returning -1
+;  */
+;
+
+	.export		__systime
+
+        .importzp       sreg
+
+.code
+
+.proc   __systime
+
+        lda     #$FF
+        tax
+        sta     sreg
+        sta     sreg+1
+        rts                     ; Return -1
+
+.endproc
+
+

libsrc/atmos/Makefile

@@ -11,10 +11,13 @@
 %.o:	%.s
 	@$(AS) -g -o $@ $(AFLAGS) $<
 
-OBJS =  crt0.o
+C_OBJS =
 
-all:	$(OBJS)
+S_OBJS  =       crt0.o          \
+                systime.o
+
+all:   	$(C_OBJS) $(S_OBJS)
 
 clean:
-	@rm -f $(OBJS)
+	@rm -f $(C_OBJS:.c=.s) $(C_OBJS) $(S_OBJS)
 

libsrc/atmos/systime.s

@@ -0,0 +1,28 @@
+;
+; Ullrich von Bassewitz, 12.11.2002
+;
+; time_t _systime (void);
+; /* Similar to time(), but:
+;  *   - Is not ISO C
+;  *   - Does not take the additional pointer
+;  *   - Does not set errno when returning -1
+;  */
+;
+
+	.export		__systime
+
+        .importzp       sreg
+
+.code
+
+.proc   __systime
+
+        lda     #$FF
+        tax
+        sta     sreg
+        sta     sreg+1
+        rts                     ; Return -1
+
+.endproc
+
+

libsrc/cbm/Makefile

@@ -50,6 +50,7 @@ S_OBJS =	c_acptr.o	\
                 oserrlist.o     \
 		oserror.o	\
 		revers.o	\
+                systime.o       \
 		where.o
 
 all:	$(C_OBJS) $(S_OBJS)

libsrc/cbm/systime.s

@@ -0,0 +1,28 @@
+;
+; Ullrich von Bassewitz, 12.11.2002
+;
+; time_t _systime (void);
+; /* Similar to time(), but:
+;  *   - Is not ISO C
+;  *   - Does not take the additional pointer
+;  *   - Does not set errno when returning -1
+;  */
+;
+
+	.export		__systime
+
+        .importzp       sreg
+
+.code
+
+.proc   __systime
+
+        lda     #$FF
+        tax
+        sta     sreg
+        sta     sreg+1
+        rts                     ; Return -1
+
+.endproc
+
+

libsrc/geos/system/Makefile

@@ -8,8 +8,19 @@
 	@$(AS) -o $@ $(AFLAGS) $<
 
 
-S_OBJS	= ctype.o callroutine.o enterdesktop.o firstinit.o getrandom.o getserialnumber.o\
-	  initdoneio.o mainloop.o panic.o tobasic.o setdevice.o get_ostype.o
+S_OBJS  =       ctype.o                 \
+                callroutine.o           \
+                enterdesktop.o          \
+                firstinit.o             \
+                get_ostype.o            \
+                getrandom.o             \
+                getserialnumber.o       \
+	        initdoneio.o            \
+                mainloop.o              \
+                panic.o                 \
+                tobasic.o               \
+                setdevice.o             \
+                systime.o
 
 all: $(S_OBJS)
 

libsrc/geos/system/systime.s

@@ -0,0 +1,28 @@
+;
+; Ullrich von Bassewitz, 12.11.2002
+;
+; time_t _systime (void);
+; /* Similar to time(), but:
+;  *   - Is not ISO C
+;  *   - Does not take the additional pointer
+;  *   - Does not set errno when returning -1
+;  */
+;
+
+	.export		__systime
+
+        .importzp       sreg
+
+.code
+
+.proc   __systime
+
+        lda     #$FF
+        tax
+        sta     sreg
+        sta     sreg+1
+        rts                     ; Return -1
+
+.endproc
+
+