/[cmucl]/src/clx/build-clx.lisp
ViewVC logotype

Contents of /src/clx/build-clx.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.5 - (hide annotations)
Wed Jun 17 18:22:45 2009 UTC (4 years, 10 months ago) by rtoy
Branch: MAIN
CVS Tags: sparc-tramp-assem-base, post-merge-intl-branch, intl-branch-working-2010-02-19-1000, unicode-string-buffer-impl-base, release-20b-pre1, release-20b-pre2, unicode-string-buffer-base, sparc-tramp-assem-2010-07-19, amd64-dd-start, intl-2-branch-base, GIT-CONVERSION, cross-sol-x86-merged, intl-branch-working-2010-02-11-1000, RELEASE_20b, release-20a-base, cross-sol-x86-base, snapshot-2010-12, snapshot-2010-11, snapshot-2011-09, snapshot-2011-06, snapshot-2011-07, snapshot-2011-04, snapshot-2011-02, snapshot-2011-03, snapshot-2011-01, pre-merge-intl-branch, snapshot-2010-05, snapshot-2010-04, snapshot-2010-07, snapshot-2010-06, snapshot-2010-01, snapshot-2010-03, snapshot-2010-02, snapshot-2010-08, cross-sol-x86-2010-12-20, intl-branch-2010-03-18-1300, RELEASE_20a, release-20a-pre1, snapshot-2009-11, snapshot-2009-12, cross-sparc-branch-base, intl-branch-base, snapshot-2009-08, snapshot-2009-07, HEAD
Branch point for: cross-sparc-branch, RELEASE-20B-BRANCH, unicode-string-buffer-branch, sparc-tramp-assem-branch, RELEASE-20A-BRANCH, amd64-dd-branch, unicode-string-buffer-impl-branch, intl-branch, cross-sol-x86-branch, intl-2-branch
Changes since 1.4: +1 -1 lines
Merge portable-clx (2009-06-16) to main branch.  Tested by running
src/contrib/games/feebs and hemlock which works (in non-unicode
builds).
1 ram 1.1 ;;; -*- Mode: Lisp; Package: Xlib; Log: clx.log -*-
2    
3 fgilham 1.4 #+cmu
4 rtoy 1.5 (ext:file-comment "$Id: build-clx.lisp,v 1.5 2009/06/17 18:22:45 rtoy Rel $")
5 fgilham 1.4
6 ram 1.1 ;;; Load this file if you want to compile CLX in its entirety.
7 fgilham 1.4 (proclaim '(optimize (speed 3) (safety 1) (space 1)
8 ram 1.1 (compilation-speed 0)))
9    
10    
11     ;;; Hide CLOS from CLX, so objects stay implemented as structures.
12     ;;;
13 fgilham 1.4 #||
14 ram 1.1 (when (find-package "CLOS")
15     (rename-package (find-package "CLOS") "NO-CLOS-HERE"))
16     (when (find-package "PCL")
17     (rename-package (find-package "PCL") "NO-PCL-HERE"))
18 fgilham 1.4 (when (find-package "SB-PCL")
19     (rename-package (find-package "SB-PCL") "NO-SB-PCL-HERE"))
20     ||#
21 ram 1.1
22     (when (find-package "XLIB")
23 fgilham 1.4 (delete-package "XLIB"))
24 ram 1.1
25 fgilham 1.4 (unless (find-package "XLIB")
26     (make-package "XLIB" :use '("COMMON-LISP")))
27 ram 1.1
28 fgilham 1.4 #-sbcl
29 ram 1.2 (compile-file "clx:defsystem.lisp" :error-file nil :load t)
30 ram 1.1
31 fgilham 1.4 #+sbcl
32     (progn (compile-file "clx:defsystem.lisp")
33     (load "clx:defsystem"))
34    
35 ram 1.2 (with-compilation-unit ()
36 fgilham 1.4 (#+cmu xlib:compile-clx #-cmu compile-clx (pathname "CLX:")))

  ViewVC Help
Powered by ViewVC 1.1.5