diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex')
-rw-r--r-- | Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex | 28 |
1 files changed, 10 insertions, 18 deletions
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex index 86755b9bd92..b0cae3f7541 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_example.tex @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Example of MCF typeset by LaTeX mcf_examples.tex by A.Yamaji 2016.4.6 +% Example of MCF typeset by LaTeX mcf_examples.tex by A.Yamaji 2016.4.10 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \documentclass[a4paper]{article} \usepackage{graphicx} @@ -48,25 +48,17 @@ \advance\fontnum\@ne\relax\advance\tnum\@ne\relax% \ifnum\tnum=5 \\ \tnum=0\relax \fi% } -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% copied from ltcntrl.dtx [2014/04/21 v1.0h LaTeX Kernel (program control)] -% modified @for (delimiter=",") to @for@semi (delimiter=";") -%-------------------------------------------------------------------------------- -\def\@for@semi#1:=#2\do#3{\expandafter\def\expandafter\@for@tmp\expandafter{#2}% - \ifx\@for@tmp\@empty \else \expandafter\@for@loop#2;\@nil;\@nil\@@#1{#3}\fi}% -\def\@for@loop#1;#2;#3\@@#4#5{\def#4{#1}\ifx #4\@nnil \else% - #5\def#4{#2}\ifx #4\@nnil \else#5\@ifor@loop #3\@@#4{#5}\fi\fi}% -\def\@ifor@loop#1;#2\@@#3#4{\def#3{#1}\ifx #3\@nnil% - \expandafter\@for@noop \else #4\relax\expandafter\@ifor@loop\fi#2\@@#3{#4}}% -\def\@for@noop#1\@@#2#3{}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%------------------------------------------------------------------------------- +% modified latex2e kernel program control (@for delimiter ','=>';') +\def\@sfor#1#2{\expandafter\def\expandafter\@tmp\expandafter{#1}% + \ifx\@tmp\@empty\else\expandafter\@rep#1;\@nil;\@@\@list{#2}\fi}% +\def\@rep#1;#2\@@#3#4{\def#3{#1}\ifx#3\@nnil% + \expandafter\@fornoop\else#4\relax\expandafter\@rep\fi#2\@@#3{#4}}% +%------------------------------------------------------------------------------- \def\inputINFOS#1{\openin\@auxf=#1\CONT@true% \loop -\read\@auxf to \temp@info% -\ifeof\@auxf\CONT@false\else% -\@for@semi\@temp:=\temp@info\do{\mol@sel\@temp}% -\put@char% -\fi% +\read\@auxf to \@info% +\ifeof\@auxf\CONT@false\else\@sfor\@info{\mol@sel\@list}\put@char\fi% \ifCONT@ \repeat \closein\@auxf}% %------------------------------------------------------------------------------- |