#!/usr/local/bin/utilisp 
(defun load-directory (dir)
  (lets ((base-directory dir))
	(exfile (string-append base-directory "/" "load.l"))))
(load-directory "../renderer/")
(load-directory "../primdata/")
(load-directory "../jointdata/")
(load-directory "../kanjidata/")
(out-to-ps-all alljis 'mincho "alljis.ps")