aboutsummaryrefslogtreecommitdiff
path: root/src/main/stanza/errors.stanza
diff options
context:
space:
mode:
authorazidar2016-02-08 14:55:21 -0800
committerazidar2016-02-09 18:57:07 -0800
commitbae6ba5d2405ba1caf7400f15d8875d4a79b8bae (patch)
tree55345b1d4997c394efb4e6cdd83cd732807d7368 /src/main/stanza/errors.stanza
parent666a193706308a6fbd6c8b4bd06cbc69ae4200a6 (diff)
More bug fixes
Diffstat (limited to 'src/main/stanza/errors.stanza')
-rw-r--r--src/main/stanza/errors.stanza3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/main/stanza/errors.stanza b/src/main/stanza/errors.stanza
index 92f1b97e..4cc99049 100644
--- a/src/main/stanza/errors.stanza
+++ b/src/main/stanza/errors.stanza
@@ -240,7 +240,8 @@ public defn check-high-form (c:Circuit) -> Circuit :
defn check-high-form-w (w:Width) -> Width :
match(w) :
(w:IntWidth) :
- if width(w) <= to-long(0) : add(errors,NegWidth())
+ if width(w) <= to-long(0) :
+ add(errors,NegWidth())
w
(w) : w
defn check-high-form-t (t:Type) -> Type :