Monorepo for Aesthetic.Computer
aesthetic.computer
1;;; Quick test: load the system and report errors
2(load "/opt/quicklisp/setup.lisp")
3(require :asdf)
4(push #P"/repo/fedac/native/cl/" asdf:*central-registry*)
5(handler-case
6 (progn
7 (asdf:load-system :ac-native)
8 (format t "~&=== SYSTEM LOADED OK ===~%"))
9 (error (e)
10 (format t "~&=== LOAD ERROR ===~%~A~%" e)
11 (sb-ext:exit :code 1)))