diff --git a/ChangeLog.n b/ChangeLog.n index ff837d543204203d0750249e8f02c3022f3a1e26..4d0acf7a6b9cea59d555a6734c6cea685d9bc0f9 100644 --- a/ChangeLog.n +++ b/ChangeLog.n @@ -10,6 +10,16 @@ Tests for new features: <`no new features', `no tests for new features', or <standard changelog date stamp> * <changes go here...> +******************************************************************************* +2.2.1.5 + +Documentation changes: none +Tests for new features: no new features + +Tue Feb 03 09:17:26 1998 <layer@HOBART> + + * ChangeLog: use generate-application to build clim image + ******************************************************************************* 2.2.1.4 diff --git a/Makefile.generic b/Makefile.generic index 535b7ef1029b97c636b767f526f2b95fd22ac041..804fbcb0e55c527b1f2948dfbb0193ccb9d7e4a3 100644 --- a/Makefile.generic +++ b/Makefile.generic @@ -1,4 +1,4 @@ -# $Header: /repo/cvs.copy/clim2/Makefile.generic,v 1.43 1997/10/20 23:10:57 layer Exp $ +# $Header: /repo/cvs.copy/clim2/Makefile.generic,v 1.44 1998/02/04 22:22:19 layer Exp $ # # Makefile.generic for CLIM 2.0 # @@ -122,20 +122,32 @@ $(CLIM): FORCE $(PRODUCT-OBJS) $(ICS-PRODUCT-OBJS) ALLEGRO_CL_HOME=$(CL_HOME) ; export ALLEGRO_CL_HOME ; \ $(ECHO) " \ (progn \ - (push (merge-pathnames (current-directory) \"hosts.cl\") \ - (logical-pathname-translations-database-pathnames)) \ - (setq sys::*libtk-pathname* \"$(TKLIB)\") \ - (setq sys::*libxt-pathname* \"$(XTLIB)\") \ - (setq sys::*libx11-pathname* \"$(XLIB)\") \ - (setq sys::*libwnn-pathname* \"$(WNNLIB)\") \ - (load \"misc/dev-load-1.lisp\") \ - (load-it '$(SYSTEM)) \ - (setq sys::*clim-dump-name* \"$(TMP)/clim.temp_`whoami`\") \ - (load \"misc/dump.lisp\"))" \ - | $(CL) $(CLOPTS)) - $(MV) $(TMP)/clim.temp_`whoami` $(CLIM) - ls -lLt $(CLIM) >> Clim-sizes.n - ls -lLt $(CLIM) + (generate-application \ + \"$(CLIM)\" \"./\" \ + nil \ + :pre-load-form \ + (quote \ + (progn \ + (push (merge-pathnames (current-directory) \"hosts.cl\") \ + (logical-pathname-translations-database-pathnames)) \ + (setq sys::*libtk-pathname* \"$(TKLIB)\") \ + (setq sys::*libxt-pathname* \"$(XTLIB)\") \ + (setq sys::*libx11-pathname* \"$(XLIB)\") \ + (setq sys::*libwnn-pathname* \"$(WNNLIB)\") \ + (load \"misc/dev-load-1.lisp\") \ + (load-it '$(SYSTEM)))) \ + :image-only t \ + :purify nil \ + :shlib-warning nil \ + :libfasl-warning nil \ + :record-source-file-info t :load-source-file-info t \ + :record-xref-info t :load-xref-info t \ + :discard-local-name-info t \ + :discard-source-file-info t \ + :discard-xref-info t) \ + (exit 0))" | $(CL) $(CLOPTS)) + @ls -lLt $(CLIM) >> Clim-sizes.n + @ls -lLt $(CLIM) @echo $(SYSTEM) built!!!! # Training diff --git a/utils/packages.lisp b/utils/packages.lisp index a6e6542921fbb0f7ea311f9d8b675ef03fd72d08..49688c4626feb20b800f11650c9429e0f3782b01 100644 --- a/utils/packages.lisp +++ b/utils/packages.lisp @@ -1,6 +1,6 @@ ;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Package: CL-USER; Base: 10; Lowercase: Yes -*- -;; $Header: /repo/cvs.copy/clim2/utils/packages.lisp,v 1.76 1997/12/23 22:44:54 duane Exp $ +;; $Header: /repo/cvs.copy/clim2/utils/packages.lisp,v 1.77 1998/02/04 22:22:20 layer Exp $ (in-package :common-lisp-user) @@ -3301,7 +3301,7 @@ (cl:defvar *clim-major-version* 2) (cl:defvar *clim-minor-version* 2) (cl:defvar *clim-generation-version* 1) -(cl:defvar *clim-build-version* 4) +(cl:defvar *clim-build-version* 5) (cl:defparameter *clim-version* (cl:format () "CLIM ~d.~d.~d.~d" @@ -3309,4 +3309,4 @@ *clim-generation-version* *clim-build-version*)) #-aclpc -(si::rcsnote *clim-version* "$Id: packages.lisp,v 1.76 1997/12/23 22:44:54 duane Exp $") +(si::rcsnote *clim-version* "$Id: packages.lisp,v 1.77 1998/02/04 22:22:20 layer Exp $")