Fixed some return pointers.

$1234 pointers were returned as $3434.

diff --git a/libsrc/common/strlower.s b/libsrc/common/strlower.s
index 9df79b732f9d1305c2f19d9420aa80c3f4a94a63..848a4faffab2e849f93a3ce9b452d3bc74f1455f 100644 (file)
--- a/libsrc/common/strlower.s
+++ b/libsrc/common/strlower.s
@@ -1,8 +1,9 @@
 ;
-; Ullrich von Bassewitz, 02.06.1998
+; 1998-06-02, Ullrich von Bassewitz
+; 2013-08-28, Greg King
 ;
-; char* strlower (char* s);
-; char* strlwr (char* s);
+; char* __fastcall__ strlower (char* s);
+; char* __fastcall__ strlwr (char* s);
 ;
 ; Non-ANSI
 ;
@@ -19,7 +20,7 @@ _strlwr:
         sta     ptr1            ; Save s (working copy)
         stx     ptr1+1
         sta     ptr2
-        sta     ptr2+1          ; save function result
+        stx     ptr2+1          ; save function result
         ldy     #0
 
 loop:   lda     (ptr1),y        ; get character

diff --git a/libsrc/common/strupper.s b/libsrc/common/strupper.s
index d7aa2f9140407b66a6f9b18c19f6d1215fd7865b..bf0d3b622b81672c9045a27e931c6437b7317645 100644 (file)
--- a/libsrc/common/strupper.s
+++ b/libsrc/common/strupper.s
@@ -1,8 +1,9 @@
 ;
-; Ullrich von Bassewitz, 02.06.1998
+; 1998-06-02, Ullrich von Bassewitz
+; 2013-08-28, Greg King
 ;
-; char* strupper (char* s);
-; char* strupr (char* s);
+; char* __fastcall__ strupper (char* s);
+; char* __fastcall__ strupr (char* s);
 ;
 ; Non-ANSI
 ;
@@ -19,7 +20,7 @@ _strupr:
         sta     ptr1            ; Save s (working copy)
         stx     ptr1+1
         sta     ptr2
-        sta     ptr2+1          ; save function result
+        stx     ptr2+1          ; save function result
         ldy     #0
 
 loop:   lda     (ptr1),y        ; get character