From 75c8ae36e97726ffeb851a28393faa3a69570f5b Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Fri, 22 May 1992 17:39:36 +0000 Subject: [PATCH] Smash together all the fasls into clx-library.fasl. Compile and load inspect and clx-ext. --- tools/clxcom.lisp | 38 +++++++++++++++++++++++++++++++++++++- 1 file changed, 37 insertions(+), 1 deletion(-) diff --git a/tools/clxcom.lisp b/tools/clxcom.lisp index 0e9e7da67..eba263db3 100644 --- a/tools/clxcom.lisp +++ b/tools/clxcom.lisp @@ -51,4 +51,40 @@ (comf "target:clx/manager" :load t) (comf "target:clx/image" :load t) (comf "target:clx/resource" :load t)) - (comf "target:code/clx-ext")) + (comf "target:code/clx-ext") + #-no-pcl + (comf "target:code/inspect")) + +(ext:run-program + "cat" + (mapcar #'(lambda (x) + (namestring + (truename + (make-pathname + :name x + :type (c:backend-fasl-file-type c:*target-backend*))))) + '( + "target:clx/package" + "target:clx/depdefs" + "target:clx/clx" + "target:clx/dependent" + "target:clx/macros" + "target:clx/bufmac" + "target:clx/buffer" + "target:clx/display" + "target:clx/gcontext" + "target:clx/input" + "target:clx/requests" + "target:clx/fonts" + "target:clx/graphics" + "target:clx/text" + "target:clx/attributes" + "target:clx/translate" + "target:clx/keysyms" + "target:clx/manager" + "target:clx/image" + "target:clx/resource" + "target:code/clx-ext" + "target:code/inspect")) + :output (make-pathname :defaults "target:clx/clx-library" + :type (c:backend-fasl-file-type c:*target-backend*))) -- GitLab