aboutsummaryrefslogtreecommitdiff
path: root/appveyor-build.lisp
blob: ca81db1500e804bbc8fe5f0e599e1c65a890cc5a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
;; -*- mode: common-lisp; -*-
#-quicklisp
(let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp"
                                       (user-homedir-pathname))))
  (when (probe-file quicklisp-init)
    (load quicklisp-init)))
#+(and gmp sbcl) (require 'sb-gmp)
#+(and sbcl gmp) (sb-gmp:install-gmp-funs)
(ql:update-client
 :prompt nil)
(ql:update-all-dists
 :prompt nil)
#|
(when (and
(ql-dist:find-dist "ultralisp")
(ql-dist:installedp (ql-dist:find-dist "ultralisp")))
(ql-dist:install-dist "http://dist.ultralisp.org/"
:prompt nil))
|#
(ql:quickload (loop for i in (asdf:system-depends-on (asdf:find-system :yadfa))
                    when (stringp i) collect i
                      when (and (listp i) (eq (first i) :feature) (uiop:featurep (second i))) collect (third i)))
(declaim (optimize (debug 2) safety))
(setf *read-default-float-format* 'long-float)
(ql:quickload :yadfa)
(setf yadfa::*immutable* t)
(asdf:make :yadfa)
(uiop:quit)