aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEduardo Julian2019-03-13 18:13:59 -0400
committerEduardo Julian2019-03-13 18:13:59 -0400
commit5f874796c9c98dfaff03540f6fb0d6cfdb1d612b (patch)
tree49913699664561c1d4eaaa6c84f8d38ec88fa542
parent54d28f88a4293513621bd8ce5c26e3e6e74f345b (diff)
Temporarily disabled JS-code nesting since it's only useful for debugging.
-rw-r--r--stdlib/source/lux/host/js.lux17
1 files changed, 9 insertions, 8 deletions
diff --git a/stdlib/source/lux/host/js.lux b/stdlib/source/lux/host/js.lux
index ffc45fd7d..e16c99c38 100644
--- a/stdlib/source/lux/host/js.lux
+++ b/stdlib/source/lux/host/js.lux
@@ -167,17 +167,18 @@
text.new-line
(:representation post))))
- (def: nest
- (-> Text Text)
- (text.replace-all text.new-line (format text.new-line text.tab)))
+ ## (def: nest
+ ## (-> Text Text)
+ ## (text.replace-all text.new-line (format text.new-line text.tab)))
(def: block
(-> Statement Text)
- (|>> :representation
- (format text.new-line)
- ..nest
- (text.enclose ["{"
- (format text.new-line "}")])))
+ (let [close (format text.new-line "}")]
+ (|>> :representation
+ (format text.new-line)
+ ## ..nest
+ (text.enclose ["{"
+ close]))))
(def: #export (function name inputs body)
(-> Var (List Var) Statement Computation)