src/parenscript/compiler.lisp @ 1b413ff8aa5f
Add Polya's Urn
author | Steve Losh <steve@stevelosh.com> |
---|---|
date | Sat, 12 Nov 2016 12:51:30 +0000 |
parents | 277982735a9d |
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))