aboutsummaryrefslogtreecommitdiff
path: root/src/main/stanza/passes.stanza
diff options
context:
space:
mode:
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>()