more GEOS Kernal replacements for common/ and runtime/ routines

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

libsrc/geos/Makefile

@@ -4,7 +4,7 @@
 #
 # Maciej 'YTM/Elysium' Witkowiak
 
-OBJ_DIRS=common conio devel disk dlgbox file graph menuicon memory mousesprite process system
+OBJ_DIRS=common conio devel disk dlgbox file graph menuicon memory mousesprite process runtime system
 
 all:
 	@for i in $(OBJ_DIRS); do $(MAKE) -C $$i; done

libsrc/geos/common/Makefile

@@ -11,7 +11,7 @@
 	@$(AS) -o $@ $(AFLAGS) $<
 
 C_OBJS	= _afailed.o abort.o perror.o
-S_OBJS	= copydata.o memcpy.o memset.o
+S_OBJS	= copydata.o memcpy.o memset.o zerobss.o
 
 all: $(C_OBJS) $(S_OBJS)
 

libsrc/geos/common/zerobss.s

@@ -0,0 +1,27 @@
+;
+; Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl>
+; 23.12.2002
+;
+; Zero the bss segment.
+;
+
+	.export		zerobss
+	.import		__BSS_RUN__, __BSS_SIZE__
+
+        .include "../inc/jumptab.inc"
+        .include "../inc/geossym.inc"
+
+.code
+
+zerobss:
+	    lda	#<__BSS_SIZE__
+	    ldx #>__BSS_SIZE__
+	    sta r0L
+	    stx r0H
+	    lda #0
+	    sta r2L
+	    lda #<__BSS_RUN__
+	    ldx #>__BSS_RUN__
+	    sta r1L
+	    stx r1H
+	    jmp FillRam

libsrc/geos/runtime/Makefile

@@ -0,0 +1,21 @@
+#
+# Makefile for GEOS lib
+# for cc65
+#
+
+%.o:   	%.c
+	@$(CC) $(CFLAGS) $<
+	@$(AS) -g -o $@ $(AFLAGS) $(*).s
+
+%.o:	%.s
+	@$(AS) -o $@ $(AFLAGS) $<
+
+C_OBJS	=
+S_OBJS	= call.o
+
+all: $(C_OBJS) $(S_OBJS)
+
+clean:
+	@rm -f *.~ $(S_OBJS) core
+	@rm -f $(C_OBJS:.o=.s)
+	@rm -f $(C_OBJS)

libsrc/geos/runtime/call.s

@@ -0,0 +1,12 @@
+;
+; Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl>
+; 23.12.2002
+;
+; CC65 runtime: call function via pointer in ax
+;
+
+        .include "../inc/jumptab.inc"
+
+	.export		callax
+
+callax = CallRoutine