aboutsummaryrefslogtreecommitdiff
path: root/src/main/stanza/passes.stanza
diff options
context:
space:
mode:
authorazidar2015-07-21 12:16:08 -0700
committerazidar2015-07-21 12:16:08 -0700
commit86dfd891ee40a9ff367984ec285013cc8e5b37c3 (patch)
treec7a0b368dde1fa05265958754801f63267c80951 /src/main/stanza/passes.stanza
parent306206f0aba4e9094ce267c1a8f0d8ee022c4f00 (diff)
Fixed bug in fix :P
Diffstat (limited to 'src/main/stanza/passes.stanza')
-rw-r--r--src/main/stanza/passes.stanza3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/main/stanza/passes.stanza b/src/main/stanza/passes.stanza
index 1280e379..33ef666c 100644
--- a/src/main/stanza/passes.stanza
+++ b/src/main/stanza/passes.stanza
@@ -1619,7 +1619,8 @@ public defn expand-whens (c:Circuit) -> Circuit :
val referenced? = HashTable<Symbol,True>(symbol-hash)
for x in table do :
mark-referenced(referenced?,value(x))
- referenced?[key(x)] = true
+ if value(x) != SVNul() :
+ referenced?[key(x)] = true
for x in decs do :
mark-referenced(referenced?,x)
val decs* = Vector<Stmt>()