diff options
-rw-r--r-- | stdlib/source/lux/host/js.lux | 17 |
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) |