From a7acdf7072e72d3b63c51f2e10ed5ba3141a8174 Mon Sep 17 00:00:00 2001
From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Tue, 26 Aug 2003 20:14:43 +0000
Subject: [PATCH] Fixed a bug, splitted the where.s module into wherex.s and
 wherey.s

git-svn-id: svn://svn.cc65.org/cc65/trunk@2415 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/apple2/Makefile              |  3 ++-
 libsrc/apple2/wherex.s              | 17 +++++++++++++++++
 libsrc/apple2/{where.s => wherey.s} | 13 ++++++-------
 3 files changed, 25 insertions(+), 8 deletions(-)
 create mode 100644 libsrc/apple2/wherex.s
 rename libsrc/apple2/{where.s => wherey.s} (50%)

diff --git a/libsrc/apple2/Makefile b/libsrc/apple2/Makefile
index 81ac2c989..ee4e992a8 100644
--- a/libsrc/apple2/Makefile
+++ b/libsrc/apple2/Makefile
@@ -47,7 +47,8 @@ OBJS=	_scrsize.o	\
 	revers.o	\
         systime.o       \
         sysuname.o      \
-	where.o		\
+	wherex.o       	\
+       	wherey.o	\
 	write.o
 
 #--------------------------------------------------------------------------
diff --git a/libsrc/apple2/wherex.s b/libsrc/apple2/wherex.s
new file mode 100644
index 000000000..a7ceb22d8
--- /dev/null
+++ b/libsrc/apple2/wherex.s
@@ -0,0 +1,17 @@
+
+	;; Keivn Ruland
+	;;
+	;; unsigned char wherex( void );
+
+	.export	       	_wherex
+
+	.include	"apple2.inc"
+
+.proc   _wherex
+
+	lda    	CH
+        ldx     #0
+	rts
+
+.endproc
+
diff --git a/libsrc/apple2/where.s b/libsrc/apple2/wherey.s
similarity index 50%
rename from libsrc/apple2/where.s
rename to libsrc/apple2/wherey.s
index b17c1f832..bd7342c86 100644
--- a/libsrc/apple2/where.s
+++ b/libsrc/apple2/wherey.s
@@ -1,18 +1,17 @@
 
 	;; Keivn Ruland
 	;;
-	;; unsigned char wherex( void );
 	;; unsigned char wherey( void );
 
-	.export		_wherex, _wherey
+	.export	       	_wherey
 
 	.include	"apple2.inc"
 
-_wherex:
-	lda	CH
-	rts
+.proc   _wherey
 
-_wherey:
 	lda	CV
+        ldx     #0
 	rts
-	
\ No newline at end of file
+
+.endproc
+
-- 
2.39.5