From f36cddde006dac59e765e56e7d231bdef10dd54d Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Fri, 28 Jul 2017 11:05:38 +0200
Subject: Fixed toString for EqDescArity

It looks like EqDesc does not exist in current ABC code and EqDescArity
is now eq_desc.
---
 ABC/Assembler.icl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'ABC/Assembler.icl')

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]
-- 
cgit v1.2.3