Add core namespace to asm lib

Author: boriel

src/arch/zx48k/library-asm/SP/CharLeft.asm

@@ -1,54 +1,59 @@
-;
-; CharLeft
-; Alvin Albrecht 2002
-;
-
-;INCLUDE "SPconfig.def"
-;XLIB SPCharLeft
-
-; Char Left
-;
-; Adjusts screen address HL to move one character to the left
-; on the display.  Start of line wraps to the previous row.
-;
-; enter: HL = valid screen address
-;        Carry reset
-; exit : Carry = moved off screen
-;        HL = moves one character left, with line wrap
-; used : AF, HL
-
-;IF !DISP_HIRES
-
-SP.CharLeft:
-   ld a,l
-   dec l
-   or a
-   ret nz
-   ld a,h
-   sub $08
-   ld h,a
-   cp $40
-   ret
-
-;ELSE
-
-;.SPCharLeft
-;   ld a,h
-;   xor $20
-;   ld h,a
-;   cp $58
-;   ccf
-;   ret nc
-;   ld a,l
-;   dec l
-;   or a
-;   ret nz
-;   ld a,h
-;   sub $08
-;   ld h,a
-;   and $18
-;   cp $18
-;   ccf
-;   ret
-
-; ENDIF
+;
+; CharLeft
+; Alvin Albrecht 2002
+;
+
+;INCLUDE "SPconfig.def"
+;XLIB SPCharLeft
+
+; Char Left
+;
+; Adjusts screen address HL to move one character to the left
+; on the display.  Start of line wraps to the previous row.
+;
+; enter: HL = valid screen address
+;        Carry reset
+; exit : Carry = moved off screen
+;        HL = moves one character left, with line wrap
+; used : AF, HL
+
+;IF !DISP_HIRES
+
+    push namespace core
+
+SP.CharLeft:
+    ld a,l
+    dec l
+    or a
+    ret nz
+    ld a,h
+    sub $08
+    ld h,a
+    cp $40
+    ret
+
+    pop namespace
+
+
+;ELSE
+
+;.SPCharLeft
+;   ld a,h
+;   xor $20
+;   ld h,a
+;   cp $58
+;   ccf
+;   ret nc
+;   ld a,l
+;   dec l
+;   or a
+;   ret nz
+;   ld a,h
+;   sub $08
+;   ld h,a
+;   and $18
+;   cp $18
+;   ccf
+;   ret
+
+; ENDIF

src/arch/zx48k/library-asm/SP/CharRight.asm

@@ -1,49 +1,54 @@
-;
-; CharRight
-; Alvin Albrecht 2002
-;
-
-;INCLUDE "SPconfig.def"
-;XLIB SPCharRight
-
-; Char Right
-;
-; Adjusts screen address HL to move one character to the right
-; on the display.  End of line wraps to the next row.
-;
-; enter: HL = valid screen address
-;        Carry reset
-; exit : Carry = moved off screen
-;        HL = moves one character right, with line wrap
-; used : AF, HL
-
-;IF !DISP_HIRES
-
-SP.CharRight:
-   inc l
-   ret nz
-   ld a,8
-   add a,h
-   ld h,a
-   cp $58
-   ccf
-   ret
-
-;ELSE
-
-;.SPCharRight
-;   ld a,h
-;   xor $20
-;   ld h,a
-;   cp $58
-;   ret nc
-;   inc l
-;   ret nz
-;   ld a,8
-;   add a,h
-;   ld h,a
-;   cp $58
-;   ccf
-;   ret
-
-; ENDIF
+;
+; CharRight
+; Alvin Albrecht 2002
+;
+
+;INCLUDE "SPconfig.def"
+;XLIB SPCharRight
+
+; Char Right
+;
+; Adjusts screen address HL to move one character to the right
+; on the display.  End of line wraps to the next row.
+;
+; enter: HL = valid screen address
+;        Carry reset
+; exit : Carry = moved off screen
+;        HL = moves one character right, with line wrap
+; used : AF, HL
+
+;IF !DISP_HIRES
+
+    push namespace core
+
+SP.CharRight:
+    inc l
+    ret nz
+    ld a,8
+    add a,h
+    ld h,a
+    cp $58
+    ccf
+    ret
+
+    pop namespace
+
+
+;ELSE
+
+;.SPCharRight
+;   ld a,h
+;   xor $20
+;   ld h,a
+;   cp $58
+;   ret nc
+;   inc l
+;   ret nz
+;   ld a,8
+;   add a,h
+;   ld h,a
+;   cp $58
+;   ccf
+;   ret
+
+; ENDIF