diff --git a/books/bookvol5.pamphlet b/books/bookvol5.pamphlet
index 8376b47..84aa41a 100644
--- a/books/bookvol5.pamphlet
+++ b/books/bookvol5.pamphlet
@@ -34687,7 +34687,6 @@ The IO state manipulation routines assume that
\item there is a reduction stack
\end{itemize}
\calls{ioclear}{line-clear}
-\calls{ioclear}{token-stack-clear}
\calls{ioclear}{reduce-stack-clear}
\uses{ioclear}{current-fragment}
\uses{ioclear}{current-line}
@@ -34698,7 +34697,9 @@ The IO state manipulation routines assume that
(declare (special current-fragment current-line $boot $spad))
(setq current-fragment nil)
(line-clear current-line)
- (token-stack-clear)
+ (token-install nil nil current-token nil)
+ (token-install nil nil next-token nil)
+ (token-install nil nil prior-token nil)
(reduce-stack-clear)
(if (or $boot $spad) (next-lines-clear))
nil)
diff --git a/changelog b/changelog
index 106664f..06a1e8e 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,6 @@
+20110511 tpd src/axiom-website/patches.html 20110511.01.tpd.patch
+20110511 tpd src/interp/parsing.lisp treeshake interpreter
+20110511 tpd books/bookvol5 treeshake interpreter
20110504 tpd src/axiom-website/patches.html 20110504.01.tpd.patch
20110504 tpd src/interp/parsing.lisp treeshake interpreter
20110504 tpd books/bookvol5 treeshake interpreter
diff --git a/src/axiom-website/patches.html b/src/axiom-website/patches.html
index cbc3550..49e68de 100644
--- a/src/axiom-website/patches.html
+++ b/src/axiom-website/patches.html
@@ -3466,5 +3466,7 @@ src/input/erf.input add examples of erf integration
books/bookvol5 treeshake interpreter
20110504.01.tpd.patch
books/bookvol5 treeshake interpreter
+20110511.01.tpd.patch
+books/bookvol5 treeshake interpreter