From: David Vazquez <davazp@gmail.com>
Date: Thu, 20 Dec 2012 17:52:36 +0000 (+0000)
Subject: error is an expression now
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=609420871a3b63fbe2d2d9cc441a3efbc958cdde;p=jscl.git

error is an expression now
---

diff --git a/lispstrack.lisp b/lispstrack.lisp
index 90b723f..38b6f96 100644
--- a/lispstrack.lisp
+++ b/lispstrack.lisp
@@ -530,7 +530,7 @@
           ")"))
 
 (define-compilation error (string)
-  (concat "console.error(" (ls-compile string env fenv) ")"))
+  (concat "(function (){ throw " (ls-compile string env fenv) ";" "return 0;})()"))
 
 (define-compilation new ()
   "{}")