aboutsummaryrefslogtreecommitdiff
path: root/ABC/Assembler.icl
diff options
context:
space:
mode:
authorCamil Staps2017-07-28 11:05:38 +0200
committerCamil Staps2017-07-28 11:05:38 +0200
commitf36cddde006dac59e765e56e7d231bdef10dd54d (patch)
tree163bab20fb9cc291ac02b26514063dbf8e4fde21 /ABC/Assembler.icl
parentFix printing of booleans (diff)
Fixed toString for EqDescArity
It looks like EqDesc does not exist in current ABC code and EqDescArity is now eq_desc.
Diffstat (limited to 'ABC/Assembler.icl')
-rw-r--r--ABC/Assembler.icl1
1 files changed, 1 insertions, 0 deletions
diff --git a/ABC/Assembler.icl b/ABC/Assembler.icl
index 0d90e90..5dec73f 100644
--- a/ABC/Assembler.icl
+++ b/ABC/Assembler.icl
@@ -57,6 +57,7 @@ gPrint{|CONS of d|} fx (CONS x) = case d.gcd_name of
"Comment" = ['| '] ++ fx x
"Annotation" = fx x
"Raw" = fx x
+ "EqDescArity" = ['eq_desc\t'] ++ fx x
name = tl (cons (fromString name)) ++ ['\t':fx x]
where
cons :: ![Char] -> [Char]