src/parenscript/compiler.lisp @ 277982735a9d
Poke at Parenscript
author | Steve Losh <steve@stevelosh.com> |
---|---|
date | Sat, 09 Jul 2016 16:00:42 +0000 |
parents | (none) |
children | 184af4c4e8fc |
(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))