test: add test

Author: boriel

tests/arch/zx48k/optimizer/test_optimizer.py

@@ -1,6 +1,4 @@
 from contextlib import contextmanager
-from unittest import mock
-
 
 from src.arch.z80 import optimizer
 from src.arch.z80.peephole import engine
@@ -41,4 +39,4 @@ def test_unrequired_or_a(self):
 
         with mock_options_level(4):
             optimized_code = optimizer.optimize(code)
-            pass
+            assert optimized_code.split("\n")[:2] == ["call .core.__LTI8", "ld bc, 0"]

tests/functional/zx48k/opt4_poke.asm

@@ -0,0 +1,48 @@
+	org 32768
+.core.__START_PROGRAM:
+	di
+	push ix
+	push iy
+	exx
+	push hl
+	exx
+	ld hl, 0
+	add hl, sp
+	ld (.core.__CALL_BACK__), hl
+	ei
+	jp .core.__MAIN_PROGRAM__
+.core.__CALL_BACK__:
+	DEFW 0
+.core.ZXBASIC_USER_DATA:
+	; Defines USER DATA Length in bytes
+.core.ZXBASIC_USER_DATA_LEN EQU .core.ZXBASIC_USER_DATA_END - .core.ZXBASIC_USER_DATA
+	.core.__LABEL__.ZXBASIC_USER_DATA_LEN EQU .core.ZXBASIC_USER_DATA_LEN
+	.core.__LABEL__.ZXBASIC_USER_DATA EQU .core.ZXBASIC_USER_DATA
+_dir:
+	DEFB 00, 00
+_n:
+	DEFB 00
+.core.ZXBASIC_USER_DATA_END:
+.core.__MAIN_PROGRAM__:
+	ld hl, 22528
+	ld (_dir), hl
+.LABEL.__LABEL0:
+	ld a, (_n)
+	ld hl, (_dir)
+	ld (hl), a
+	ld hl, _n
+	inc (hl)
+	jp .LABEL.__LABEL0
+.core.__END_PROGRAM:
+	di
+	ld hl, (.core.__CALL_BACK__)
+	ld sp, hl
+	exx
+	pop hl
+	pop iy
+	pop ix
+	exx
+	ei
+	ret
+	;; --- end of user code ---
+	END

tests/functional/zx48k/opt4_poke.bas

@@ -0,0 +1,12 @@
+DIM dir as UInteger
+DIM n as UByte
+' Imprmimos una X
+' Obtenemos la dirección del atributo
+dir = 16384 + 6144
+' Bucle infinito
+DO
+    ' Cambiamos el atributo con un poke (no borra la X)
+    poke dir,n
+    ' Incrementamos el atributo
+    n=n+1
+LOOP