hg.stevelosh.com > sand

src/parenscript/compiler.lisp @ 175fccc805fc 

Add the first random distribution algorithm
author Steve Losh <steve@stevelosh.com>
date Sat, 23 Jul 2016 19:07:55 +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))