%texinfo.t2p
%7 Jan 2001

% To tex2page a texinfo file, say jobname.texi, 
% call \input texinfo.t2p in jobname.t2p, maybe put
% some additional stuff in jobname.t2p, and run
% tex2page jobname.texi

\let\comment\TIIPcomment
\let\c\comment
\let\changepagesizes\c
\let\setchapternewpage\c
\let\setfilename\c
\let\settitle\c
\let\headings\c
\let\synindex\c
\let\syncodeindex\c


\def\set#1 #2
{\expandafter\def\csname#1\endcsname{#2}}

\def\value#1{\csname#1\endcsname}

%\let\PRIMend\end

%\def\end#1 {\csname end#1\endcsname}

\let\PRIMnode\node

\def\node#1
{\PRIMnode{#1}}

\def\menu{\iffalse}
\def\endmenu{\fi}

\def\ignore{\iffalse}
\def\endignore{\fi}

\def\ifinfo{\iffalse}
\def\endifinfo{\fi}


\let\ifhtml\htmlonly
\let\endifhtml\endhtmlonly

\let\html\rawhtml
\let\endhtml\endrawhtml

%

\def\uref#1{\douref #1,,,\finish}

\def\douref#1,#2,#3,#4\finish{\urlh{#1}{#2}}

%

\let\include\input

%\verbescapechar\\
\let\code\texttt
\let\samp\texttt

\def\xref{See \S\ref}

\def\pxref{see \S\ref}

\let\\\TIIPbackslash

\let\dfn\textit
\let\file\texttt
\let\cite\textit
\let\b\textbf
\let\var\textit
\let\t\texttt

% index

\def\cindex#1
{\index{#1}}

\def\pindex#1
{\index{#1@{\tt#1}}}

\let\findex\pindex

\let\kindex\pindex

\let\vindex\pindex

\let\footnote\numfootnote

\def\center#1
{\centerline{#1}}

\let\PRIMitem\item

\let\TABLEitemstyle\relax

\def\TABLEitem#1
{\PRIMitem \TABLEitemstyle{#1}\break}

\def\table#1
{\begingroup\description
\def\TABLEitemstyle{#1}
\let\item\TABLEitem
\let\itemx\TABLEitem
}

\def\endtable{\enddescription\endgroup}

\let\ftable\table
\let\endftable\endtable

\let\PRIMitemize\itemize

\def\itemize#1
{\PRIMitemize}

\def\example{\par\bgroup\tt\obeywhitespace\ignorespaces}

\def\endexample{\egroup\par}

\let\PRIMenumerate\enumerate
\let\PRIMendenumerate\endenumerate
\def\enumerate#1
{\bgroup\PRIMenumerate
\let\item\PRIMitem}

\def\endenumerate{\PRIMendenumerate\egroup}

\def\display#1
{\par\bgroup\obeywhitespace}
\def\enddisplay{\egroup\par}


%

\let\PRIMauthor\author
\let\PRIMchapter\chapter
\let\PRIMsection\section
\let\PRIMsubsection\subsection
\let\PRIMsubsubsection\subsubsection
\let\PRIMappendix\appendix

\let\titlepage\relax
\let\endtitlepage\relax

\let\page\eject

\let\PRIMtitle\title

\def\title#1
{\PRIMtitle{#1}\hrule}

\def\subtitle#1
{\rightline{#1}}

\newcount\authorcalled

\def\author#1
{\ifnum\authorcalled=0
\bigskip\bigskip\bigskip
\global\authorcalled=1
\plainfootnote{\ }{}
\fi
\leftline{\bf#1}}

\def\appendix{\PRIMappendix
\let\PRIMappendix\relax
\chapter}


%\def\author#1
%{\PRIMauthor{#1}}

\def\chapter#1
{\PRIMchapter{#1}\label{#1}}

\def\section#1
{\PRIMsection{#1}\label{#1}}

\def\subsection#1
{\PRIMsubsection{#1}\label{#1}}

\def\subsubsection#1
{\PRIMsubsubsection{#1}\label{#1}}

\def\unnumberedsec#1
{\PRIMsection*{#1}}


%only one index

\def\printindex#1#2{
\def\printindex##1##2{}
\PRIMchapter*{Index}
{\let\end\PRIMend
\inputindex}}

% is foll right?

\def\iftex{\bgroup
\def\tex{\fi\iftrue}
\def\endtex{\fi\iffalse}
\iffalse}
\def\endiftex{\fi}