From a8979a7b1ed69740eb6c7c00c934e2fadd129322 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 2 Aug 2018 23:23:20 -0400
Subject: Moved statement-state initialization o "lux/compiler/default/init".

---
 luxc/src/lux/type.clj | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'luxc')

diff --git a/luxc/src/lux/type.clj b/luxc/src/lux/type.clj
index 66a072a10..6fe47dbf9 100644
--- a/luxc/src/lux/type.clj
+++ b/luxc/src/lux/type.clj
@@ -21,7 +21,7 @@
     _
     false))
 
-(def max-env-size 128)
+(def max-stack-size 256)
 
 (def empty-env &/$Nil)
 
@@ -753,7 +753,7 @@
         
         [(&/$Apply A F) _]
         (let [fp-pair (&/T [expected actual])
-              _ (when (> (&/|length fixpoints) max-env-size)
+              _ (when (> (&/|length fixpoints) max-stack-size)
                   (&/|log! (println-str 'FIXPOINTS (->> (&/|keys fixpoints)
                                                         (&/|map (fn [pair]
                                                                   (|let [[e a] pair]
-- 
cgit v1.2.3