From b32acb9a52a426087226284f4a1e2890cbdadc00 Mon Sep 17 00:00:00 2001
From: azidar
Date: Thu, 4 Feb 2016 09:23:19 -0800
Subject: Added Expand Whens pass

---
 src/main/stanza/ir-utils.stanza | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/main/stanza')

diff --git a/src/main/stanza/ir-utils.stanza b/src/main/stanza/ir-utils.stanza
index 3fc8b155..22ee228b 100644
--- a/src/main/stanza/ir-utils.stanza
+++ b/src/main/stanza/ir-utils.stanza
@@ -147,8 +147,8 @@ public defn children (e:Expression) -> List<Expression> :
 public var mname : Symbol = `blah
 public defn exp-hash (e:Expression) -> Int :
    turn-off-debug(false)
-   val i = symbol-hash(to-symbol(string-join(map(to-string,list(mname `.... e)))))
-   ;val i = symbol-hash(to-symbol(to-string(e)))
+   ;val i = symbol-hash(to-symbol(string-join(map(to-string,list(mname `.... e)))))
+   val i = symbol-hash(to-symbol(to-string(e)))
    turn-on-debug(false)
    i
 
-- 
cgit v1.2.3