1 ;;; Basic initialization for LispStat
2 ;;; Time-stamp: <2007-06-25 09:07:38 ROSSIAN6>
3 ;;; Created: <2007-05-30 17:09:47 ROSSIAN6>
7 ;; Associate ASDF directory for loading.
8 ;; Make sure that we have initialized any locally defined global variables
9 ;; ensure appropriate tools are linked in for loading.
10 ;; i.e. if features don't exist, load from particular locations in this directory structure.
12 (defvar *lispstat-homedir
* #p
"/cygdrive/c/local/sandbox/Lisp/CommonLispStat/"
13 "Value considered \"home\" for our data")
14 (defvar *tony-local-lispdirstr
* (namestring *tony-local-lispdir
*)
15 "Value considered \"home\" for our data")
19 (load (pathname (concatenate 'string
(namestring *tony-local-lispdir
*) "asdf")))
20 (load (pathname (concatenate 'string
(namestring *tony-local-lispdir
*) "pcl-portable-files"))))
23 ;; (pushnew #p"C:/Lisp/libs/" asdf-util:*source-dirs* :test #'equal)
24 (pushnew (pathname (concatenate 'string
(namestring *lispstat-homedir
*) "ASDF"))
25 ;;"/cygdrive/c/local/sandbox/Lisp/asdf-packages/")
26 asdf
:*central-registry
*)
27 (asdf:oos
'asdf
:load-op
:cffi
)
28 (asdf:oos
'asdf
:load-op
:lisp-unit
)
29 (asdf:oos
'asdf
:load-op
:cells
)
30 (asdf:oos
'asdf
:load-op
:lisp-stat
))
33 (asdf:oos
'asdf
:compile-op
:cffi
)
34 (asdf:oos
'asdf
:compile-op
:lisp-unit
)
35 (asdf:oos
'asdf
:compile-op
:rclg
)
36 (asdf:oos
'asdf
:compile-op
:cl-cairo2
)
37 (asdf:oos
'asdf
:load-op
:celtk
))