%% 
%% This is file `demo.tex',
%% generated with the docstrip utility.
%% 
%% The original source files were:
%% 
%% overword.dtx  (with options: `demo')
%% 
%% This file is part of the Overword package, 
%% Copyright (C) 1996 Frank Bennett, Jr. 
%% All rights reserved. 
%% ------------------------------------------ 
%% This file is provided for demonstration purposes; feel free 
%% to edit it in any way whatsoever. 
%% ------------------------------------------ 
%% 
\documentclass{minimal}
\usepackage{overword}

\begin{document}

\makeatletter

\newtoks\registerone
\newtoks\registertwo
\def\list{}

\def\stashonright{%
  \registerone=\expandafter{\@overword}
  \registertwo=\expandafter{\list}
  \edef\list{%
    \noexpand\\{\the\registerone}\the\registertwo}}

\def\showlist{%
  \def\\##1{\message{##1}}
  \message{\space\space -> }
  \list
  \message{^^J}}

\def\readlistagain{%
  \def\\##1{ ##1 }
  \edef\listtext{\list}
\message{\listtext}
  \expandafter\store\listtext\enditall}

\def\storeandshow{%
  \@ifoverword\enditall
   {\message{^^J^^JRan into enditall!^^J}
    \stashonright
    \expandafter\showlist\@gobble}
   {\stashonright
    \storeandshow}
   {\message{^^J^^JRan into end!^^J}
    \stashonright
    \showlist}}

\storeandshow This is a demonstration of the overword package \enditall

\let\listclone\list
\def\list{}
\def\\#1{ #1 }
\edef\listtext{\listclone}
\expandafter\storeandshow\listtext

\end{document}


%% 
%% End of file `demo.tex'.