From bfbee5658f46de16284ec71a58d9ecb2def60367 Mon Sep 17 00:00:00 2001 From: cer <cer> Date: Fri, 31 Jan 1992 17:51:10 +0000 Subject: [PATCH] fixes --- Makefile | 10 +++++----- misc/go-xm.lisp | 15 ++++++++++++++- 2 files changed, 19 insertions(+), 6 deletions(-) diff --git a/Makefile b/Makefile index bd07faee..76901c2b 100644 --- a/Makefile +++ b/Makefile @@ -1,7 +1,7 @@ -# $fiHeader: Makefile,v 1.6 92/01/30 10:09:16 cer Exp $ +# $fiHeader: Makefile,v 1.7 92/01/31 14:59:11 cer Exp Locker: cer $ -SOMEDIRS=utils silica clim -DIRS=$(SOMEDIRS) xlib tk xm-silica +SOMEDIRS=sys utils silica clim demo +DIRS=$(SOMEDIRS) xlib tk xm-silica misc DEVICE=/dev/null CL=/net/vapor/usr/composer2/composer2 CLOPTS = -qq @@ -21,7 +21,7 @@ FRC : swm-tape: - tar cf $(DEVICE) `find misc $(SOMEDIRS) '(' -name "*.cl" -o -name "*.lisp" ')' -print` + tar cf $(DEVICE) `find $(SOMEDIRS) '(' -name "*.cl" -o -name "*.lisp" ')' -print` xm-composer: cd tk ; $(MAKE) xm-composer @@ -35,7 +35,7 @@ dist : > Dist/src.tar.Z rcscheck: - rcscheck $(DIRS) | grep -v .fasl + rcscheck $(DIRS) | grep -v .fasl # For the day the make dist happens. diff --git a/misc/go-xm.lisp b/misc/go-xm.lisp index e369fc72..b5acefee 100644 --- a/misc/go-xm.lisp +++ b/misc/go-xm.lisp @@ -20,8 +20,21 @@ ;; 52.227-19 or DOD FAR Supplement 252.227-7013 (c) (1) (ii), as ;; applicable. ;; -;; $fiHeader$ +;; $fiHeader: go-xm.lisp,v 1.1 92/01/30 10:16:06 cer Exp Locker: cer $ +#+ignore (let ((which :motif)) (declare (special which)) (load (merge-pathnames "go.cl" excl::*source-pathname*))) + +(compile-file-if-needed "sys/defsystem") +(let ((*enable-package-locked-errors* nil)) + (load "sys/defsystem")) +(load "sys/sysdcl") +(defsys::compile-system 'motif-clim :propagate t) +(tenuring (defsys::load-system 'motif-clim)) + + + + + -- GitLab