hello-world-example.asd 772 Bytes
Newer Older
1 2
;; Example executable program

3 4 5 6 7 8
#.`(defsystem :hello-world-example
     ;; :build-operation program-op ; this would cause the executable output in same directory :-/
     :entry-point "hello:entry-point"
     :depends-on (:uiop)
     :components ((:file "hello"))
     #+mkcl
9
     ,@`(;;:prefix-lisp-object-files (,(namestring (truename (translate-logical-pathname #P"SYS:cmp.a"))))
10
         :extra-build-args ,(or #-os-windows '(:use-mkcl-shared-libraries nil))
11
         :class program-system
12 13 14 15
         :epilogue-code (progn
                          (setq uiop/image:*image-dumped-p* :executable)
                          (setq uiop/image:*lisp-interaction* nil)
                          (uiop/image:restore-image :entry-point (read-from-string "hello:entry-point")))))