Basic ASD

compile.lisp

@@ -4,11 +4,17 @@ exec sbcl \
   --disable-debugger \
   --eval "(ql:quickload '(clip shasht pathname-utils) :silent T)" \
   --load "$0" \
-  --eval '(main)' \
+  --eval '(promptfont-compiler::main)' \
   --quit \
   --end-toplevel-options "${@:1}"
 |#
 
+(defpackage #:promptfont-compiler
+  (:use #:cl)
+  (:export))
+
+(in-package #:promptfont-compiler)
+
 (defvar *here* #.(make-pathname :name NIL :type NIL :defaults 
                                 (or *compile-file-pathname* *load-pathname* (error "LOAD this file."))))
 

promptfont-compiler.asd

@@ -0,0 +1,6 @@
+(asdf:defsystem promptfont-compiler
+  :components ((:file "compile.lisp"))
+  :build-operation "program-op"
+  :build-pathname "promptfont-compiler"
+  :entry-point "promptfont-compiler::main"
+  :depends-on (:clip :shasht :pathname-utils))