fixed up the grand rebase and branch deletion work
[CommonLispStat.git] / lispstat.asd
blobc1432df5ac425a1f5053df8785ed3d3396b2bda0
1 ;;  -*- mode: lisp -*-
2 ;;; Copyright (c) 2005--2008, by AJ Rossini <blindglobe@gmail.com>
3 ;;; ASDF packaging for CommonLisp Stat
4 ;;; License: BSD, see the top level directory file LICENSE for details.
5 ;;; Time-stamp: <2008-08-27 21:34:22 tony>
6 ;;; Created:    <2005-05-30 17:09:47 blindglobe>
8 (in-package :cl-user)
10 (defvar *lispstat-home-dir*
11   (directory-namestring
12    (truename (asdf:system-definition-pathname :lispstat)))
13   "Value considered \"home\" for our data")
16   (setf *lispstat-home-dir*
17       (directory-namestring (truename (asdf:system-definition-pathname
18                                        :lispstat))))
21 (macrolet ((ls-dir (root-str)
22              `(pathname (concatenate 'string
23                                      (namestring *lispstat-home-dir*) ,root-str)))
25            (ls-defdir (target-dir-var  root-str)
26              `(defvar ,target-dir-var (ls-dir ,root-str))))
28   ;; reminder of testing
29   ;;(macroexpand '(ls-defdir *lispstat-asdf-dir* "ASDF"))
30   ;;(macroexpand-1 '(ls-defdir *lispstat-asdf-dir* "ASDF"))
31   ;;(macroexpand-1 '(ls-dir "ASDF"))
33   (ls-defdir *lispstat-asdf-dir* "ASDF/")
34   (ls-defdir *lispstat-data-dir* "data/")
35   (ls-defdir *lispstat-external-dir* "external/")
36   (ls-defdir *lispstat-examples-dir* "examples/"))
38 (pushnew *lispstat-asdf-dir* asdf:*central-registry*)
39 ;; (pushnew #p"C:/Lisp/libs/" asdf-util:*source-dirs* :test #'equal) ; eg for Microsoft
41 ;;; back to our regularly scheduled work...
42 ;;; We should not need these, I think, but?
43 ;; (asdf:oos 'asdf:compile-op :cffi)            ;; FFI
44 ;; (asdf:oos 'asdf:compile-op :lift)            ;; Unit Testing 
45 ;; (asdf:oos 'asdf:load-op :cffi)            ;; FFI
46 ;; (asdf:oos 'asdf:load-op :lift)            ;; Unit Testing 
48 ;;; MAJOR HACK, FIXME!
49 ;;(load "/media/disk/Desktop/sandbox/matlisp.git/start.lisp")
51 (in-package :cl-user)
53 (defpackage #:lispstat-system
54     (:use :common-lisp :asdf))
56 (in-package #:lispstat-system)
58 ;;; To avoid renaming everything from *.lsp to *.lisp...
59 ;;; borrowed from Cyrus Harmon's work, for example for the ch-util.
60 ;;; NOT secure against serving multiple architectures/hardwares from
61 ;;; the same file system (i.e. PPC and x86 would not be
62 ;;; differentiated). 
64 (defclass lispstat-lsp-source-file (cl-source-file) ())
65 (defparameter *fasl-directory*
66    (make-pathname :directory '(:relative
67                                #+sbcl "sbcl-fasl"
68                                #+openmcl "openmcl-fasl"
69                                #+cmu "cmucl-fasl"
70                                #+clisp "clisp-fasl"
71                                #-(or sbcl openmcl clisp cmucl) "fasl"
72                                )))
75 ;;; Handle Luke's *.lsp suffix
76 (defmethod source-file-type ((c lispstat-lsp-source-file) (s module)) "lsp")
77 (defmethod asdf::output-files :around ((operation compile-op)
78                                        (c lispstat-lsp-source-file))
79   (list (merge-pathnames *fasl-directory*
80                          (compile-file-pathname (component-pathname c)))))
81 ;;; again, thanks to Cyrus for saving me time...
84 (defsystem "lispstat"
85   :version #.(with-open-file
86                  (vers (merge-pathnames "version.lisp-expr" *load-truename*))
87                (read vers))
88   :author "A.J. Rossini <blindglobe@gmail.com>"
89   :license "BSD"
90   :description "CommonLispStat (CLS): A System for Statistical
91   Computing with Common Lisp; based on CLS alpha1 by Luke Tierney
92   <luke@stat.uiowa.edu> (apparently originally written when Luke was
93   at CMU, on leave somewhere?).   Last touched by him in 1991, then in
94   2005--2008." 
95   :serial t
96   :depends-on (:cffi  :lift) ;;  :lisp-matrix need a matrix library
97   :components ((:static-file "version" :pathname #p"version.lisp-expr")
98                (:static-file "LICENSE")
99                (:static-file "README")
101                (:module "proto-objects"
102                         :pathname "src/objsys/"
103                         :components
104                         ((:lispstat-lsp-source-file "lsobjects")))
106                (:module "lispstat-core"
107                         :pathname "src/basics/"
108                         :serial t
109                         :depends-on ("proto-objects")
110                         :components
111                         ((:lispstat-lsp-source-file "defsys")
112                          (:lispstat-lsp-source-file "lstypes")
113                          (:lispstat-lsp-source-file "lsfloat")
114                          
115                          (:lispstat-lsp-source-file "compound")
116                          (:lispstat-lsp-source-file "lsmacros" 
117                                                     :depends-on ("compound"))
118                          
119                          (:lispstat-lsp-source-file "lsmath"
120                                                     :depends-on ("compound"
121                                                                  "lsmacros"
122                                                                  "lsfloat"))))
124                (:module
125                 "numerics-internal"
126                 :pathname "src/numerics/"
127                 :depends-on ("proto-objects" "lispstat-core")
128                 :components
129                 ((:lispstat-lsp-source-file "cffiglue")
130                  (:lispstat-lsp-source-file "dists"
131                                             :depends-on ("cffiglue"))
132                  (:lispstat-lsp-source-file "matrices"
133                                             :depends-on ("cffiglue"))
134                  (:lispstat-lsp-source-file "ladata"
135                                             :depends-on ("cffiglue"
136                                                          "matrices"))
137                  (:lispstat-lsp-source-file "linalg"
138                                             :depends-on ("cffiglue"
139                                                          "matrices"
140                                                          "ladata"))))
142                (:module
143                 "stat-data"
144                 :pathname "src/data/"
145                 :depends-on ("proto-objects"
146                              "lispstat-core"
147                              "numerics-internal")
148                 :components
149                 (;; (:file "data-clos")
150                  (:file "data")))
152                (:module
153                 "lispstat-basics"
154                 :pathname "src/basics/"
155                 :depends-on ("proto-objects"
156                              "lispstat-core"
157                              "numerics-internal"
158                              "stat-data")
159                 :components
160                 ((:lispstat-lsp-source-file "lsbasics")))
163                (:module
164                 "descriptives"
165                 :pathname "src/describe/"
166                 :depends-on ("proto-objects"
167                              "lispstat-core"
168                              "numerics-internal"
169                              "stat-data"
170                              "lispstat-basics")
171                 :components
172                 ((:lispstat-lsp-source-file "statistics")))
174                (:module
175                 "optimization"
176                 :pathname "src/numerics/"
177                 :depends-on ("proto-objects"
178                              "lispstat-core"
179                              "numerics-internal"
180                              "stat-data"
181                              "lispstat-basics")
182                 :components
183                 ((:file "optimize")))
184                  
185                
186                ;; Applications
187                (:module
188                 "stat-models"
189                 :pathname "src/stat-models/"
190                 :depends-on ("proto-objects"
191                              "lispstat-core"
192                              "numerics-internal"
193                              "lispstat-basics"
194                              "descriptives"
195                              "optimization")
196                 :components
197                 ((:lispstat-lsp-source-file "regression")
198                  ;; (:lispstat-lsp-source-file "nonlin"
199                  ;;       :depends-on ("regression"))
200                  ;; (:lispstat-lsp-source-file "bayes"
201                  ;;       :depends-on ("proto-objects"
202                  ;;                    "lsmath"
203                  ;;                    "dists"))
204                  ))
206                (:module
207                 "lisp-stat-user"
208                 :pathname "src/"
209                 :depends-on  ("proto-objects"
210                               "lispstat-core"
211                               "numerics-internal" 
212                               "stat-data"
213                               "lispstat-basics"
214                               "descriptives"
215                               "optimization"
216                               "stat-models")
217                 :components ((:file "ls-user")))
219                (:module
220                  "lisp-stat-unittest"
221                  :depends-on ( "lisp-stat-user" ) ;; shouldn't need :lift!
222                  :pathname "src/unittests/"
223                  :components ((:file "unittests")
224                               (:file "unittests-lstypes")
225                               ;;  "unittests-arrays.lisp"
226                               ;;  "unittests-data-clos.lisp"
227                               ;;  "unittests-proto.lisp"
228                               ;;  "unittests-regression.lisp"
229                               ))))