From 4349838a315de8ac9ad51ca2e0fa6f80f24f9241 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Sun, 5 Mar 2023 19:47:49 +0100
Subject: Implement ap

---
 snug-clean/src/MIPS/MIPS32.icl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'snug-clean/src/MIPS/MIPS32.icl')

diff --git a/snug-clean/src/MIPS/MIPS32.icl b/snug-clean/src/MIPS/MIPS32.icl
index ca5cbee..655219d 100644
--- a/snug-clean/src/MIPS/MIPS32.icl
+++ b/snug-clean/src/MIPS/MIPS32.icl
@@ -13,6 +13,7 @@ where
 	toString (Instr i) = "\t" +++ toString i
 	toString (RawByte i) = "\t.byte\t" +++ toString i
 	toString (RawWord i) = "\t.word\t" +++ toString i
+	toString (RawWordLabel l) = "\t.word\t" +++ l
 	toString (RawAscii s) = concat3 "\t.ascii\t\"" s "\"" // TODO: escaping
 
 instance toString Instruction
-- 
cgit v1.2.3