- Added try-catch procedure to JS backend.

1 files changed, 13 insertions, 1 deletions

diff --git a/luxc/src/lux/compiler/js/rt.clj b/luxc/src/lux/compiler/js/rt.clj
index 2416445e5..e6a50b373 100644
--- a/luxc/src/lux/compiler/js/rt.clj
+++ b/luxc/src/lux/compiler/js/rt.clj
@@ -1375,11 +1375,23 @@
                     "})")
      }))
 
+(def ^:private lux-methods
+  {"runTry" (str "(function runTry(op) {"
+                 (str "try {"
+                      (str "return [1,'',op(null)];")
+                      "}"
+                      "catch(ex) {"
+                      (str "return [0,null,ex.toString()];")
+                      "}")
+                 "})")
+   })
+
 (def LuxRT "LuxRT")
 
 (def compile-LuxRT
   (|do [_ (&&/run-js! "var console = { log: print };")
-        :let [rt-object (str "{" (->> (merge adt-methods
+        :let [rt-object (str "{" (->> (merge lux-methods
+                                             adt-methods
                                              i64-methods
                                              n64-methods
                                              text-methods