1 #!/bin/sh
2 #|
3 exec sbcl --dynamic-space-size 4096 --script "build.lisp"
4 |#
5 (let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp"
6                                        (user-homedir-pathname))))
7   (when (probe-file quicklisp-init)
8     (load quicklisp-init)))
9 (push (probe-file #P".") asdf:*central-registry*)
10 
11 (sb-ext:restrict-compiler-policy 'speed 3 3)
12 (push :release *features*)
13 
14 (ql:quickload :aoc)
15 (loop for day from 1 to 25
16       for system-name = (format nil "aoc/day-~A" day)
17       for system = (asdf:find-system system-name nil)
18       when system
19         do (ql:quickload system-name))
20 (sb-ext:save-lisp-and-die "aoc"
21                           :toplevel #'aoc:main
22                           :executable t
23                           :save-runtime-options t)