/[cmucl]/src/tools/clmcom.lisp
ViewVC logotype

Diff of /src/tools/clmcom.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6 by ram, Thu Jul 22 21:24:36 1993 UTC revision 1.7 by ram, Tue Aug 3 20:50:58 1993 UTC
# Line 14  Line 14 
14  ;;; File for compiling the Motif toolkit and related interface  ;;; File for compiling the Motif toolkit and related interface
15  ;;; stuff.  ;;; stuff.
16  ;;;  ;;;
   
17  (in-package "USER")  (in-package "USER")
18    
19  #-clx  
20  ;;; If CLX has not been loaded, but has been compiled, then load it.  ;;; If CLX and PCL have not been loaded, then load them.
21  ;;;  ;;;
22  (when (probe-file (make-pathname :defaults "target:clx/clx-library"  #-clx(load "target:clx/clx-library")
23                                   :type (c:backend-fasl-file-type c:*backend*)))  #-pcl(load "target:pcl/pclload")
   (load "target:clx/clx-library"))  
24    
25  (pushnew :motif-toolkit *features*)  (pushnew :motif *features*)
26    
27  (with-compiler-log-file  (with-compiler-log-file
28      ("target:compile-motif.log"      ("target:compile-motif.log"

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

  ViewVC Help
Powered by ViewVC 1.1.5