aboutsummaryrefslogtreecommitdiff
path: root/snug-clean/src/MIPS/MIPS32.icl
diff options
context:
space:
mode:
authorCamil Staps2023-03-05 19:47:49 +0100
committerCamil Staps2023-03-05 19:47:49 +0100
commit4349838a315de8ac9ad51ca2e0fa6f80f24f9241 (patch)
treed030b1fee063cdef58c1e4cf294e3444f167e721 /snug-clean/src/MIPS/MIPS32.icl
parentRefactor, return MaybeError from lookupFunction and lookupConstructor (diff)
Implement ap
Diffstat (limited to 'snug-clean/src/MIPS/MIPS32.icl')
-rw-r--r--snug-clean/src/MIPS/MIPS32.icl1
1 files changed, 1 insertions, 0 deletions
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