--- Begin Message ---
|
Subject: |
[build-improvements] Partial simplification of src/interp/Makefile |
|
Date: |
25 Oct 2006 16:08:12 -0500 |
Hi,
This patch abstracts over the individual rules to compile Boot codes
in src/interp/ using bootsys (aka "new" Boot).
Subsequent patches will abstract over individual rules for compiling
Lisp code to object codes, and the rest of the Boot codes too. The
remaing Boot files are currently compiled using the boot translator
from src/interp/ (aka "old" Boot). I did not perform that conversion in
this patch because some of the files contain constructs that do one of
(1) violate the grammar of "new" Boot, or
(2) tripple over parser bug.
I know of a couple of examples for both cases -- I'll describe them
when I get to submit the appropriate patches.
This patch has been built and tested on an i686-pc-linux-gnu.
Committed to build-improvements.
-- Gaby
2006-10-25 Gabriel Dos Reis <address@hidden>
* debugsys.lisp.pamphlet (build-interpsys): Adjust pathname to
files that are local to the current build directory.
* Makefile.pamphlet: Remove individual rules for making object
codes out of Boot pamphlet using bootsys.
(BOOT_TO_LISP, COMPILE_LISP): New.
(AXIOMsys_boot_sources): Likewise. List core Boot files here.
(<<extract source codes>>): New chunk. Abstract over special
individual rules to translate Boot to object code, using bootsys.
* Makefile.in: Regenerate.
*** src/interp/Makefile.in (revision 15903)
--- src/interp/Makefile.in (local)
*************** OUT=${OBJ}/${SYS}/interp
*** 7,12 ****
--- 7,18 ----
DOC=$(axiom_target_docdir)/src/interp
BOOK=$(axiom_target_docdir)
+ # Command to translate Boot to Common Lisp
+ BOOT_TO_LISP = echo '(boottran::boottocl "$<")' | $(BOOTSYS) >> $(TMP)/trace
+
+ # Command to translate Common Lisp to native object code
+ COMPILE_LISP = echo '(compile-file "$<" :output-file "$@")' | $(DEPSYS) \
+ >> $(TMP)/trace
AUTO=$(axiom_targetdir)/autoload
autoload_objects =
*************** OBJS= ${OUT}/vmlisp.$(OBJEXT) ${OUT}/has
*** 108,113 ****
--- 114,135 ----
${OUT}/union.$(OBJEXT) ${OUT}/daase.$(OBJEXT) \
${OUT}/fortcall.$(OBJEXT)
+
+ AXIOMsys_boot_sources = astr.boot alql.boot buildom.boot cattable.boot \
+ cformat.boot clam.boot clammed.boot compat.boot compress.boot \
+ cparse.boot cstream.boot database.boot dq.boot format.boot \
+ g-boot.boot g-cndata.boot g-error.boot g-opt.boot g-timer.boot \
+ g-util.boot hypertex.boot i-analy.boot i-code.boot i-coerce.boot \
+ i-coerfn.boot i-eval.boot i-funsel.boot i-intern.boot i-map.boot \
+ i-output.boot i-resolv.boot i-spec1.boot i-spec2.boot \
+ i-syscmd.boot i-toplev.boot i-util.boot incl.boot int-top.boot \
+ intfile.boot lisplib.boot macex.boot match.boot msg.boot \
+ msgdb.boot newfort.boot nrunfast.boot nrungo.boot nrunopt.boot \
+ nruntime.boot osyscmd.boot packtran.boot pathname.boot \
+ pf2sex.boot pile.boot posit.boot ptrees.boot ptrop.boot \
+ record.boot rulesets.boot scan.boot serror.boot server.boot \
+ setvars.boot sfsfun.boot simpbool.boot slam.boot template.boot \
+ termrw.boot trace.boot fortcall.boot
INOBJS= ${OUT}/varini.$(OBJEXT) ${OUT}/parini.$(OBJEXT) \
${OUT}/setvart.$(OBJEXT) ${OUT}/intint.$(OBJEXT) \
${OUT}/xrun.$(OBJEXT) ${OUT}/interop.$(OBJEXT) \
*************** $(AUTO):
*** 306,311 ****
--- 328,341 ----
$(MID):
$(mkinstalldirs) $@
+ %.boot: $(srcdir)/%.boot.pamphlet
+ $(axiom_build_document) --tangle --output=$@ $<
+ .PRECIOUS: %.clisp
+ %.clisp: %.boot
+ $(BOOT_TO_LISP)
+ .PRECIOUS: $(OUT)/%.$(OBJEXT)
+ $(OUT)/%.$(OBJEXT): %.clisp
+ $(COMPILE_LISP)
mostlyclean-local: ;
*************** ${MID}/as.clisp: $(srcdir)/as.boot.pamph
*** 521,546 ****
rm as.boot )
- ${OUT}/astr.$(OBJEXT): ${MID}/astr.clisp
- @ echo 531 making ${OUT}/astr.$(OBJEXT) from ${MID}/astr.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/astr.clisp" :output-file
"${OUT}/astr.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/astr.clisp" :output-file
"${OUT}/astr.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/astr.clisp: $(srcdir)/astr.boot.pamphlet
- @ echo 532 making ${MID}/astr.clisp from $(srcdir)/astr.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/astr.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/astr.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/astr.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm astr.boot )
-
-
${AUTO}/ax.$(OBJEXT): ${OUT}/ax.$(OBJEXT)
@ echo 461 making ${AUTO}/ax.$(OBJEXT) from ${OUT}/ax.$(OBJEXT)
@ cp ${OUT}/ax.$(OBJEXT) ${AUTO}
--- 551,556 ----
*************** ${MID}/c-doc.clisp: $(srcdir)/c-doc.boot
*** 1010,1035 ****
rm c-doc.boot )
- ${OUT}/cformat.$(OBJEXT): ${MID}/cformat.clisp
- @ echo 543 making ${OUT}/cformat.$(OBJEXT) from ${MID}/cformat.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/cformat.clisp" :output-file
"${OUT}/cformat.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/cformat.clisp" :output-file
"${OUT}/cformat.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/cformat.clisp: $(srcdir)/cformat.boot.pamphlet
- @ echo 544 making ${MID}/cformat.clisp from
$(srcdir)/cformat.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/cformat.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/cformat.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/cformat.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm cformat.boot )
-
-
${OUT}/cfuns.$(OBJEXT): ${MID}/cfuns.lisp
@ echo 24 making ${OUT}/cfuns.$(OBJEXT) from ${MID}/cfuns.lisp
@ ( cd ${MID} ; \
--- 1020,1025 ----
*************** ${OUT}/construc.$(OBJEXT): ${MID}/constr
*** 1175,1220 ****
${MID}/construc.lisp: $(srcdir)/construc.lisp.pamphlet
$(axiom_build_document) --tangle --output=$@ $<
- ${OUT}/cparse.$(OBJEXT): ${MID}/cparse.clisp
- @ echo 513 making ${OUT}/cparse.$(OBJEXT) from ${MID}/cparse.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/cparse.clisp" :output-file
"${OUT}/cparse.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/cparse.clisp" :output-file
"${OUT}/cparse.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/cparse.clisp: $(srcdir)/cparse.boot.pamphlet
- @ echo 514 making ${MID}/cparse.clisp from
$(srcdir)/cparse.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/cparse.boot $< ;\
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/cparse.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/cparse.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm cparse.boot )
-
-
- ${OUT}/cstream.$(OBJEXT): ${MID}/cstream.clisp
- @ echo 528 making ${OUT}/cstream.$(OBJEXT) from ${MID}/cstream.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/cstream.clisp" :output-file
"${OUT}/cstream.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/cstream.clisp" :output-file
"${OUT}/cstream.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/cstream.clisp: $(srcdir)/cstream.boot.pamphlet
- @ echo 529 making ${MID}/cstream.clisp from
$(srcdir)/cstream.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/cstream.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/cstream.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/cstream.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm cstream.boot )
-
-
${AUTO}/c-util.$(OBJEXT): ${OUT}/c-util.$(OBJEXT)
@ echo 145 making ${AUTO}/c-util.$(OBJEXT) from ${OUT}/c-util.$(OBJEXT)
@ cp ${OUT}/c-util.$(OBJEXT) ${AUTO}
--- 1165,1170 ----
*************** ${MID}/define.clisp: $(srcdir)/define.bo
*** 1339,1364 ****
rm define.boot )
- ${OUT}/dq.$(OBJEXT): ${MID}/dq.clisp
- @ echo 525 making ${OUT}/dq.$(OBJEXT) from ${MID}/dq.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/dq.clisp" :output-file
"${OUT}/dq.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/dq.clisp" :output-file
"${OUT}/dq.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/dq.clisp: $(srcdir)/dq.boot.pamphlet
- @ echo 526 making ${MID}/dq.clisp from $(srcdir)/dq.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/dq.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/dq.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/dq.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm dq.boot )
-
-
${OUT}/fname.$(OBJEXT): ${MID}/fname.lisp
@ echo 46 making ${OUT}/fname.$(OBJEXT) from ${MID}/fname.lisp
@ ( cd ${MID} ; \
--- 1289,1294 ----
*************** ${MID}/i-map.clisp: $(srcdir)/i-map.boot
*** 1977,2002 ****
rm i-map.boot )
- ${OUT}/incl.$(OBJEXT): ${MID}/incl.clisp
- @ echo 504 making ${OUT}/incl.$(OBJEXT) from ${MID}/incl.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/incl.clisp" :output-file
"${OUT}/incl.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/incl.clisp" :output-file
"${OUT}/incl.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/incl.clisp: $(srcdir)/incl.boot.pamphlet
- @ echo 505 making ${MID}/incl.clisp from $(srcdir)/incl.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/incl.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/incl.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/incl.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm incl.boot )
-
-
${AUTO}/info.$(OBJEXT): ${OUT}/info.$(OBJEXT)
@ echo 327 making ${AUTO}/info.$(OBJEXT) from ${OUT}/info.$(OBJEXT)
@ cp ${OUT}/info.$(OBJEXT) ${AUTO}
--- 1907,1912 ----
*************** ${MID}/info.clisp: $(srcdir)/info.boot.p
*** 2022,2047 ****
rm info.boot )
- ${OUT}/intfile.$(OBJEXT): ${MID}/intfile.clisp
- @ echo 552 making ${OUT}/intfile.$(OBJEXT) from ${MID}/intfile.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/intfile.clisp" :output-file
"${OUT}/intfile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/intfile.clisp" :output-file
"${OUT}/intfile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/intfile.clisp: $(srcdir)/intfile.boot.pamphlet
- @ echo 553 making ${MID}/intfile.clisp from
$(srcdir)/intfile.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/intfile.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/intfile.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/intfile.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm intfile.boot )
-
-
${OUT}/intint.$(OBJEXT): ${MID}/intint.lisp
@ echo 555 making ${OUT}/intint.$(OBJEXT) from ${MID}/intint.lisp
@ if [ -z "${NOISE}" ] ; then \
--- 1932,1937 ----
*************** ${OUT}/intint.$(OBJEXT): ${MID}/intint.l
*** 2053,2078 ****
${MID}/intint.lisp: $(srcdir)/intint.lisp.pamphlet
$(axiom_build_document) --tangle --output=$@ $<
- ${OUT}/int-top.$(OBJEXT): ${MID}/int-top.clisp
- @ echo 564 making ${OUT}/int-top.$(OBJEXT) from ${MID}/int-top.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/int-top.clisp" :output-file
"${OUT}/int-top.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/int-top.clisp" :output-file
"${OUT}/int-top.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/int-top.clisp: $(srcdir)/int-top.boot.pamphlet
- @ echo 565 making ${MID}/int-top.clisp from
$(srcdir)/int-top.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/int-top.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/int-top.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/int-top.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm int-top.boot )
-
-
${OUT}/i-output.$(OBJEXT): ${MID}/i-output.clisp
@ echo 306 making ${OUT}/i-output.$(OBJEXT) from ${MID}/i-output.clisp
@ (cd ${MID} ; \
--- 1943,1948 ----
*************** ${MID}/lisplib.clisp: $(srcdir)/lisplib.
*** 2266,2291 ****
rm lisplib.boot )
- ${OUT}/macex.$(OBJEXT): ${MID}/macex.clisp
- @ echo 516 making ${OUT}/macex.$(OBJEXT) from ${MID}/macex.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/macex.clisp" :output-file
"${OUT}/macex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/macex.clisp" :output-file
"${OUT}/macex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/macex.clisp: $(srcdir)/macex.boot.pamphlet
- @ echo 517 making ${MID}/macex.clisp from $(srcdir)/macex.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/macex.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/macex.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/macex.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm macex.boot )
-
-
${OUT}/macros.$(OBJEXT): ${MID}/macros.lisp
@ echo 63 making ${OUT}/macros.$(OBJEXT) from ${MID}/macros.lisp
@ ( cd ${MID} ; \
--- 2136,2141 ----
*************** ${MID}/monitor.lisp: $(srcdir)/monitor.l
*** 2421,2446 ****
@ echo 77 making ${MID}/monitor.lisp from
$(srcdir)/monitor.lisp.pamphlet
$(axiom_build_document) --tangle --output=$@ $<
- ${OUT}/msg.$(OBJEXT): ${MID}/msg.clisp
- @ echo 534 making ${OUT}/msg.$(OBJEXT) from ${MID}/msg.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/msg.clisp" :output-file
"${OUT}/msg.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/msg.clisp" :output-file
"${OUT}/msg.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/msg.clisp: $(srcdir)/msg.boot.pamphlet
- @ echo 535 making ${MID}/msg.clisp from $(srcdir)/msg.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/msg.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/msg.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/msg.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm msg.boot )
-
-
${OUT}/msgdb.$(OBJEXT): ${MID}/msgdb.clisp
@ echo 345 making ${OUT}/msgdb.$(OBJEXT) from ${MID}/msgdb.clisp
@ (cd ${MID} ; \
--- 2271,2276 ----
*************** ${OUT}/obey.$(OBJEXT): ${MID}/obey.${LIS
*** 3020,3045 ****
${MID}/obey.${LISP}: $(srcdir)/obey.lisp.pamphlet
$(axiom_build_document) --tangle --output=$@ $<
- ${OUT}/osyscmd.$(OBJEXT): ${MID}/osyscmd.clisp
- @ echo 567 making ${OUT}/osyscmd.$(OBJEXT) from ${MID}/osyscmd.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/osyscmd.clisp" :output-file
"${OUT}/osyscmd.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/osyscmd.clisp" :output-file
"${OUT}/osyscmd.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/osyscmd.clisp: $(srcdir)/osyscmd.boot.pamphlet
- @ echo 568 making ${MID}/osyscmd.clisp from
$(srcdir)/osyscmd.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/osyscmd.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/osyscmd.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/osyscmd.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm osyscmd.boot )
-
-
${AUTO}/package.$(OBJEXT): ${OUT}/package.$(OBJEXT)
@ echo 370 making ${AUTO}/package.$(OBJEXT) from
${OUT}/package.$(OBJEXT)
@ cp ${OUT}/package.$(OBJEXT) ${AUTO}
--- 2850,2855 ----
*************** ${MID}/package.clisp: $(srcdir)/package.
*** 3065,3110 ****
rm package.boot )
- ${OUT}/packtran.$(OBJEXT): ${MID}/packtran.clisp
- @ echo 570 making ${OUT}/packtran.$(OBJEXT) from ${MID}/packtran.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/packtran.clisp" :output-file
"${OUT}/packtran.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/packtran.clisp" :output-file
"${OUT}/packtran.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/packtran.clisp: $(srcdir)/packtran.boot.pamphlet
- @ echo 571 making ${MID}/packtran.clisp from
$(srcdir)/packtran.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/packtran.boot $< ;\
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/packtran.boot") (${BYE}))'
| ${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/packtran.boot") (${BYE}))'
| ${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm packtran.boot )
-
-
- ${OUT}/parini.$(OBJEXT): ${MID}/parini.clisp
- @ echo 549 making ${OUT}/parini.$(OBJEXT) from ${MID}/parini.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/parini.clisp" :output-file
"${OUT}/parini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/parini.clisp" :output-file
"${OUT}/parini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/parini.clisp: $(srcdir)/parini.boot.pamphlet
- @ echo 550 making ${MID}/parini.clisp from
$(srcdir)/parini.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/parini.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/parini.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/parini.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm parini.boot )
-
-
${AUTO}/parse.$(OBJEXT): ${OUT}/parse.$(OBJEXT)
@ echo 374 making ${AUTO}/parse.$(OBJEXT) from ${OUT}/parse.$(OBJEXT)
@ cp ${OUT}/parse.$(OBJEXT) ${AUTO}
--- 2875,2880 ----
*************** ${MID}/pathname.clisp: $(srcdir)/pathnam
*** 3187,3252 ****
rm pathname.boot )
- ${OUT}/pf2sex.$(OBJEXT): ${MID}/pf2sex.clisp
- @ echo 573 making ${OUT}/pf2sex.$(OBJEXT) from ${MID}/pf2sex.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/pf2sex.clisp" :output-file
"${OUT}/pf2sex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/pf2sex.clisp" :output-file
"${OUT}/pf2sex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/pf2sex.clisp: $(srcdir)/pf2sex.boot.pamphlet
- @ echo 574 making ${MID}/pf2sex.clisp from
$(srcdir)/pf2sex.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/pf2sex.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/pf2sex.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/pf2sex.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm pf2sex.boot )
-
-
- ${OUT}/pile.$(OBJEXT): ${MID}/pile.clisp
- @ echo 510 making ${OUT}/pile.$(OBJEXT) from ${MID}/pile.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/pile.clisp" :output-file
"${OUT}/pile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/pile.clisp" :output-file
"${OUT}/pile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/pile.clisp: $(srcdir)/pile.boot.pamphlet
- @ echo 511 making ${MID}/pile.clisp from $(srcdir)/pile.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/pile.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/pile.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/pile.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm pile.boot )
-
-
- ${OUT}/posit.$(OBJEXT): ${MID}/posit.clisp
- @ echo 540 making ${OUT}/posit.$(OBJEXT) from ${MID}/posit.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/posit.clisp" :output-file
"${OUT}/posit.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/posit.clisp" :output-file
"${OUT}/posit.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/posit.clisp: $(srcdir)/posit.boot.pamphlet
- @ echo 541 making ${MID}/posit.clisp from $(srcdir)/posit.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/posit.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/posit.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/posit.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm posit.boot )
-
-
${AUTO}/postpar.$(OBJEXT): ${OUT}/postpar.$(OBJEXT)
@ echo 382 making ${AUTO}/postpar.$(OBJEXT) from
${OUT}/postpar.$(OBJEXT)
@ cp ${OUT}/postpar.$(OBJEXT) ${AUTO}
--- 2957,2962 ----
*************** ${MID}/pspad2.clisp: $(srcdir)/pspad2.bo
*** 3383,3428 ****
rm pspad2.boot )
- ${OUT}/ptrees.$(OBJEXT): ${MID}/ptrees.clisp
- @ echo 519 making ${OUT}/ptrees.$(OBJEXT) from ${MID}/ptrees.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/ptrees.clisp" :output-file
"${OUT}/ptrees.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/ptrees.clisp" :output-file
"${OUT}/ptrees.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/ptrees.clisp: $(srcdir)/ptrees.boot.pamphlet
- @ echo 520 making ${MID}/ptrees.clisp from
$(srcdir)/ptrees.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/ptrees.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/ptrees.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/ptrees.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm ptrees.boot )
-
-
- ${OUT}/ptrop.$(OBJEXT): ${MID}/ptrop.clisp
- @ echo 522 making ${OUT}/ptrop.$(OBJEXT) from ${MID}/ptrop.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/ptrop.clisp" :output-file
"${OUT}/ptrop.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/ptrop.clisp" :output-file
"${OUT}/ptrop.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/ptrop.clisp: $(srcdir)/ptrop.boot.pamphlet
- @ echo 523 making ${MID}/ptrop.clisp from $(srcdir)/ptrop.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/ptrop.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/ptrop.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/ptrop.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm ptrop.boot )
-
-
${OUT}/record.$(OBJEXT): ${MID}/record.clisp
@ echo 446 making ${OUT}/record.$(OBJEXT) from ${MID}/record.clisp
@ (cd ${MID} ; \
--- 3093,3098 ----
*************** ${MID}/rulesets.clisp: $(srcdir)/ruleset
*** 3465,3510 ****
rm rulesets.boot )
- ${OUT}/scan.$(OBJEXT): ${MID}/scan.clisp
- @ echo 507 making ${OUT}/scan.$(OBJEXT) from ${MID}/scan.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/scan.clisp" :output-file
"${OUT}/scan.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/scan.clisp" :output-file
"${OUT}/scan.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/scan.clisp: $(srcdir)/scan.boot.pamphlet
- @ echo 508 making ${MID}/scan.clisp from $(srcdir)/scan.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/scan.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/scan.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/scan.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm scan.boot )
-
-
- ${OUT}/serror.$(OBJEXT): ${MID}/serror.clisp
- @ echo 537 making ${OUT}/serror.$(OBJEXT) from ${MID}/serror.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/serror.clisp" :output-file
"${OUT}/serror.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/serror.clisp" :output-file
"${OUT}/serror.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/serror.clisp: $(srcdir)/serror.boot.pamphlet
- @ echo 538 making ${MID}/serror.clisp from
$(srcdir)/serror.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/serror.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/serror.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/serror.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm serror.boot )
-
-
${OUT}/server.$(OBJEXT): ${MID}/server.clisp
@ echo 390 making ${OUT}/server.$(OBJEXT) from ${MID}/server.clisp
@ (cd ${MID} ; \
--- 3135,3140 ----
*************** ${MID}/setvart.clisp: $(srcdir)/setvart.
*** 3579,3604 ****
rm setvart.boot )
- ${OUT}/sfsfun.$(OBJEXT): ${MID}/sfsfun.clisp
- @ echo 576 making ${OUT}/sfsfun.$(OBJEXT) from ${MID}/sfsfun.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/sfsfun.clisp" :output-file
"${OUT}/sfsfun.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/sfsfun.clisp" :output-file
"${OUT}/sfsfun.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/sfsfun.clisp: $(srcdir)/sfsfun.boot.pamphlet
- @ echo 577 making ${MID}/sfsfun.clisp from
$(srcdir)/sfsfun.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/sfsfun.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/sfsfun.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/sfsfun.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm sfsfun.boot )
-
-
${OUT}/sfsfun-l.$(OBJEXT): ${MID}/sfsfun-l.lisp
@ echo 561 making ${OUT}/sfsfun-l.$(OBJEXT) from ${MID}/sfsfun-l.lisp
@ if [ -z "${NOISE}" ] ; then \
--- 3209,3214 ----
*************** ${AUTO}/showimp.$(OBJEXT): ${OUT}/showim
*** 3614,3639 ****
@ echo 579 making ${AUTO}/showimp.$(OBJEXT) from
${OUT}/showimp.$(OBJEXT)
@ cp ${OUT}/showimp.$(OBJEXT) ${AUTO}
- ${OUT}/showimp.$(OBJEXT): ${MID}/showimp.clisp
- @ echo 580 making ${OUT}/showimp.$(OBJEXT) from ${MID}/showimp.clisp
- @ (cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/showimp.clisp" :output-file
"${OUT}/showimp.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/showimp.clisp" :output-file
"${OUT}/showimp.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi )
-
- ${MID}/showimp.clisp: $(srcdir)/showimp.boot.pamphlet
- @ echo 581 making ${MID}/showimp.lisp from
$(srcdir)/showimp.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/showimp.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "showimp.boot") (${BYE}))' |
${DEPSYS} ; \
- else \
- echo '(progn (boottran::boottocl "showimp.boot") (${BYE}))' |
${DEPSYS} >> ${TMP}/trace ; \
- fi ; \
- rm showimp.boot )
-
${OUT}/simpbool.$(OBJEXT): ${MID}/simpbool.clisp
@ echo 400 making ${OUT}/simpbool.$(OBJEXT) from ${MID}/simpbool.clisp
--- 3224,3229 ----
*************** ${OUT}/util.${LISP}: ${MID}/util.lisp
*** 3851,3876 ****
${MID}/util.lisp: $(srcdir)/util.lisp.pamphlet
$(axiom_build_document) --tangle --output=$@ $<
- ${OUT}/varini.$(OBJEXT): ${MID}/varini.clisp
- @ echo 546 making ${OUT}/varini.$(OBJEXT) from ${MID}/varini.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/varini.clisp" :output-file
"${OUT}/varini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/varini.clisp" :output-file
"${OUT}/varini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- ${MID}/varini.clisp: $(srcdir)/varini.boot.pamphlet
- @ echo 547 making ${MID}/varini.clisp from
$(srcdir)/varini.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/varini.boot $< ;\
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/varini.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/varini.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm varini.boot )
-
-
${OUT}/vmlisp.$(OBJEXT): $(MID)/vmlisp.lisp
@ echo 136 making ${OUT}/vmlisp.$(OBJEXT) from $<
@ (if [ -z "${NOISE}" ] ; then \
--- 3441,3446 ----
*** src/interp/Makefile.pamphlet (revision 15903)
--- src/interp/Makefile.pamphlet (local)
*************** into the {\bf OUT} directory. This is sy
*** 47,55 ****
machine-generated code and belongs in the {\bf \$SPAD/obj} subtree.
The dvi files will be generated from the pamphlet files in the
! final ship doc/src/ directory. Since they are system independent
but machine generated and part of the final ship they will exist
! in the [[$(axiom_target_docdir)/src/interp]] directory.
<<environment>>=
IN=${SRC}/interp
--- 47,55 ----
machine-generated code and belongs in the {\bf \$SPAD/obj} subtree.
The dvi files will be generated from the pamphlet files in the
! final ship \File{doc/src/} directory. Since they are system independent
but machine generated and part of the final ship they will exist
! in the \File{\$(axiom_target_docdir)/src/interp/} directory.
<<environment>>=
IN=${SRC}/interp
*************** OUT=${OBJ}/${SYS}/interp
*** 58,63 ****
--- 58,69 ----
DOC=$(axiom_target_docdir)/src/interp
BOOK=$(axiom_target_docdir)
+ # Command to translate Boot to Common Lisp
+ BOOT_TO_LISP = echo '(boottran::boottocl "$<")' | $(BOOTSYS) >> $(TMP)/trace
+
+ # Command to translate Common Lisp to native object code
+ COMPILE_LISP = echo '(compile-file "$<" :output-file "$@")' | $(DEPSYS) \
+ >> $(TMP)/trace
@
In order to minimize the size of the Axiom image at load time
*************** and {\bf setq.lisp}. The {\bf bootfuns.l
*** 178,183 ****
--- 184,193 ----
contains forward references for {\bf boot} code. The {\bf setq.lisp}
file contains constant initialization code which gains nothing
by being compiled.
+
+ The value of the variable [[AXIOMsys_boot_sources]] is the (currently
+ partial) list of Boot source files that make up the interpreter.
+
<<environment>>=
OBJS= ${OUT}/vmlisp.$(OBJEXT) ${OUT}/hash.$(OBJEXT) \
${OUT}/bootfuns.${LISP} ${OUT}/macros.$(OBJEXT) \
*************** OBJS= ${OUT}/vmlisp.$(OBJEXT) ${OUT}/has
*** 234,239 ****
--- 244,265 ----
${OUT}/union.$(OBJEXT) ${OUT}/daase.$(OBJEXT) \
${OUT}/fortcall.$(OBJEXT)
+
+ AXIOMsys_boot_sources = astr.boot alql.boot buildom.boot cattable.boot \
+ cformat.boot clam.boot clammed.boot compat.boot compress.boot \
+ cparse.boot cstream.boot database.boot dq.boot format.boot \
+ g-boot.boot g-cndata.boot g-error.boot g-opt.boot g-timer.boot \
+ g-util.boot hypertex.boot i-analy.boot i-code.boot i-coerce.boot \
+ i-coerfn.boot i-eval.boot i-funsel.boot i-intern.boot i-map.boot \
+ i-output.boot i-resolv.boot i-spec1.boot i-spec2.boot \
+ i-syscmd.boot i-toplev.boot i-util.boot incl.boot int-top.boot \
+ intfile.boot lisplib.boot macex.boot match.boot msg.boot \
+ msgdb.boot newfort.boot nrunfast.boot nrungo.boot nrunopt.boot \
+ nruntime.boot osyscmd.boot packtran.boot pathname.boot \
+ pf2sex.boot pile.boot posit.boot ptrees.boot ptrop.boot \
+ record.boot rulesets.boot scan.boot serror.boot server.boot \
+ setvars.boot sfsfun.boot simpbool.boot slam.boot template.boot \
+ termrw.boot trace.boot fortcall.boot
@
Before we save the {\bf SAVESYS} image we need to run some
*************** exist.
*** 392,397 ****
--- 418,448 ----
@
+ \section{Codes from Pamphlets}
+
+ As noted earlier, the Boot codes are first extrated from the pamphlet
+ files:
+ <<extract source codes>>=
+ %.boot: $(srcdir)/%.boot.pamphlet
+ $(axiom_build_document) --tangle --output=$@ $<
+ @
+
+ The extracted Boot codes are then fed into [[bootsys]] which translates
+ them into Common Lisp codes:
+ <<extract source codes>>=
+ .PRECIOUS: %.clisp
+ %.clisp: %.boot
+ $(BOOT_TO_LISP)
+ @
+
+ The resulting Common Lips codes are, in turn, compiled to object codes
+ using the [[depsys]] image.
+ <<extract source codes>>=
+ .PRECIOUS: $(OUT)/%.$(OBJEXT)
+ $(OUT)/%.$(OBJEXT): %.clisp
+ $(COMPILE_LISP)
+ @
+
\section{Proclaim optimization}
GCL, and possibly other common lisps, can generate much better
code if the function argument types and return values are proclaimed.
*************** ${MID}/unlisp.lisp: $(srcdir)/unlisp.lis
*** 4794,5224 ****
$(axiom_build_document) --tangle --output=$@ $<
@
- \subsection{incl.boot}
- <<incl.o (OUT from MID)>>=
- ${OUT}/incl.$(OBJEXT): ${MID}/incl.clisp
- @ echo 504 making ${OUT}/incl.$(OBJEXT) from ${MID}/incl.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/incl.clisp" :output-file
"${OUT}/incl.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/incl.clisp" :output-file
"${OUT}/incl.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<incl.clisp (MID from IN)>>=
- ${MID}/incl.clisp: $(srcdir)/incl.boot.pamphlet
- @ echo 505 making ${MID}/incl.clisp from $(srcdir)/incl.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/incl.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/incl.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/incl.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm incl.boot )
-
- @
-
- \subsection{scan.boot}
- <<scan.o (OUT from MID)>>=
- ${OUT}/scan.$(OBJEXT): ${MID}/scan.clisp
- @ echo 507 making ${OUT}/scan.$(OBJEXT) from ${MID}/scan.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/scan.clisp" :output-file
"${OUT}/scan.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/scan.clisp" :output-file
"${OUT}/scan.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<scan.clisp (MID from IN)>>=
- ${MID}/scan.clisp: $(srcdir)/scan.boot.pamphlet
- @ echo 508 making ${MID}/scan.clisp from $(srcdir)/scan.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/scan.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/scan.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/scan.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm scan.boot )
-
- @
-
- \subsection{pile.boot}
- <<pile.o (OUT from MID)>>=
- ${OUT}/pile.$(OBJEXT): ${MID}/pile.clisp
- @ echo 510 making ${OUT}/pile.$(OBJEXT) from ${MID}/pile.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/pile.clisp" :output-file
"${OUT}/pile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/pile.clisp" :output-file
"${OUT}/pile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<pile.clisp (MID from IN)>>=
- ${MID}/pile.clisp: $(srcdir)/pile.boot.pamphlet
- @ echo 511 making ${MID}/pile.clisp from $(srcdir)/pile.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/pile.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/pile.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/pile.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm pile.boot )
-
- @
-
- \subsection{cparse.boot}
- <<cparse.o (OUT from MID)>>=
- ${OUT}/cparse.$(OBJEXT): ${MID}/cparse.clisp
- @ echo 513 making ${OUT}/cparse.$(OBJEXT) from ${MID}/cparse.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/cparse.clisp" :output-file
"${OUT}/cparse.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/cparse.clisp" :output-file
"${OUT}/cparse.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<cparse.clisp (MID from IN)>>=
- ${MID}/cparse.clisp: $(srcdir)/cparse.boot.pamphlet
- @ echo 514 making ${MID}/cparse.clisp from
$(srcdir)/cparse.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/cparse.boot $< ;\
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/cparse.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/cparse.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm cparse.boot )
-
- @
-
- \subsection{macex.boot}
- <<macex.o (OUT from MID)>>=
- ${OUT}/macex.$(OBJEXT): ${MID}/macex.clisp
- @ echo 516 making ${OUT}/macex.$(OBJEXT) from ${MID}/macex.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/macex.clisp" :output-file
"${OUT}/macex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/macex.clisp" :output-file
"${OUT}/macex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<macex.clisp (MID from IN)>>=
- ${MID}/macex.clisp: $(srcdir)/macex.boot.pamphlet
- @ echo 517 making ${MID}/macex.clisp from $(srcdir)/macex.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/macex.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/macex.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/macex.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm macex.boot )
-
- @
-
- \subsection{ptrees.boot}
- <<ptrees.o (OUT from MID)>>=
- ${OUT}/ptrees.$(OBJEXT): ${MID}/ptrees.clisp
- @ echo 519 making ${OUT}/ptrees.$(OBJEXT) from ${MID}/ptrees.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/ptrees.clisp" :output-file
"${OUT}/ptrees.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/ptrees.clisp" :output-file
"${OUT}/ptrees.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<ptrees.clisp (MID from IN)>>=
- ${MID}/ptrees.clisp: $(srcdir)/ptrees.boot.pamphlet
- @ echo 520 making ${MID}/ptrees.clisp from
$(srcdir)/ptrees.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/ptrees.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/ptrees.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/ptrees.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm ptrees.boot )
-
- @
-
- \subsection{ptrop.boot}
- <<ptrop.o (OUT from MID)>>=
- ${OUT}/ptrop.$(OBJEXT): ${MID}/ptrop.clisp
- @ echo 522 making ${OUT}/ptrop.$(OBJEXT) from ${MID}/ptrop.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/ptrop.clisp" :output-file
"${OUT}/ptrop.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/ptrop.clisp" :output-file
"${OUT}/ptrop.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<ptrop.clisp (MID from IN)>>=
- ${MID}/ptrop.clisp: $(srcdir)/ptrop.boot.pamphlet
- @ echo 523 making ${MID}/ptrop.clisp from $(srcdir)/ptrop.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/ptrop.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/ptrop.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/ptrop.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm ptrop.boot )
-
- @
-
- \subsection{dq.boot}
- <<dq.o (OUT from MID)>>=
- ${OUT}/dq.$(OBJEXT): ${MID}/dq.clisp
- @ echo 525 making ${OUT}/dq.$(OBJEXT) from ${MID}/dq.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/dq.clisp" :output-file
"${OUT}/dq.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/dq.clisp" :output-file
"${OUT}/dq.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<dq.clisp (MID from IN)>>=
- ${MID}/dq.clisp: $(srcdir)/dq.boot.pamphlet
- @ echo 526 making ${MID}/dq.clisp from $(srcdir)/dq.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/dq.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/dq.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/dq.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm dq.boot )
-
- @
-
- \subsection{cstream.boot}
- <<cstream.o (OUT from MID)>>=
- ${OUT}/cstream.$(OBJEXT): ${MID}/cstream.clisp
- @ echo 528 making ${OUT}/cstream.$(OBJEXT) from ${MID}/cstream.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/cstream.clisp" :output-file
"${OUT}/cstream.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/cstream.clisp" :output-file
"${OUT}/cstream.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<cstream.clisp (MID from IN)>>=
- ${MID}/cstream.clisp: $(srcdir)/cstream.boot.pamphlet
- @ echo 529 making ${MID}/cstream.clisp from
$(srcdir)/cstream.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/cstream.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/cstream.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/cstream.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm cstream.boot )
-
- @
-
- \subsection{astr.boot}
- <<astr.o (OUT from MID)>>=
- ${OUT}/astr.$(OBJEXT): ${MID}/astr.clisp
- @ echo 531 making ${OUT}/astr.$(OBJEXT) from ${MID}/astr.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/astr.clisp" :output-file
"${OUT}/astr.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/astr.clisp" :output-file
"${OUT}/astr.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<astr.clisp (MID from IN)>>=
- ${MID}/astr.clisp: $(srcdir)/astr.boot.pamphlet
- @ echo 532 making ${MID}/astr.clisp from $(srcdir)/astr.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/astr.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/astr.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/astr.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm astr.boot )
-
- @
-
- \subsection{msg.boot}
- <<msg.o (OUT from MID)>>=
- ${OUT}/msg.$(OBJEXT): ${MID}/msg.clisp
- @ echo 534 making ${OUT}/msg.$(OBJEXT) from ${MID}/msg.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/msg.clisp" :output-file
"${OUT}/msg.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/msg.clisp" :output-file
"${OUT}/msg.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<msg.clisp (MID from IN)>>=
- ${MID}/msg.clisp: $(srcdir)/msg.boot.pamphlet
- @ echo 535 making ${MID}/msg.clisp from $(srcdir)/msg.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/msg.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/msg.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/msg.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm msg.boot )
-
- @
-
- \subsection{serror.boot}
- <<serror.o (OUT from MID)>>=
- ${OUT}/serror.$(OBJEXT): ${MID}/serror.clisp
- @ echo 537 making ${OUT}/serror.$(OBJEXT) from ${MID}/serror.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/serror.clisp" :output-file
"${OUT}/serror.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/serror.clisp" :output-file
"${OUT}/serror.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<serror.clisp (MID from IN)>>=
- ${MID}/serror.clisp: $(srcdir)/serror.boot.pamphlet
- @ echo 538 making ${MID}/serror.clisp from
$(srcdir)/serror.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/serror.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/serror.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/serror.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm serror.boot )
-
- @
-
- \subsection{posit.boot}
- <<posit.o (OUT from MID)>>=
- ${OUT}/posit.$(OBJEXT): ${MID}/posit.clisp
- @ echo 540 making ${OUT}/posit.$(OBJEXT) from ${MID}/posit.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/posit.clisp" :output-file
"${OUT}/posit.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/posit.clisp" :output-file
"${OUT}/posit.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<posit.clisp (MID from IN)>>=
- ${MID}/posit.clisp: $(srcdir)/posit.boot.pamphlet
- @ echo 541 making ${MID}/posit.clisp from $(srcdir)/posit.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/posit.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/posit.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/posit.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm posit.boot )
-
- @
-
- \subsection{cformat.boot}
- <<cformat.o (OUT from MID)>>=
- ${OUT}/cformat.$(OBJEXT): ${MID}/cformat.clisp
- @ echo 543 making ${OUT}/cformat.$(OBJEXT) from ${MID}/cformat.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/cformat.clisp" :output-file
"${OUT}/cformat.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/cformat.clisp" :output-file
"${OUT}/cformat.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<cformat.clisp (MID from IN)>>=
- ${MID}/cformat.clisp: $(srcdir)/cformat.boot.pamphlet
- @ echo 544 making ${MID}/cformat.clisp from
$(srcdir)/cformat.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/cformat.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/cformat.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/cformat.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm cformat.boot )
-
- @
-
- \subsection{varini.boot}
- <<varini.o (OUT from MID)>>=
- ${OUT}/varini.$(OBJEXT): ${MID}/varini.clisp
- @ echo 546 making ${OUT}/varini.$(OBJEXT) from ${MID}/varini.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/varini.clisp" :output-file
"${OUT}/varini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/varini.clisp" :output-file
"${OUT}/varini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<varini.clisp (MID from IN)>>=
- ${MID}/varini.clisp: $(srcdir)/varini.boot.pamphlet
- @ echo 547 making ${MID}/varini.clisp from
$(srcdir)/varini.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/varini.boot $< ;\
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/varini.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/varini.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm varini.boot )
-
- @
-
- \subsection{parini.boot}
- <<parini.o (OUT from MID)>>=
- ${OUT}/parini.$(OBJEXT): ${MID}/parini.clisp
- @ echo 549 making ${OUT}/parini.$(OBJEXT) from ${MID}/parini.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/parini.clisp" :output-file
"${OUT}/parini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/parini.clisp" :output-file
"${OUT}/parini.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<parini.clisp (MID from IN)>>=
- ${MID}/parini.clisp: $(srcdir)/parini.boot.pamphlet
- @ echo 550 making ${MID}/parini.clisp from
$(srcdir)/parini.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/parini.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/parini.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/parini.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm parini.boot )
-
- @
-
- \subsection{intfile.boot}
- <<intfile.o (OUT from MID)>>=
- ${OUT}/intfile.$(OBJEXT): ${MID}/intfile.clisp
- @ echo 552 making ${OUT}/intfile.$(OBJEXT) from ${MID}/intfile.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/intfile.clisp" :output-file
"${OUT}/intfile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/intfile.clisp" :output-file
"${OUT}/intfile.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<intfile.clisp (MID from IN)>>=
- ${MID}/intfile.clisp: $(srcdir)/intfile.boot.pamphlet
- @ echo 553 making ${MID}/intfile.clisp from
$(srcdir)/intfile.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/intfile.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/intfile.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/intfile.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm intfile.boot )
-
- @
-
\subsection{intint.lisp}
this is the code that links the new parser to the interpreter
<<intint.o (OUT from MID)>>=
--- 4845,4850 ----
*************** ${MID}/sfsfun-l.lisp: $(srcdir)/sfsfun-l
*** 5268,5398 ****
$(axiom_build_document) --tangle --output=$@ $<
@
- \subsection{int-top.boot}
- <<int-top.o (OUT from MID)>>=
- ${OUT}/int-top.$(OBJEXT): ${MID}/int-top.clisp
- @ echo 564 making ${OUT}/int-top.$(OBJEXT) from ${MID}/int-top.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/int-top.clisp" :output-file
"${OUT}/int-top.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/int-top.clisp" :output-file
"${OUT}/int-top.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<int-top.clisp (MID from IN)>>=
- ${MID}/int-top.clisp: $(srcdir)/int-top.boot.pamphlet
- @ echo 565 making ${MID}/int-top.clisp from
$(srcdir)/int-top.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/int-top.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/int-top.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/int-top.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm int-top.boot )
-
- @
-
- \subsection{osyscmd.boot}
- <<osyscmd.o (OUT from MID)>>=
- ${OUT}/osyscmd.$(OBJEXT): ${MID}/osyscmd.clisp
- @ echo 567 making ${OUT}/osyscmd.$(OBJEXT) from ${MID}/osyscmd.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/osyscmd.clisp" :output-file
"${OUT}/osyscmd.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/osyscmd.clisp" :output-file
"${OUT}/osyscmd.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<osyscmd.clisp (MID from IN)>>=
- ${MID}/osyscmd.clisp: $(srcdir)/osyscmd.boot.pamphlet
- @ echo 568 making ${MID}/osyscmd.clisp from
$(srcdir)/osyscmd.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/osyscmd.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/osyscmd.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/osyscmd.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm osyscmd.boot )
-
- @
-
- \subsection{packtran.boot}
- <<packtran.o (OUT from MID)>>=
- ${OUT}/packtran.$(OBJEXT): ${MID}/packtran.clisp
- @ echo 570 making ${OUT}/packtran.$(OBJEXT) from ${MID}/packtran.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/packtran.clisp" :output-file
"${OUT}/packtran.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/packtran.clisp" :output-file
"${OUT}/packtran.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<packtran.clisp (MID from IN)>>=
- ${MID}/packtran.clisp: $(srcdir)/packtran.boot.pamphlet
- @ echo 571 making ${MID}/packtran.clisp from
$(srcdir)/packtran.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/packtran.boot $< ;\
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/packtran.boot") (${BYE}))'
| ${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/packtran.boot") (${BYE}))'
| ${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm packtran.boot )
-
- @
-
- \subsection{pf2sex.boot}
- <<pf2sex.o (OUT from MID)>>=
- ${OUT}/pf2sex.$(OBJEXT): ${MID}/pf2sex.clisp
- @ echo 573 making ${OUT}/pf2sex.$(OBJEXT) from ${MID}/pf2sex.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/pf2sex.clisp" :output-file
"${OUT}/pf2sex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/pf2sex.clisp" :output-file
"${OUT}/pf2sex.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<pf2sex.clisp (MID from IN)>>=
- ${MID}/pf2sex.clisp: $(srcdir)/pf2sex.boot.pamphlet
- @ echo 574 making ${MID}/pf2sex.clisp from
$(srcdir)/pf2sex.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/pf2sex.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/pf2sex.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/pf2sex.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm pf2sex.boot )
-
- @
-
- \subsection{sfsfun.boot}
- <<sfsfun.o (OUT from MID)>>=
- ${OUT}/sfsfun.$(OBJEXT): ${MID}/sfsfun.clisp
- @ echo 576 making ${OUT}/sfsfun.$(OBJEXT) from ${MID}/sfsfun.clisp
- @ if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/sfsfun.clisp" :output-file
"${OUT}/sfsfun.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/sfsfun.clisp" :output-file
"${OUT}/sfsfun.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi
-
- @
- <<sfsfun.clisp (MID from IN)>>=
- ${MID}/sfsfun.clisp: $(srcdir)/sfsfun.boot.pamphlet
- @ echo 577 making ${MID}/sfsfun.clisp from
$(srcdir)/sfsfun.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/sfsfun.boot $< ; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "${MID}/sfsfun.boot") (${BYE}))' |
${BOOTSYS} ; \
- else \
- echo '(progn (boottran::boottocl "${MID}/sfsfun.boot") (${BYE}))' |
${BOOTSYS} >> ${TMP}/trace ; \
- fi ; \
- rm sfsfun.boot )
-
- @
-
\subsection{showimp.boot}
system level hacking files
<<showimp.o (AUTO from OUT)>>=
--- 4894,4899 ----
*************** ${AUTO}/showimp.$(OBJEXT): ${OUT}/showim
*** 5401,5430 ****
@ cp ${OUT}/showimp.$(OBJEXT) ${AUTO}
@
- <<showimp.o (OUT from MID)>>=
- ${OUT}/showimp.$(OBJEXT): ${MID}/showimp.clisp
- @ echo 580 making ${OUT}/showimp.$(OBJEXT) from ${MID}/showimp.clisp
- @ (cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (compile-file "${MID}/showimp.clisp" :output-file
"${OUT}/showimp.$(OBJEXT)") (${BYE}))' | ${DEPSYS} ; \
- else \
- echo '(progn (compile-file "${MID}/showimp.clisp" :output-file
"${OUT}/showimp.$(OBJEXT)") (${BYE}))' | ${DEPSYS} >> ${TMP}/trace ; \
- fi )
-
- @
- <<showimp.clisp (MID from IN)>>=
- ${MID}/showimp.clisp: $(srcdir)/showimp.boot.pamphlet
- @ echo 581 making ${MID}/showimp.lisp from
$(srcdir)/showimp.boot.pamphlet
- @ ($(axiom_build_document) --tangle --output=$(MID)/showimp.boot $<; \
- cd ${MID} ; \
- if [ -z "${NOISE}" ] ; then \
- echo '(progn (boottran::boottocl "showimp.boot") (${BYE}))' |
${DEPSYS} ; \
- else \
- echo '(progn (boottran::boottocl "showimp.boot") (${BYE}))' |
${DEPSYS} >> ${TMP}/trace ; \
- fi ; \
- rm showimp.boot )
-
- @
\subsection{hashcode.boot}
files for the new compiler
--- 4902,4907 ----
*************** $(AUTO):
*** 5750,5755 ****
--- 5227,5233 ----
$(MID):
$(mkinstalldirs) $@
+ <<extract source codes>>
mostlyclean-local: ;
*************** distclean-local: clean-local
*** 5771,5779 ****
<<as.o (OUT from MID)>>
<<as.clisp (MID from IN)>>
- <<astr.o (OUT from MID)>>
- <<astr.clisp (MID from IN)>>
-
<<ax.o (AUTO from OUT)>>
<<ax.o (OUT from MID)>>
<<ax.clisp (MID from IN)>>
--- 5249,5254 ----
*************** distclean-local: clean-local
*** 5854,5862 ****
<<c-doc.o (OUT from MID)>>
<<c-doc.clisp (MID from IN)>>
- <<cformat.o (OUT from MID)>>
- <<cformat.clisp (MID from IN)>>
-
<<cfuns.o (OUT from MID)>>
<<cfuns.lisp (MID from IN)>>
--- 5329,5334 ----
*************** distclean-local: clean-local
*** 5883,5894 ****
<<construc.o (OUT from MID)>>
<<construc.lisp (MID from IN)>>
- <<cparse.o (OUT from MID)>>
- <<cparse.clisp (MID from IN)>>
-
- <<cstream.o (OUT from MID)>>
- <<cstream.clisp (MID from IN)>>
-
<<c-util.o (AUTO from OUT)>>
<<c-util.lisp (OUT from IN)>>
<<c-util.o (OUT from MID)>>
--- 5355,5360 ----
*************** distclean-local: clean-local
*** 5914,5922 ****
<<define.o (OUT from MID)>>
<<define.clisp (MID from IN)>>
- <<dq.o (OUT from MID)>>
- <<dq.clisp (MID from IN)>>
-
<<fname.o (OUT from MID)>>
<<fname.lisp (MID from IN)>>
--- 5380,5385 ----
*************** distclean-local: clean-local
*** 6017,6038 ****
<<i-map.o (OUT from MID)>>
<<i-map.clisp (MID from IN)>>
- <<incl.o (OUT from MID)>>
- <<incl.clisp (MID from IN)>>
-
<<info.o (AUTO from OUT)>>
<<info.o (OUT from MID)>>
<<info.clisp (MID from IN)>>
- <<intfile.o (OUT from MID)>>
- <<intfile.clisp (MID from IN)>>
-
<<intint.o (OUT from MID)>>
<<intint.lisp (MID from IN)>>
- <<int-top.o (OUT from MID)>>
- <<int-top.clisp (MID from IN)>>
-
<<i-output.o (OUT from MID)>>
<<i-output.clisp (MID from IN)>>
--- 5480,5492 ----
*************** distclean-local: clean-local
*** 6061,6069 ****
<<lisplib.o (OUT from MID)>>
<<lisplib.clisp (MID from IN)>>
- <<macex.o (OUT from MID)>>
- <<macex.clisp (MID from IN)>>
-
<<macros.o (OUT from MID)>>
<<macros.lisp (MID from IN)>>
--- 5515,5520 ----
*************** distclean-local: clean-local
*** 6090,6098 ****
<<monitor.o (OUT from MID)>>
<<monitor.lisp (MID from IN)>>
- <<msg.o (OUT from MID)>>
- <<msg.clisp (MID from IN)>>
-
<<msgdb.o (OUT from MID)>>
<<msgdb.clisp (MID from IN)>>
--- 5541,5546 ----
*************** distclean-local: clean-local
*** 6192,6210 ****
<<obey.o (OUT from MID)>>
<<obey.lisp (MID from IN)>>
- <<osyscmd.o (OUT from MID)>>
- <<osyscmd.clisp (MID from IN)>>
-
<<package.o (AUTO from OUT)>>
<<package.o (OUT from MID)>>
<<package.clisp (MID from IN)>>
- <<packtran.o (OUT from MID)>>
- <<packtran.clisp (MID from IN)>>
-
- <<parini.o (OUT from MID)>>
- <<parini.clisp (MID from IN)>>
-
<<parse.o (AUTO from OUT)>>
<<parse.o (OUT from MID)>>
<<parse.lisp (OUT from IN)>>
--- 5640,5649 ----
*************** distclean-local: clean-local
*** 6221,6235 ****
<<pathname.o (OUT from MID)>>
<<pathname.clisp (MID from IN)>>
- <<pf2sex.o (OUT from MID)>>
- <<pf2sex.clisp (MID from IN)>>
-
- <<pile.o (OUT from MID)>>
- <<pile.clisp (MID from IN)>>
-
- <<posit.o (OUT from MID)>>
- <<posit.clisp (MID from IN)>>
-
<<postpar.o (AUTO from OUT)>>
<<postpar.lisp (OUT from IN)>>
<<postpar.o (OUT from MID)>>
--- 5660,5665 ----
*************** distclean-local: clean-local
*** 6257,6280 ****
<<pspad2.o (AUTO from MID)>>
<<pspad2.clisp (MID from IN)>>
- <<ptrees.o (OUT from MID)>>
- <<ptrees.clisp (MID from IN)>>
-
- <<ptrop.o (OUT from MID)>>
- <<ptrop.clisp (MID from IN)>>
-
<<record.o (OUT from MID)>>
<<record.clisp (MID from IN)>>
<<rulesets.o (OUT from MID)>>
<<rulesets.clisp (MID from IN)>>
- <<scan.o (OUT from MID)>>
- <<scan.clisp (MID from IN)>>
-
- <<serror.o (OUT from MID)>>
- <<serror.clisp (MID from IN)>>
-
<<server.o (OUT from MID)>>
<<server.clisp (MID from IN)>>
--- 5687,5698 ----
*************** distclean-local: clean-local
*** 6288,6302 ****
<<setvart.o (OUT from MID)>>
<<setvart.clisp (MID from IN)>>
- <<sfsfun.o (OUT from MID)>>
- <<sfsfun.clisp (MID from IN)>>
-
<<sfsfun-l.o (OUT from MID)>>
<<sfsfun-l.lisp (MID from IN)>>
<<showimp.o (AUTO from OUT)>>
- <<showimp.o (OUT from MID)>>
- <<showimp.clisp (MID from IN)>>
<<simpbool.o (OUT from MID)>>
<<simpbool.clisp (MID from IN)>>
--- 5706,5715 ----
*************** distclean-local: clean-local
*** 6340,6348 ****
<<util.lisp (OUT from MID)>>
<<util.lisp (MID from IN)>>
- <<varini.o (OUT from MID)>>
- <<varini.clisp (MID from IN)>>
-
<<vmlisp.o (OUT from MID)>>
<<vmlisp.lisp (MID from IN)>>
--- 5753,5758 ----
*** src/interp/debugsys.lisp.pamphlet (revision 15903)
--- src/interp/debugsys.lisp.pamphlet (local)
*************** loaded by hand we need to establish a va
*** 90,112 ****
(thesymb "/int/interp/macros.lisp")
(thesymb "/int/interp/unlisp.lisp")
(thesymb "/int/interp/setq.lisp")
! (thesymb "/int/interp/astr.clisp")
(thesymb "/int/interp/bits.lisp")
(thesymb "/int/interp/alql.clisp")
(thesymb "/int/interp/buildom.clisp")
(thesymb "/int/interp/cattable.clisp")
! (thesymb "/int/interp/cformat.clisp")
(thesymb (concatenate 'string "/obj/" *sys* "/interp/cfuns.o"))
(thesymb "/int/interp/clam.clisp")
(thesymb "/int/interp/clammed.clisp")
(thesymb "/int/interp/comp.lisp")
(thesymb "/int/interp/compat.clisp")
(thesymb "/int/interp/compress.clisp")
! (thesymb "/int/interp/cparse.clisp")
! (thesymb "/int/interp/cstream.clisp")
(thesymb "/int/interp/database.clisp")
(thesymb "/int/interp/debug.lisp")
! (thesymb "/int/interp/dq.clisp")
(thesymb "/int/interp/fname.lisp")
(thesymb "/int/interp/format.clisp")
(thesymb "/int/interp/g-boot.clisp")
--- 90,112 ----
(thesymb "/int/interp/macros.lisp")
(thesymb "/int/interp/unlisp.lisp")
(thesymb "/int/interp/setq.lisp")
! "astr.clisp"
(thesymb "/int/interp/bits.lisp")
(thesymb "/int/interp/alql.clisp")
(thesymb "/int/interp/buildom.clisp")
(thesymb "/int/interp/cattable.clisp")
! "cformat.clisp"
(thesymb (concatenate 'string "/obj/" *sys* "/interp/cfuns.o"))
(thesymb "/int/interp/clam.clisp")
(thesymb "/int/interp/clammed.clisp")
(thesymb "/int/interp/comp.lisp")
(thesymb "/int/interp/compat.clisp")
(thesymb "/int/interp/compress.clisp")
! "cparse.clisp"
! "cstream.clisp"
(thesymb "/int/interp/database.clisp")
(thesymb "/int/interp/debug.lisp")
! "dq.clisp"
(thesymb "/int/interp/fname.lisp")
(thesymb "/int/interp/format.clisp")
(thesymb "/int/interp/g-boot.clisp")
*************** loaded by hand we need to establish a va
*** 132,145 ****
(thesymb "/int/interp/i-syscmd.clisp")
(thesymb "/int/interp/i-toplev.clisp")
(thesymb "/int/interp/i-util.clisp")
! (thesymb "/int/interp/incl.clisp")
! (thesymb "/int/interp/int-top.clisp")
! (thesymb "/int/interp/intfile.clisp")
(thesymb "/int/interp/lisplib.clisp")
! (thesymb "/int/interp/macex.clisp")
(thesymb "/int/interp/match.clisp")
(thesymb "/int/interp/monitor.lisp")
! (thesymb "/int/interp/msg.clisp")
(thesymb "/int/interp/msgdb.clisp")
(thesymb "/int/interp/nci.lisp")
(thesymb "/int/interp/newaux.lisp")
--- 132,145 ----
(thesymb "/int/interp/i-syscmd.clisp")
(thesymb "/int/interp/i-toplev.clisp")
(thesymb "/int/interp/i-util.clisp")
! "incl.clisp"
! "int-top.clisp"
! "intfile.clisp"
(thesymb "/int/interp/lisplib.clisp")
! "macex.clisp"
(thesymb "/int/interp/match.clisp")
(thesymb "/int/interp/monitor.lisp")
! "msg.clisp"
(thesymb "/int/interp/msgdb.clisp")
(thesymb "/int/interp/nci.lisp")
(thesymb "/int/interp/newaux.lisp")
*************** loaded by hand we need to establish a va
*** 149,171 ****
(thesymb "/int/interp/nrungo.clisp")
(thesymb "/int/interp/nrunopt.clisp")
(thesymb "/int/interp/nruntime.clisp")
! (thesymb "/int/interp/osyscmd.clisp")
! (thesymb "/int/interp/packtran.clisp")
(thesymb "/int/interp/pathname.clisp")
! (thesymb "/int/interp/pf2sex.clisp")
! (thesymb "/int/interp/pile.clisp")
! (thesymb "/int/interp/posit.clisp")
(thesymb "/int/interp/property.lisp")
! (thesymb "/int/interp/ptrees.clisp")
! (thesymb "/int/interp/ptrop.clisp")
(thesymb "/int/interp/record.clisp")
(thesymb "/int/interp/rulesets.clisp")
! (thesymb "/int/interp/scan.clisp")
! (thesymb "/int/interp/serror.clisp")
(thesymb "/int/interp/server.clisp")
(thesymb "/int/interp/setvars.clisp")
(thesymb "/int/interp/sfsfun-l.lisp")
! (thesymb "/int/interp/sfsfun.clisp")
(thesymb "/int/interp/simpbool.clisp")
(thesymb "/int/interp/slam.clisp")
(thesymb (concatenate 'string "/obj/" *sys* "/interp/sockio.o"))
--- 149,171 ----
(thesymb "/int/interp/nrungo.clisp")
(thesymb "/int/interp/nrunopt.clisp")
(thesymb "/int/interp/nruntime.clisp")
! "osyscmd.clisp"
! "packtran.clisp"
(thesymb "/int/interp/pathname.clisp")
! "pf2sex.clisp"
! "pile.clisp"
! "posit.clisp"
(thesymb "/int/interp/property.lisp")
! "ptrees.clisp"
! "ptrop.clisp"
(thesymb "/int/interp/record.clisp")
(thesymb "/int/interp/rulesets.clisp")
! "scan.clisp"
! "serror.clisp"
(thesymb "/int/interp/server.clisp")
(thesymb "/int/interp/setvars.clisp")
(thesymb "/int/interp/sfsfun-l.lisp")
! "sfsfun.clisp"
(thesymb "/int/interp/simpbool.clisp")
(thesymb "/int/interp/slam.clisp")
(thesymb (concatenate 'string "/obj/" *sys* "/interp/sockio.o"))
*************** loaded by hand we need to establish a va
*** 183,190 ****
(thesymb "/int/interp/foam_l.lisp")
(thesymb "/int/interp/axext_l.lisp"))
(list
! (thesymb "/int/interp/varini.clisp")
! (thesymb "/int/interp/parini.clisp")
(thesymb "/int/interp/setvart.clisp")
(thesymb "/int/interp/intint.lisp")
(thesymb "/int/interp/xrun.clisp")
--- 183,190 ----
(thesymb "/int/interp/foam_l.lisp")
(thesymb "/int/interp/axext_l.lisp"))
(list
! "varini.clisp"
! "parini.clisp"
(thesymb "/int/interp/setvart.clisp")
(thesymb "/int/interp/intint.lisp")
(thesymb "/int/interp/xrun.clisp")
*************** loaded by hand we need to establish a va
*** 227,233 ****
(thesymb "/int/interp/ht-root.clisp")
(thesymb "/int/interp/br-con.clisp")
(thesymb "/int/interp/br-data.clisp")
! (thesymb "/int/interp/showimp.clisp")
(thesymb "/int/interp/br-op1.clisp")
(thesymb "/int/interp/br-op2.clisp")
(thesymb "/int/interp/br-search.clisp")
--- 227,233 ----
(thesymb "/int/interp/ht-root.clisp")
(thesymb "/int/interp/br-con.clisp")
(thesymb "/int/interp/br-data.clisp")
! "showimp.clisp"
(thesymb "/int/interp/br-op1.clisp")
(thesymb "/int/interp/br-op2.clisp")
(thesymb "/int/interp/br-search.clisp")
--- End Message ---