renaming and refactoring

[clinton/parenscript.git] / src / deprecated-interface.lisp

diff --git a/src/deprecated-interface.lisp b/src/deprecated-interface.lisp
new file mode 100644 (file)
index 0000000..74a4183
--- /dev/null
+++ b/src/deprecated-interface.lisp
@@ -0,0 +1,19 @@
+(in-package :parenscript)
+
+;;; DEPRECATED INTERFACE ;;;
+(defun js-equal (a b) (script-equal a b))
+
+(defun js-compile (form)
+  (compile-script form :output-spec :javascript))
+
+(defun js-compile-list (form)
+  (compile-script form :output-spec :javascript))
+
+(defun js-gensym (&rest args)
+  (apply #'script-gensym args))
+
+(defmacro defjsmacro (name args &rest body)
+  "Define a ParenScript macro, and store it in the toplevel ParenScript macro environment.
+
+DEPRECATED"
+  `(defscriptmacro ,name ,args ,@body))
\ No newline at end of file