#lang scheme/base

(require scheme/contract
         "private/syntax/parse.ss"
         "private/syntax/sexp.ss"
         (prefix-in eval: "private/runtime/eval.ss")
         "private/runtime/namespace.ss")

;;; (or input-source syntax) * [js-namespace] -> any
;(define (js-eval src [ns (make-js-namespace)])
;  (cond
;    [(syntax? src) (eval:eval-compiled-javascript src ns)]
;    [else (eval:eval-javascript-string src ns)]))
;
;;; sexp * [js-namespace] -> any
;(define (js-eval/sexp src [ns (make-js-namespace)])
;  (eval:eval-javascript src ns))
;
;(provide/contract [js-eval (((or/c input-source? syntax?)) (namespace?) . ->* . any)]
;                  [js-eval/sexp ((sexp?) (namespace?) . ->* . any)])