From 305de0f136d4c197b9c250acbcaafa80d86ecaf2 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 5 Jul 2016 21:38:04 +0000 Subject: protex (5jul16) git-svn-id: svn://tug.org/texlive/trunk@41633 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/protex/ProTex.sty | 57 +++++++++++++++++---------- 1 file changed, 36 insertions(+), 21 deletions(-) (limited to 'Master/texmf-dist/tex/latex/protex/ProTex.sty') diff --git a/Master/texmf-dist/tex/latex/protex/ProTex.sty b/Master/texmf-dist/tex/latex/protex/ProTex.sty index 55c85c71487..3908b100b65 100644 --- a/Master/texmf-dist/tex/latex/protex/ProTex.sty +++ b/Master/texmf-dist/tex/latex/protex/ProTex.sty @@ -1,22 +1,22 @@ -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% v 1.5 -% ProTex % -% Copyright (C) 1990,1991 by Eitan M. Gurari % -% % -% This program can redistributed and/or modified under % -% the terms of the LaTeX Project Public License % -% Distributed from CTAN archives in directory % -% macros/latex/base/lppl.txt; either version 1 of the % -% License, or (at your option) any later version. % -% % -% However, you are allowed to modify this program % -% without changing its name, if you modify its % -% signature. Changes to the signature can be introduced % -% with a directive of the form % -% \message{signature} % -% % -% gurari@cis.ohio-state.edu % -% http://www.cis.ohio-state.edu/~gurari % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% $Id: ProTex.sty 185 2016-07-04 18:14:23Z karl $ +% Copyright 2016 TeX Users Group +% Copyright 1990-1999 Eitan M. Gurari +% +% This program can redistributed and/or modified under +% the terms of the LaTeX Project Public License +% Distributed from CTAN archives in directory +% macros/latex/base/lppl.txt; either version 1 of the +% License, or (at your option) any later version. +% +% This work has the LPPL maintenance status "maintained". +% +% The Current Maintainer of this work +% is the TeX4ht Project . +% +% If you modify this program, changing the +% version identification would be appreciated. +\immediate\write-1{version 2016-07-04} + \expandafter\edef\csname :RestoreCatcodes\endcsname{% \catcode`\noexpand :=\the\catcode`:% \catcode`\noexpand @=\the\catcode`@% @@ -67,13 +67,29 @@ \newtoks\:tokens \def\:ExpandDef#1#2#3{% \:tokens=\expandafter{#1#2}% - \xdef#1{\the\:tokens #3}}\def\:defaultcats{% + \xdef#1{\the\:tokens #3}} + +\def\:defaultcats{% \:NoSpecials{12}{0}{255}% \:NoSpecials{11}{65}{90}% \:NoSpecials{11}{97}{122}% \catcode`\\=0 \catcode`\{=1 \catcode`\}=2 \catcode`\ =13 \catcode`\^^M=13 \catcode`\^^I=13 } +\newtoks\:tokensi +\newtoks\:tokensii +\def\:ExpandDefSrcLineNo#1#2#3{% + \:tokens=\expandafter{#1}% + \:tokensii={#2}% + \edef\@a@{\noexpand\:tokensi={\CodeInputLine}}\@a@ + \xdef#1{\the\:tokens\the\:tokensi\the\:tokensii #3}} +\def\:srclinebol{\%} +\def\srclineBOL#1{\gdef\:srclinebol{#1}} +\def\CodeInputLine{% + ^^J\:srclinebol line \CodeInputLineNo\space "./\jobname.tex"^^J}% +\def\SetOutputWithLineNo{\let\:ExpandDef\:ExpandDefSrcLineNo} +\let\CodeLineNo\SetOutputWithLineNo + \def\:NoSpecials#1#2#3{\edef\:temp{\the\:CodeNumber}% \global\:CodeNumber=#3 \def\:next{\catcode\:CodeNumber=#1 @@ -330,4 +346,3 @@ \:oldNoSpecials{#1}{#2}{#3}\fi } \fi \:RestoreCatcodes \endinput - -- cgit v1.2.3