From 0b2be69481e964d3f967bc28c8af97866d3aad08 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Rados=C5=82aw=20Kujawa?= <radoslaw.kujawa@c0ff33.net>
Date: Wed, 28 Mar 2018 13:18:44 +0200
Subject: [PATCH] Add test case for ASL.

---
 test/test_emulation.c     | 29 +++++++++++++++++++++++++++++
 test/test_emulation_asl.s |  7 +++++++
 2 files changed, 36 insertions(+)
 create mode 100644 test/test_emulation_asl.s

diff --git a/test/test_emulation.c b/test/test_emulation.c
index 2e317f7..8005df4 100644
--- a/test/test_emulation.c
+++ b/test/test_emulation.c
@@ -542,6 +542,34 @@ ATF_TC_BODY(emul_and, tc)
 	bus_finish(&b);
 }
 
+ATF_TC_WITHOUT_HEAD(emul_asl);
+ATF_TC_BODY(emul_asl, tc)
+{
+	rk65c02emu_t e;
+	bus_t b;
+
+	b = bus_init_with_default_devs();
+	e = rk65c02_init(&b);
+
+	e.regs.A = 0xAA;
+	e.regs.X = 0x1;
+	bus_write_1(&b, 0x10, 0xAA);
+	bus_write_1(&b, 0x11, 0xAA);
+	bus_write_1(&b, 0x300, 0xFF);
+	bus_write_1(&b, 0x301, 0xFF);
+
+	ATF_REQUIRE(rom_start(&e, "test_emulation_asl.rom", tc));
+
+	ATF_CHECK(e.regs.A == 0x54);
+	ATF_CHECK(bus_read_1(&b, 0x10) == 0x54);
+	ATF_CHECK(bus_read_1(&b, 0x11) == 0x54);
+	ATF_CHECK(bus_read_1(&b, 0x300) == 0xFE);
+	ATF_CHECK(bus_read_1(&b, 0x301) == 0xFE);
+	ATF_CHECK(e.regs.P & P_CARRY);
+
+	bus_finish(&b);
+}
+
 ATF_TC_WITHOUT_HEAD(emul_nop);
 ATF_TC_BODY(emul_nop, tc)
 {
@@ -1351,6 +1379,7 @@ ATF_TC_BODY(emul_smb, tc)
 ATF_TP_ADD_TCS(tp)
 {
 	ATF_TP_ADD_TC(tp, emul_and);
+	ATF_TP_ADD_TC(tp, emul_asl);
 	ATF_TP_ADD_TC(tp, emul_adc_16bit);
 	ATF_TP_ADD_TC(tp, emul_adc_bcd);
 	ATF_TP_ADD_TC(tp, emul_bit);
diff --git a/test/test_emulation_asl.s b/test/test_emulation_asl.s
new file mode 100644
index 0000000..87877b6
--- /dev/null
+++ b/test/test_emulation_asl.s
@@ -0,0 +1,7 @@
+start:	asl A
+	asl 0x10
+	asl 0x10,X
+	asl 0x300
+	asl 0x300,X
+	stp
+