From: Greg King <gregdk@users.sf.net>
Date: Wed, 28 Aug 2013 06:58:41 +0000 (-0400)
Subject: Fixed some return pointers.
X-Git-Tag: V2.15~234^2
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=0684ab7ab9b00ee800cf05c10a355f780664c5c3;p=cc65

Fixed some return pointers.

$1234 pointers were returned as $3434.
---

diff --git a/libsrc/common/strlower.s b/libsrc/common/strlower.s
index 9df79b732..848a4faff 100644
--- 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 d7aa2f914..bf0d3b622 100644
--- 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