ERROR

diff --git a/lispstrack.lisp b/lispstrack.lisp
index ee1aab7..2febb3a 100644 (file)
--- a/lispstrack.lisp
+++ b/lispstrack.lisp
@@ -473,6 +473,10 @@
                 ", ")
           ")"))
 
+(define-compilation error (string)
+  (concat "console.error(" (ls-compile string env fenv) ")"))
+
+
 (define-compilation new ()
   "{}")