hg.stevelosh.com > sand

src/parenscript/compiler.lisp @ da570ce8525a 

Swap vectors and lists, it feels better
author Steve Losh <steve@stevelosh.com>
date Mon, 09 Jan 2017 19:26:35 +0000
parents 184af4c4e8fc
children (none) 
(in-package :sand.parenscript)

(defun compile-parenscript-file (source)
  (let* ((source-path (pathname source))
         (target-path (make-pathname :type "js"
                                     :defaults source-path)))
    (with-open-file (output target-path
                            :direction :output
                            :if-exists :supersede)
      (write-string (ps-compile-file source-path) output)))
  (values))