/[mcclim]/mcclim/mcclim.asd
ViewVC logotype

Contents of /mcclim/mcclim.asd

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.85 - (hide annotations)
Wed Feb 27 21:53:36 2013 UTC (13 months, 3 weeks ago) by rgoldman
Branch: MAIN
CVS Tags: HEAD
Changes since 1.84: +110 -159 lines
Modify building for ACL and clisp for both ASDF2 and ASDF3
1 afuchs 1.1 ;;; -*- Mode: Lisp -*-
2    
3     ;;; (c) copyright 1998,1999,2000 by Michael McDonald (mikemac@mikemac.com)
4     ;;; (c) copyright 2000 by
5     ;;; Robert Strandh (strandh@labri.u-bordeaux.fr)
6     ;;; (c) copyright 2005 by
7 rgoldman 1.85 ;;; Andreas Fuchs (asf@boinkor.net)
8 afuchs 1.1 ;;;
9     ;;; This library is free software; you can redistribute it and/or
10     ;;; modify it under the terms of the GNU Library General Public
11     ;;; License as published by the Free Software Foundation; either
12     ;;; version 2 of the License, or (at your option) any later version.
13     ;;;
14     ;;; This library is distributed in the hope that it will be useful,
15     ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
16     ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17     ;;; Library General Public License for more details.
18     ;;;
19     ;;; You should have received a copy of the GNU Library General Public
20     ;;; License along with this library; if not, write to the
21     ;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
22     ;;; Boston, MA 02111-1307 USA.
23    
24    
25     ;;; Really, I wouldn't bother with anything but ASDF. Almost every lisp
26     ;;; ships with it, and it has the added benefit of ASDF-INSTALL.
27     ;;; Get ASDF, and be welcome to the 21st century. -- [2005-01-31:asf]
28    
29     (defpackage :mcclim.system
30     (:use :asdf :cl))
31     (in-package :mcclim.system)
32    
33     (defparameter *clim-directory* (directory-namestring *load-truename*))
34    
35 thenriksen 1.33 (eval-when (:compile-toplevel :load-toplevel :execute)
36     (defun find-swank-package ()
37     (find-package :swank))
38     (defun find-swank-system ()
39 rgoldman 1.85 (handler-case (find-system :swank)
40     (missing-component ())))
41 thenriksen 1.33 (defun find-swank ()
42     (or (find-swank-package)
43 thenriksen 1.46 (find-swank-system)))
44 thenriksen 1.47 (defun dep-on-swank ()
45     (if (and (find-swank-system)
46     (not (find-package :swank)))
47 thenriksen 1.49 '(:and)
48     '(:or)))
49 thenriksen 1.46 (defun ifswank ()
50     (if (find-swank)
51 thenriksen 1.49 '(:and)
52     '(:or))))
53 thenriksen 1.33
54 afuchs 1.1 ;;; Legacy CMUCL support stuff
55     #+cmu
56     (progn
57     (unless (fboundp 'ext:stream-read-char)
58     (unless (ignore-errors (ext:search-list "gray-streams:"))
59     (setf (ext:search-list "gray-streams:")
60 rgoldman 1.85 '("target:pcl/" "library:subsystems/")))
61 afuchs 1.4 (if (fboundp 'extensions:without-package-locks)
62 rgoldman 1.85 (extensions:without-package-locks
63     (load "gray-streams:gray-streams-library"))
64 afuchs 1.1 (load "gray-streams:gray-streams-library")))
65 dlichteblau 1.68 #-(or clx clim-gtkairo clim-graphic-forms)
66 afuchs 1.1 (require :clx)
67     #+mp (when (eq mp::*initial-process* mp::*current-process*)
68 rgoldman 1.85 (format t "~%~%You need to run (mp::startup-idle-and-top-level-loops) to start up the multiprocessing support.~%~%")))
69 afuchs 1.1
70 afuchs 1.5 ;;; Make CLX asdf-loadable on Allegro 6.2
71 rgoldman 1.85 ;;; possibly this should be further refined to function properly for
72 afuchs 1.5 ;;; Allegro on Windows platforms. [2005/04/18:rpg]
73 tmoore 1.16
74 afuchs 1.5 #+allegro
75 rgoldman 1.85 (defsystem :clx
76     :components ((:file "require-clx")))
77 afuchs 1.5
78 rschlatte 1.84 ;;; Clozure CL native GUI stuff
79 dlichteblau 1.67 #+clim-beagle
80 rschlatte 1.84 (require :cocoa)
81 rschlatte 1.64
82 afuchs 1.1 (defsystem :clim-lisp
83     :components
84     (;; First possible patches
85     (:file "patch")
86     (:module "Lisp-Dep"
87     :depends-on ("patch")
88     :components
89     ((:file #+cmu "fix-cmu"
90 rgoldman 1.85 #+scl "fix-scl"
91 afuchs 1.1 #+excl "fix-acl"
92     #+sbcl "fix-sbcl"
93     #+openmcl "fix-openmcl"
94     #+lispworks "fix-lispworks"
95     #+clisp "fix-clisp")))
96 afuchs 1.25 (:file "package" :depends-on ("Lisp-Dep" "patch"))))
97 afuchs 1.1
98 thenriksen 1.33 (defsystem :clim-basic
99 rgoldman 1.77 :depends-on (:clim-lisp :spatial-trees (:version "flexichain" "1.5.1"))
100 afuchs 1.1 :components ((:file "decls")
101 rgoldman 1.85 (:file "protocol-classes" :depends-on ("decls"))
102 afuchs 1.1 (:module "Lisp-Dep"
103     :depends-on ("decls")
104     :components
105 afuchs 1.26 ((:file #.(first
106     (list
107     #+(and :cmu :mp (not :pthread)) "mp-cmu"
108     #+scl "mp-scl"
109     #+sb-thread "mp-sbcl"
110     #+excl "mp-acl"
111     #+openmcl "mp-openmcl"
112     #+lispworks "mp-lw"
113     #| fall back |# "mp-nil")))))
114 afuchs 1.1 (:file "utils" :depends-on ("decls" "Lisp-Dep"))
115 tmoore 1.8 (:file "design" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "utils"))
116     (:file "X11-colors" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "design"))
117     (:file "coordinates" :depends-on ("decls" "protocol-classes" "Lisp-Dep"))
118 afuchs 1.1 (:file "setf-star" :depends-on ("decls" "Lisp-Dep"))
119 tmoore 1.8 (:file "transforms" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "coordinates" "utils"))
120 thenriksen 1.83 (:file "dead-keys" :depends-on ("decls"))
121 tmoore 1.8 (:file "regions" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "coordinates" "utils" "transforms" "setf-star" "design"))
122     (:file "sheets" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "utils" "transforms" "regions"))
123     (:file "pixmap" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "sheets" "transforms" "regions"))
124     (:file "events" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "transforms" "sheets" "utils"))
125     (:file "ports" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "events" "sheets" "pixmap" "utils"))
126     (:file "grafts" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "sheets" "ports" "transforms" "regions"))
127     (:file "medium" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "ports" "X11-colors" "utils" "pixmap" "regions"
128 afuchs 1.1 "transforms" "design"))
129 tmoore 1.8 (:file "output" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "medium"))
130     (:file "input" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "events" "regions" "sheets"))
131     (:file "repaint" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "sheets" "events"))
132     (:file "graphics" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "output" "utils" "medium" "sheets" "pixmap"
133 afuchs 1.1 "regions" "design" "transforms"))
134 tmoore 1.8 (:file "views" :depends-on ("utils" "protocol-classes"))
135     (:file "stream-output" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "design" "utils" "X11-colors" "views"
136 afuchs 1.1 "output" "sheets" "regions" "graphics"
137     "medium" "setf-star"))
138 tmoore 1.8 (:file "recording" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "output" "coordinates" "graphics" "design"
139 afuchs 1.1 "medium" "transforms" "regions" "sheets"
140     "utils" "stream-output"))
141 tmoore 1.8 (:file "encapsulate" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "sheets" "graphics" "utils" "medium" "input"
142 afuchs 1.1 "stream-output" "recording"))
143 tmoore 1.8 (:file "stream-input" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "input" "ports" "sheets" "events"
144 thenriksen 1.83 "encapsulate" "transforms" "utils" "dead-keys"))
145 tmoore 1.8 (:file "text-selection" :depends-on ("decls" "protocol-classes" "Lisp-Dep" "X11-colors" "medium" "output"
146 afuchs 1.1 "transforms" "sheets" "stream-output"
147     "ports" "recording" "regions"
148 dlichteblau 1.45 "events"))
149 rgoldman 1.85 (:file "bezier" :depends-on ("recording"))))
150 afuchs 1.1
151     (defsystem :goatee-core
152 thenriksen 1.33 :depends-on (:clim-basic)
153 afuchs 1.1 :components
154     ((:module "Goatee"
155     :components
156     ((:file "conditions")
157     (:file "dbl-list")
158     (:file "flexivector" :depends-on ("conditions" "dbl-list"))
159     (:file "buffer" :depends-on ("conditions" "flexivector" "dbl-list"))
160     (:file "editable-buffer" :depends-on ("dbl-list" "flexivector" "buffer"))
161     (:file "editable-area" :depends-on ("flexivector" "editable-buffer" "dbl-list"
162     "buffer"))
163     (:file "clim-area" :depends-on ("flexivector" "dbl-list" "buffer"
164     "editable-area" "editable-buffer"))
165     (:file "kill-ring" :depends-on ("editable-buffer" "dbl-list" "flexivector"
166     "buffer"))
167     (:file "goatee-command" :depends-on ("conditions" "clim-area" "dbl-list"
168     "editable-buffer" "kill-ring"
169     "editable-area" "buffer" "flexivector"))
170     (:file "editing-stream" :depends-on ("goatee-command" "kill-ring" "dbl-list"
171     "conditions" "editable-buffer"
172     "flexivector" "clim-area" "buffer"))
173     (:file "presentation-history" :depends-on ("editing-stream" "buffer"
174     "flexivector" "editable-buffer"
175     "goatee-command"))))))
176     ;;; CLIM-PostScript is not a backend in the normal sense.
177     ;;; It is an extension (Chap. 35.1 of the spec) and is an
178     ;;; "included" part of McCLIM. Hence the defsystem is here.
179     (defsystem :clim-postscript
180 thenriksen 1.33 :depends-on (:clim-basic)
181     :components
182     ((:module "Backends/PostScript"
183     :components
184     ((:file "package")
185     (:file "encoding" :depends-on ("package"))
186     (:file "paper" :depends-on ("package"))
187     (:file "class" :depends-on ("paper" "package"))
188     (:file "font" :depends-on ("encoding" "class" "paper" "package"))
189     (:file "graphics" :depends-on ("encoding" "paper" "class" "font" "package"))
190     (:file "sheet" :depends-on ("paper" "class" "graphics" "package"))
191     (:file "afm" :depends-on ("class" "paper" "font" "package"))
192     (:file "standard-metrics" :depends-on ("font" "package"))))))
193    
194     (defsystem :clim-core
195     :depends-on (:clim-basic :goatee-core :clim-postscript)
196     :components ((:file "text-formatting")
197     (:file "defresource")
198     (:file "presentations")
199 thenriksen 1.78 (:file "xpm")
200 thenriksen 1.76 (:file "bordered-output" :depends-on ("presentations"))
201     (:file "table-formatting" :depends-on ("presentations"))
202     (:file "input-editing" :depends-on ("presentations" "bordered-output" "table-formatting"))
203 thenriksen 1.33 (:file "pointer-tracking" :depends-on ("input-editing"))
204     (:file "graph-formatting")
205     (:file "frames" :depends-on ("commands" "presentations" "presentation-defs"
206     "pointer-tracking" "incremental-redisplay"))
207     (:file "dialog-views" :depends-on ("presentations" "incremental-redisplay"
208     "bordered-output" "presentation-defs"))
209     (:file "presentation-defs" :depends-on ("input-editing" "presentations"))
210     (:file "gadgets" :depends-on ("commands" "pointer-tracking" "input-editing"
211     "frames" "incremental-redisplay" "panes"))
212     (:file "describe" :depends-on ("presentations" "presentation-defs" "table-formatting"))
213     (:file "commands" :depends-on ("input-editing" "presentations"
214     "presentation-defs"))
215     (:file "incremental-redisplay" :depends-on ("presentation-defs"))
216     (:file "menu-choose" :depends-on ("commands" "table-formatting" "presentation-defs"
217     "panes" "frames" "pointer-tracking"
218     "presentations"))
219     (:file "menu" :depends-on ("panes" "commands" "gadgets"
220     "presentations" "frames"))
221     (:file "panes" :depends-on ("incremental-redisplay" "presentations"
222     "presentation-defs" "input-editing" "frames"))
223     (:file "dialog" :depends-on ("panes" "frames" "incremental-redisplay"
224     "table-formatting" "presentations"
225     "bordered-output" "presentation-defs"
226     "dialog-views" "input-editing"
227     "commands"))
228 thenriksen 1.34 (:file "builtin-commands" :depends-on ("table-formatting"
229     "commands" "presentations"
230     "dialog" "presentation-defs"
231     "input-editing"))))
232 thenriksen 1.33
233     (defsystem :esa-mcclim
234     :depends-on (:clim-core)
235     :components ((:module "ESA"
236     :components ((:file "packages")
237     (:file "utils" :depends-on ("packages"))
238     (:file "colors" :depends-on ("packages"))
239 thenriksen 1.82 (:file "esa" :depends-on ("colors" "packages" "utils"))
240 thenriksen 1.33 (:file "esa-buffer" :depends-on ("packages" "esa"))
241     (:file "esa-io" :depends-on ("packages" "esa" "esa-buffer"))
242     (:file "esa-command-parser" :depends-on ("packages" "esa"))))))
243    
244    
245    
246     (defsystem :drei-mcclim
247 rgoldman 1.77 :depends-on ((:version "flexichain" "1.5.1") :esa-mcclim :clim-core #+#.(mcclim.system::dep-on-swank) :swank)
248 thenriksen 1.33 :components
249 rgoldman 1.85 ((:module "Drei/cl-automaton"
250     :components ((:file "automaton-package")
251     (:file "eqv-hash" :depends-on ("automaton-package"))
252     (:file "state-and-transition" :depends-on ("eqv-hash"))
253     (:file "automaton" :depends-on ("state-and-transition" "eqv-hash"))
254     (:file "regexp" :depends-on ("automaton"))))
255     (:module "Drei/Persistent"
256 thenriksen 1.33 :components ((:file "binseq-package")
257     (:file "binseq" :depends-on ("binseq-package"))
258     (:file "obinseq" :depends-on ("binseq-package" "binseq"))
259     (:file "binseq2" :depends-on ("binseq-package" "obinseq" "binseq"))))
260 rgoldman 1.85 (:module "Drei" :depends-on ("Drei/cl-automaton" "Drei/Persistent")
261 thenriksen 1.33 :components ((:file "packages")
262     (:file "buffer" :depends-on ("packages"))
263 thenriksen 1.65 (:file "delegating-buffer" :depends-on ("packages" "buffer"))
264 thenriksen 1.33 (:file "motion" :depends-on ("packages" "buffer" "syntax"))
265     (:file "editing" :depends-on ("packages" "buffer" "syntax" "motion" "kill-ring"))
266 rgoldman 1.85 (:file "base" :depends-on ("packages" "buffer" "Persistent/persistent-buffer" "kill-ring"
267 thenriksen 1.65 "delegating-buffer"))
268 thenriksen 1.33 (:file "syntax" :depends-on ("packages" "buffer" "base"))
269 thenriksen 1.70 (:file "modes" :depends-on ("packages" "syntax"))
270 rgoldman 1.85 (:file "views" :depends-on ("packages" "buffer" "base" "syntax" "Persistent/persistent-undo"
271     "Persistent/persistent-buffer" "undo" "abbrev"
272 thenriksen 1.70 "delegating-buffer" "modes"))
273 thenriksen 1.63 (:file "drei" :depends-on ("packages" "views" "motion" "editing"))
274 thenriksen 1.33 (:file "drei-clim" :depends-on ("drei"))
275     (:file "drei-redisplay" :depends-on ("drei-clim"))
276 thenriksen 1.73 (:file "drawing-options" :depends-on ("drei-redisplay"))
277 afuchs 1.50 (:file "input-editor" :depends-on ("drei-redisplay" "lisp-syntax" "core"))
278 thenriksen 1.33 (:file "abbrev" :depends-on ("packages"))
279     (:file "kill-ring" :depends-on ("packages"))
280     (:file "undo" :depends-on ("packages"))
281     (:file "basic-commands" :depends-on ("drei-clim" "motion" "editing"))
282     (:file "core" :depends-on ("drei"))
283 thenriksen 1.63 (:file "fundamental-syntax" :depends-on ("packages" "drei-redisplay" "core"))
284 thenriksen 1.52 (:file "buffer-streams" :depends-on ("core"))
285 thenriksen 1.33 (:file "rectangle" :depends-on ("core"))
286 thenriksen 1.62 (:file "targets" :depends-on ("core"))
287 thenriksen 1.33 (:file "core-commands" :depends-on ("core" "rectangle" "drei-clim"))
288 rgoldman 1.85 (:file "Persistent/persistent-buffer" :depends-on ("packages"))
289     (:file "Persistent/persistent-undo"
290     :depends-on ("packages" "buffer" "Persistent/persistent-buffer" "undo"))
291 thenriksen 1.33 (:file "misc-commands" :depends-on ("basic-commands"))
292 thenriksen 1.62 (:file "search-commands" :depends-on ("core" "targets" "drei-clim"))
293 thenriksen 1.73 (:file "lr-syntax" :depends-on ("fundamental-syntax" "core" "drawing-options"))
294 thenriksen 1.56 (:file "lisp-syntax" :depends-on ("lr-syntax" "motion" "core"))
295 thenriksen 1.33 (:file "lisp-syntax-swine" :depends-on ("lisp-syntax"))
296     (:file "lisp-syntax-commands" :depends-on ("lisp-syntax-swine" "misc-commands"))
297 thenriksen 1.46 #+#.(mcclim.system::ifswank) (:file "lisp-syntax-swank" :depends-on ("lisp-syntax"))))))
298 afuchs 1.1
299 thenriksen 1.36 (defsystem :drei-tests
300     :depends-on (:drei-mcclim :fiveam)
301     :components
302 rgoldman 1.85 ((:module "Drei/Tests"
303 thenriksen 1.36 :components
304     ((:module
305     "cl-automaton"
306     :depends-on ("testing")
307     :components
308 thenriksen 1.58 ((:file "automaton-tests")
309     (:file "state-and-transition-tests" :depends-on ("automaton-tests"))
310     (:file "eqv-hash-tests" :depends-on ("automaton-tests"))
311     (:file "regexp-tests" :depends-on ("automaton-tests"))))
312 thenriksen 1.36 (:file "packages")
313     (:file "testing" :depends-on ("packages"))
314     (:file "buffer-tests" :depends-on ("testing"))
315     (:file "base-tests" :depends-on ("testing"))
316     (:file "kill-ring-tests" :depends-on ("testing"))
317     (:file "motion-tests" :depends-on ("testing"))
318     (:file "editing-tests" :depends-on ("testing"))
319     (:file "core-tests" :depends-on ("testing"))
320 thenriksen 1.52 (:file "buffer-streams-tests" :depends-on ("testing"))
321 thenriksen 1.36 (:file "rectangle-tests" :depends-on ("testing"))
322 thenriksen 1.38 (:file "undo-tests" :depends-on ("testing"))
323 thenriksen 1.57 (:file "lisp-syntax-tests" :depends-on ("testing" "motion-tests"))
324     (:file "lisp-syntax-swine-tests" :depends-on ("lisp-syntax-tests"))))))
325 thenriksen 1.36
326 afuchs 1.1 (defsystem :clim
327 thenriksen 1.33 :depends-on (:clim-core :goatee-core :clim-postscript :drei-mcclim)
328     :components
329 rgoldman 1.85 (;;(:file "Goatee/presentation-history") ; XXX: this is loaded as part of the Goatee system. huh?
330 thenriksen 1.33 (:file "input-editing-goatee")
331     (:file "input-editing-drei")
332 dlichteblau 1.48 (:file "text-editor-gadget")
333 rgoldman 1.85 (:file "Extensions/tab-layout")))
334    
335     #+clisp
336     (when (and (find-package :xlib)
337     ;; Just some random symbol I know is unexported in CLISP's CLX.
338     (not (eq (nth-value 1 (find-symbol "SET-SELECTION-OWNER" :xlib)) :external)))
339     (warn "~@<CLISP provided you a CLX that is not capable of running the McCLIM CLX backend.
340     Deleting it, that it may be replaced with a working one.~@:>")
341     (ext:without-package-lock ("XLIB")
342     (delete-package :xlib)))
343    
344 afuchs 1.1
345     (defsystem :clim-clx
346 rgoldman 1.85 :depends-on (:clim #+(or sbcl openmcl ecl clisp allegro) :clx)
347     :components
348     ((:module "Backends/CLX"
349 afuchs 1.1 :components
350 rgoldman 1.85 ((:file "package")
351     (:file "image" :depends-on ("package"))
352     (:file "keysyms-common" :depends-on ("package"))
353     (:file "keysyms" :depends-on ("keysyms-common" "package"))
354     (:file "keysymdef" :depends-on ("keysyms-common" "package"))
355     (:file "port" :depends-on ("keysyms-common" "keysyms" "package"))
356     (:file "medium" :depends-on ("port" "keysyms" "package"))
357     (:file "graft" :depends-on ("port" "package"))
358     (:file "frame-manager" :depends-on ("medium" "port" "package"))))))
359 afuchs 1.1
360 rschlatte 1.64 (defsystem :clim-beagle
361     :depends-on (clim)
362     :components
363     ((:module "Backends"
364     :components
365     ((:module "beagle"
366     :serial t
367     :components
368     ((:file "package")
369 rschlatte 1.84 (:file "cocoa-util")
370 rschlatte 1.64 (:module "native"
371     :components ((:file "lisp-bezier-path")
372     (:file "lisp-window")
373     (:file "lisp-window-delegate")
374     (:file "lisp-view"
375     :depends-on ("lisp-bezier-path"))
376     (:file "lisp-view-additional"
377     :depends-on ("lisp-view"))
378     (:file "lisp-scroller")
379     (:file "lisp-slider")
380     (:file "lisp-button")
381     (:file "lisp-image")))
382     (:module "windowing"
383     :depends-on ("native")
384     :components ((:file "port")
385     (:file "frame-manager")
386     (:file "mirror")
387     (:file "graft")))
388     (:module "native-panes"
389     :components ((:file "beagle-scroll-bar-pane")
390     (:file "beagle-slider-pane")
391     ;; Basic buttons - not collections of buttons
392     (:file "beagle-fundamental-button-pane")
393     ;; Button collections (radio + checkbox)
394     ;; (:file "beagle-button-collection-pane")
395     (:file "scroller-pane-fix")))
396     (:module "output"
397     :depends-on ("windowing")
398     :components ((:file "medium")
399     (:file "fonts")))
400     (:module "input"
401     :depends-on ("windowing")
402     :components ((:file "events")
403     (:file "keysymdef")))
404     (:module "glimpse"
405     :components ((:file "glimpse")
406     (:file "glimpse-support")
407     (:file "glimpse-command-tables")
408     (:file "glimpse-present-process"
409     :depends-on ("glimpse" "glimpse-support"))
410     (:file "glimpse-present-window"
411     :depends-on ("glimpse" "glimpse-support"))
412     (:file "glimpse-modeless-commands"
413     :depends-on ("glimpse" "glimpse-support"))
414     (:file "glimpse-process-commands"
415     :depends-on ("glimpse" "glimpse-support"))
416     (:file "glimpse-window-commands"
417     :depends-on ("glimpse" "glimpse-support"))))
418     (:module "profile"
419     :components ((:file "profile")))
420     (:module "tests"
421     :components ((:file "drawing-tests")
422 rgoldman 1.85 (:file "graft-tests")))))))))
423    
424 rschlatte 1.64
425 crhodes 1.15 (defsystem :clim-null
426     :depends-on (:clim)
427     :components
428     ((:module "Backends/Null"
429 rgoldman 1.85 :components
430     ((:file "package")
431     (:file "port" :depends-on ("package"))
432     (:file "medium" :depends-on ("port" "package"))
433     (:file "graft" :depends-on ("port" "package"))
434     (:file "frame-manager" :depends-on ("medium" "port" "package"))))))
435 crhodes 1.15
436 dlichteblau 1.19 (defsystem :clim-gtkairo
437     :depends-on (:clim :cffi)
438     :components
439     ((:module "Backends/gtkairo"
440 rgoldman 1.85 :serial t ;asf wird's ja richten
441     :components
442     ((:file "clim-fix")
443     (:file "package")
444     (:file "gtk-ffi")
445     (:file "cairo-ffi")
446     (:file "ffi")
447     (:file "graft")
448     (:file "port")
449     (:file "event")
450     (:file "keys")
451     (:file "medium")
452     (:file "pango")
453     (:file "cairo")
454     (:file "gdk")
455     (:file "pixmap")
456     (:file "frame-manager")
457     (:file "gadgets")))))
458 dlichteblau 1.19
459 dlichteblau 1.55 (defsystem :clim-graphic-forms
460     :depends-on (:clim :graphic-forms-uitoolkit)
461     :components
462     ((:module "Backends/Graphic-Forms"
463 rgoldman 1.85 :components
464     ((:file "package")
465 dlichteblau 1.55 (:file "utils" :depends-on ("package"))
466 rgoldman 1.85 (:file "graft" :depends-on ("package"))
467     (:file "port" :depends-on ("utils" "graft"))
468     (:file "medium" :depends-on ("port"))
469 junrue 1.61 (:file "pixmap" :depends-on ("medium"))
470 rgoldman 1.85 (:file "frame-manager" :depends-on ("medium"))
471 dlichteblau 1.55 (:file "gadgets" :depends-on ("port"))))))
472    
473 afuchs 1.1 ;;; TODO/asf: I don't have the required libs to get :clim-opengl to load. tough.
474 rgoldman 1.85 (defsystem :clim-opengl
475     :depends-on (:clim)
476     :serial t
477     :components
478     ((:file "Backends/OpenGL/opengl-x-frame-manager")
479     (:file "Backends/OpenGL/opengl-frame-manager")
480     (:file "Backends/OpenGL/opengl-x-port-before")
481     (:file "Backends/OpenGL/opengl-port")
482     (:file "Backends/OpenGL/opengl-x-port-after")
483     (:file "Backends/OpenGL/opengl-medium")
484     (:file "Backends/OpenGL/opengl-x-graft")))
485 afuchs 1.1
486     ;;; A system that loads the appropriate backend for the current
487     ;;; platform.
488     (defsystem :clim-looks
489 afuchs 1.12 :depends-on (:clim :clim-postscript
490 afuchs 1.1 ;; If we're on an implementation that ships CLX, use
491     ;; it. Same if the user has loaded CLX already.
492 dlichteblau 1.55 #+(and (or sbcl scl openmcl ecl clx allegro)
493 rgoldman 1.85 (not (or clim-gtkairo clim-graphic-forms clim-beagle)))
494     :clim-clx #+clim-graphic-forms :clim-graphic-forms
495 dlichteblau 1.68 #+clim-gl :clim-opengl
496 afuchs 1.1 ;; OpenMCL and MCL support the beagle backend (native
497     ;; OS X look&feel on OS X).
498 dlichteblau 1.67 #+clim-beagle :clim-beagle
499 crhodes 1.15
500 rgoldman 1.85 #+clim-gtkairo :clim-gtkairo
501 dlichteblau 1.19
502 rgoldman 1.85 ;; null backend
503     :clim-null
504 afuchs 1.1 )
505 dlichteblau 1.69 :components (#-(or clim-gtkairo clim-graphic-forms clim-beagle)
506 rgoldman 1.85 (:file "Looks/pixie")))
507 afuchs 1.1
508 ahefner 1.22 ;;; The actual McCLIM system that people should to use in their ASDF
509     ;;; package dependency lists.
510     (defsystem :mcclim
511 rgoldman 1.85 :version "0.9.7-dev"
512     :depends-on (:clim-looks))
513 ahefner 1.22
514 rgoldman 1.85 (defmethod perform :after ((op load-op) (c (eql (find-system :mcclim))))
515     (pushnew :clim *features*)) ;; The fact that CLIM itself is available is true when all is loaded.
516    
517     ;; The fact that our CLIM implementation is McCLIM is already true now.
518     ;; This feature is notably used by ESA and DREI, in cases where they need to
519     ;; know whether they are compiled with McCLIM or another CLIM implementation.
520     (pushnew :mcclim *features*)
521 tmoore 1.8
522 thenriksen 1.33

  ViewVC Help
Powered by ViewVC 1.1.5