summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/rvwrite
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-09-08 23:02:51 +0000
committerKarl Berry <karl@freefriends.org>2010-09-08 23:02:51 +0000
commitd9c6145293d327c544fc033d3e9956fc1afc5b25 (patch)
tree1c1d8c0afb19fb2a3d188c6c388b048aa6b9259f /Master/texmf-dist/tex/latex/rvwrite
parentefc66f013627da6574d9896e561321f6af4cb266 (diff)
new latex package rvwrite 1.2 (28aug10)
git-svn-id: svn://tug.org/texlive/trunk@19614 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/rvwrite')
-rw-r--r--Master/texmf-dist/tex/latex/rvwrite/rvwrite.sty68
1 files changed, 68 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/rvwrite/rvwrite.sty b/Master/texmf-dist/tex/latex/rvwrite/rvwrite.sty
new file mode 100644
index 00000000000..dc3ea14b5fc
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/rvwrite/rvwrite.sty
@@ -0,0 +1,68 @@
+%%
+%%
+%% This is file 'rvwrite.sty'.
+%%
+%% File: rvwrite.sty Copyright (c) 2010 C. V. Radhakrishnan
+%% River Valley, Mepukada, Malayinkil, Trivandrum 695571
+%% http://www.river-valley.com Email: <cvr@river-valley.org>
+%%
+%% This package may be distributed under the terms of the LaTeX Project
+%% Public License, as described in lppl.txt in the base LaTeX distribution.
+%% Either version 1.0 or, at your option, any later version.
+%%
+%% $Id: rvwrite.sty,v 1.2 2010/08/25 08:59:06 cvr Exp cvr $
+%%
+\NeedsTeXFormat{LaTeX2e}
+\def\Fileversion$#1: #2 ${\gdef\fileversion{#2}}
+\def\Filedate$#1: #2 #3 ${\gdef\filedate{#2}}
+\Fileversion$Revision: 1.2 $
+\Filedate$Date: 2010/08/25 08:59:06 $
+\ProvidesPackage{rvwrite}
+ [\filedate\space\fileversion\space enhanced write registers (CVR)]
+\PackageWarningNoLine{rvwrite}
+ {****************************************\MessageBreak
+ Package rvwrite v,\fileversion\space loaded\MessageBreak
+ [enhanced write registers (CVR)]\MessageBreak
+ ****************************************}
+%
+%
+\newwrite\rvtwrite
+
+\def\dlrchr{\expandafter\@gobble\string\$}
+\def\hshchr{\expandafter\@gobble\string\#}
+\def\bslchr{\expandafter\@gobble\string\\}
+\def\lbrchr{\expandafter\@gobble\string\{}
+\def\rbrchr{\expandafter\@gobble\string\}}
+\def\tldchr{\expandafter\@gobble\string\~}
+\def\ampchr{\expandafter\@gobble\string\&}
+
+\immediate\openout\rvtwrite=\jobname-write.tex
+\immediate\write\rvtwrite{\string\documentclass{article}}
+\immediate\write\rvtwrite{ }
+\immediate\write\rvtwrite{\string\input\space ProTex.sty}
+\immediate\write\rvtwrite{\string\AlProTex{tex,<<<>>>,list,title,|,[]}}
+\immediate\write\rvtwrite{ }
+\immediate\write\rvtwrite{\string\begin{document}}
+\immediate\write\rvtwrite{ }
+
+\def\newrvwrite#1{\@ifundefined{RV@#1}{\@namedef{RV@#1}{#1}}{}%
+ \AtEndDocument{\immediate\write\rvtwrite{%
+ \string\OutputCode\string\<\jobname-#1\string\>}}}
+%
+% \rvwrite #1 => file type
+% #2 => string(s) to write out
+\def\ervwrite#1#2{\@ifundefined{RV@#1}{\newrvwrite{#1}}{}%
+ \immediate\write\rvtwrite{\string\<\jobname-#1\string\><<<}
+ \immediate\write\rvtwrite{#2^^J>>>}}
+
+\def\rvwrite#1#2{\@ifundefined{RV@#1}{\newrvwrite{#1}}{}\def\next{#2}%
+ \immediate\write\rvtwrite{\string\<\jobname-#1\string\>%
+ <<<^^J\expandafter\strip@prefix\meaning\next^^J>>>}}
+
+\AtEndDocument{\write\rvtwrite{\space^^J\string\end{document}}}
+
+\endinput
+
+%%
+%% End of file 'rvwrite.sty'
+%%