Added _systime for all platforms

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

diff --git a/libsrc/apple2/Makefile b/libsrc/apple2/Makefile
index c87d436613be7de808341b7e4effb9dad635f375..248cfae8b24f11783a61b536b8029b6a26a5c7a9 100644 (file)
--- a/libsrc/apple2/Makefile
+++ b/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)
 
 

diff --git a/libsrc/apple2/systime.s b/libsrc/apple2/systime.s
new file mode 100644 (file)
index 0000000..1d039e8
--- /dev/null
+++ b/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
+
+

diff --git a/libsrc/atari/Makefile b/libsrc/atari/Makefile
index afc4e7c9c3d54f7984d5e2e89ec9a802fc522a2c..e5a4095f37971be5f6c34f6bdf951016eb46468c 100644 (file)
--- a/libsrc/atari/Makefile
+++ b/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      \

diff --git a/libsrc/atari/systime.s b/libsrc/atari/systime.s
new file mode 100644 (file)
index 0000000..1d039e8
--- /dev/null
+++ b/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
+
+

diff --git a/libsrc/atmos/Makefile b/libsrc/atmos/Makefile
index 454edd96af4391e80e586c379b91f3aad267fa47..b878d96c5059385c2b6b9a1d6114ed41a3741365 100644 (file)
--- a/libsrc/atmos/Makefile
+++ b/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)
 

diff --git a/libsrc/atmos/systime.s b/libsrc/atmos/systime.s
new file mode 100644 (file)
index 0000000..1d039e8
--- /dev/null
+++ b/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
+
+

diff --git a/libsrc/cbm/Makefile b/libsrc/cbm/Makefile
index 54e6c6314750f62a3c12c278b057ff66347e9ed0..b224d139b3a2a51bde0cd75b28ce4541b880c284 100644 (file)
--- a/libsrc/cbm/Makefile
+++ b/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)

diff --git a/libsrc/cbm/systime.s b/libsrc/cbm/systime.s
new file mode 100644 (file)
index 0000000..1d039e8
--- /dev/null
+++ b/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
+
+

diff --git a/libsrc/geos/system/Makefile b/libsrc/geos/system/Makefile
index e3508b4ded9edd9f0923cd062868ceaa58aaad45..4389b8eba6e1b71ff4c874e2c0c256da4214d4aa 100644 (file)
--- a/libsrc/geos/system/Makefile
+++ b/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)
 

diff --git a/libsrc/geos/system/systime.s b/libsrc/geos/system/systime.s
new file mode 100644 (file)
index 0000000..1d039e8
--- /dev/null
+++ b/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
+
+