Added javascript s-expression syntax

rob7hunter · Nov 8, 2008 · f776e2e · f776e2e
1 parent 45d5301
commit f776e2e
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 2 deletions.
diff --git a/js.scm b/js.scm
@@ -1,12 +1,20 @@
 #lang scheme/base
 
-(require "util.scm")
+(require "util.scm"
+         (planet "javascript.ss" ("jaymccarthy" "javascript.plt" 1 2)))
 
 (provide js-script-invoke
          js-array
          js-quote
          js-call
          js-call-on-load
+         ;;Javascript s-expression syntax
+         js
+         javascript
+         javascript-marshal
+         javascript-unmarshal
+         javascript->string
+         string->javascriptx
          )
 
 (define (js-script-invoke . js-strs)

diff --git a/leftparen.scm b/leftparen.scm
@@ -137,7 +137,13 @@
  js-quote
  js-call
  js-call-on-load
-
+ js
+ javascript
+ javascript-marshal
+ javascript-unmarshal
+ javascript->string
+ string->javascript
+
  ;; html, pages, includes, etc
  define-page
  define-session-page