5 files changed, 25 insertions, 37 deletions
diff --git a/src/interp/ChangeLog b/src/interp/ChangeLog
index f05f86fe..f81e7cce 100644
--- a/src/interp/ChangeLog
+++ b/src/interp/ChangeLog
@@ -1,3 +1,12 @@
+2007-11-01  Gabriel Dos Reis  <gdr@cs.tamu.edu>
+
+	* Makefile.pamphlet (compat.$(FASLEXT)): New rule.
+	(pathname.$(FASLEXT)): Likewise.
+	(<<compat.clisp>>): Remove.
+	(<<define.clisp>>): Likewise.
+	* compat.boot.pamphlet: Push into package "BOOT".
+	* pathname.boot: Import "nlib".
+
 2007-10-30  Gabriel Dos Reis  <gdr@cs.tamu.edu>
 
 	* Makefile.pamphlet (define.$(FASLEXT)): New rule.
diff --git a/src/interp/Makefile.in b/src/interp/Makefile.in
index 089d96b8..b2f00424 100644
--- a/src/interp/Makefile.in
+++ b/src/interp/Makefile.in
@@ -463,6 +463,9 @@ category.$(FASLEXT): category.boot g-util.$(FASLEXT)
 cattable.$(FASLEXT): cattable.boot simpbool.$(FASLEXT) g-util.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
+compat.$(FASLEXT): compat.boot pathname.$(FASLEXT)
+	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
+
 simpbool.$(FASLEXT): simpbool.boot macros.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
@@ -600,6 +603,9 @@ g-error.$(FASLEXT): g-error.boot diagnostics.$(FASLEXT) g-util.$(FASLEXT)
 c-util.$(FASLEXT): c-util.boot g-util.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
+pathname.$(FASLEXT): pathname.boot nlib.$(FASLEXT)
+	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
+
 g-util.$(FASLEXT): g-util.boot macros.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
@@ -675,10 +681,6 @@ clammed.clisp: clammed.boot
 	@ echo 226 making $@ from $<
 	@ echo '(old-boot::boot "clammed.boot")' | ${DEPSYS} 
 
-compat.clisp: compat.boot
-	@ echo 229 making $@ from $<
-	@ echo '(old-boot::boot "compat.boot")' | ${DEPSYS} 
-
 compiler.clisp: compiler.boot
 	@ echo 233 making $@ from $<
 	@ echo '(old-boot::boot "compiler.boot")' | ${DEPSYS}
@@ -687,10 +689,6 @@ database.clisp: database.boot
 	@ echo 243 making $@ from $<
 	@ echo '(old-boot::boot "database.boot")' | ${DEPSYS}
 
-define.clisp: define.boot
-	@ echo 247 making $@ from $<
-	@ echo '(old-boot::boot "define.boot")' | ${DEPSYS}
-
 functor.clisp: functor.boot
 	@ echo 254 making $@ from $<
 	@ echo '(old-boot::boot "functor.boot")' | ${DEPSYS}
diff --git a/src/interp/Makefile.pamphlet b/src/interp/Makefile.pamphlet
index 9aff4959..9ff90c55 100644
--- a/src/interp/Makefile.pamphlet
+++ b/src/interp/Makefile.pamphlet
@@ -1100,14 +1100,6 @@ clammed.clisp: clammed.boot
 	@ echo '(old-boot::boot "clammed.boot")' | ${DEPSYS} 
 @
 
-\subsection{compat.boot \cite{63}}
-
-<<compat.clisp>>=
-compat.clisp: compat.boot
-	@ echo 229 making $@ from $<
-	@ echo '(old-boot::boot "compat.boot")' | ${DEPSYS} 
-@
-
 \subsection{compiler.boot \cite{64}}
 
 <<compiler.clisp>>=
@@ -1333,25 +1325,6 @@ nrunopt.clisp: nrunopt.boot
 	@ echo '(old-boot::boot "nrunopt.boot")' | ${DEPSYS}
 @
 
-
-\subsection{pathname.boot}
-
-\begin{verbatim}
-NOTE: the .clisp file is copies back into the src directory so that
-it is possible to create a new obootsys system from scratch for a 
-new platform. parse.clisp needs to be compiled in a depsys.
-One thing need to be done to create an obootsys by hand:
-  parse and postpar must be loaded along with the depsys files
-     into a bare lisp system.
-if these two things are done then a obootsys image can be bootstrapped
-to a new platform.
-\end{verbatim}
-<<pathname.clisp>>=
-pathname.clisp: pathname.boot
-	@ echo 380 making $@ from $<
-	@ echo '(old-boot::boot "pathname.boot")' | ${DEPSYS}
-@
-
 \subsection{postpar.boot}
 
 \begin{verbatim}
@@ -1597,6 +1570,9 @@ category.$(FASLEXT): category.boot g-util.$(FASLEXT)
 cattable.$(FASLEXT): cattable.boot simpbool.$(FASLEXT) g-util.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
+compat.$(FASLEXT): compat.boot pathname.$(FASLEXT)
+	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
+
 simpbool.$(FASLEXT): simpbool.boot macros.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
@@ -1734,6 +1710,9 @@ g-error.$(FASLEXT): g-error.boot diagnostics.$(FASLEXT) g-util.$(FASLEXT)
 c-util.$(FASLEXT): c-util.boot g-util.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
+pathname.$(FASLEXT): pathname.boot nlib.$(FASLEXT)
+	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
+
 g-util.$(FASLEXT): g-util.boot macros.$(FASLEXT)
 	$(BOOTSYS) -- --compile --boot="old" --output=$@ --load-directory=. $<
 
@@ -1791,8 +1770,6 @@ boot-pkg.$(FASLEXT): boot-pkg.lisp
 
 <<clammed.clisp>>
 
-<<compat.clisp>>
-
 <<compiler.clisp>>
 
 <<database.clisp>>
diff --git a/src/interp/compat.boot.pamphlet b/src/interp/compat.boot.pamphlet
index 26e11810..2db27b0a 100644
--- a/src/interp/compat.boot.pamphlet
+++ b/src/interp/compat.boot.pamphlet
@@ -58,6 +58,9 @@ READLINE(:s) ==
 <<*>>=
 <<license>>
 
+import '"pathname"
+)package "BOOT"
+
 -- some functions that may need to be changed on different lisp
 -- systems.
  
diff --git a/src/interp/pathname.boot b/src/interp/pathname.boot
index fc3f882a..8184ab1d 100644
--- a/src/interp/pathname.boot
+++ b/src/interp/pathname.boot
@@ -32,6 +32,7 @@
 -- SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 
+import '"nlib"
 )package "BOOT"
 
 -- This file implements the Common Lisp pathname functions for