From 8eec7cf373bdf02f23164cd7bbf0d02354cbc31f Mon Sep 17 00:00:00 2001
From: azidar
Date: Wed, 19 Aug 2015 17:12:52 -0700
Subject: Check Neg UInt in the parser

---
 src/main/stanza/errors.stanza | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/main/stanza/errors.stanza')

diff --git a/src/main/stanza/errors.stanza b/src/main/stanza/errors.stanza
index bfeb980b..5c77c2a4 100644
--- a/src/main/stanza/errors.stanza
+++ b/src/main/stanza/errors.stanza
@@ -6,7 +6,7 @@ defpackage firrtl/errors :
    import firrtl/primops
    import firrtl/passes
    import firrtl-main
-   import bigint
+   import bigint2
 
 ; TODO
 ; make sure it compiles, write tests, look over code to make sure its right
@@ -281,8 +281,8 @@ public defn check-high-form (c:Circuit) -> Circuit :
                (e:Ref|Subfield|Index) : false
                (e) : add(errors,InvalidIndex(info))
          (e:DoPrim) : check-high-form-primop(e,errors,info)
-         (e:UIntValue) :
-            if neg?(value(e)) : add(errors,NegUInt(info))
+         (e:UIntValue) : false
+            ;if neg?(value(e)) : add(errors,NegUInt(info))
          (e) : false
       map(check-high-form-w{info,_:Width},e)
       map(check-high-form-t{info,_:Type},e)
-- 
cgit v1.2.3