Add bigint support.

1 files changed, 8 insertions, 2 deletions

diff --git a/src/main/stanza/verilog.stanza b/src/main/stanza/verilog.stanza
index d39c89e4..ca47170b 100644
--- a/src/main/stanza/verilog.stanza
+++ b/src/main/stanza/verilog.stanza
@@ -65,8 +65,14 @@ defn emit-signed-if-any (e:Expression,ls:List<Expression>) -> String :
 defn emit (e:Expression) -> String :
    match(e) :
       (e:Ref) : to-string $ name(e)
-      (e:UIntValue) : string-join $ [width!(type(e)) "'" value(e)]
-      (e:SIntValue) : string-join $ [width!(type(e)) "'s" value(e)]
+      (e:UIntValue) : 
+         val str = to-string(value(e))
+         val out = substring(str,1,length(str) - 1)
+         string-join $ [width!(type(e)) "'" out]
+      (e:SIntValue) : ;string-join $ [width!(type(e)) "'s" value(e)]
+         val str = to-string(value(e))
+         val out = substring(str,1,length(str) - 1)
+         string-join $ [width!(type(e)) "'s" out]
       (e:Subfield) : error("Non-supported expression")
       (e:Index) : error("Non-supported expression")
       (e:DoPrim) :