From 670905f37c1e8d5b5b8f33e9862b3f8d1f80d01f Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 7 Jun 2021 20:07:17 +0000 Subject: ran_toks (7jun21) git-svn-id: svn://tug.org/texlive/trunk@59515 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/ran_toks/ran_toks.sty | 26 +++++++++++++---------- Master/texmf-dist/tex/latex/ran_toks/rt-dbapp.def | 1 + 2 files changed, 16 insertions(+), 11 deletions(-) (limited to 'Master/texmf-dist/tex/latex/ran_toks') diff --git a/Master/texmf-dist/tex/latex/ran_toks/ran_toks.sty b/Master/texmf-dist/tex/latex/ran_toks/ran_toks.sty index ae2ae64747b..5c5ed39c47d 100644 --- a/Master/texmf-dist/tex/latex/ran_toks/ran_toks.sty +++ b/Master/texmf-dist/tex/latex/ran_toks/ran_toks.sty @@ -19,7 +19,7 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \NeedsTeXFormat{LaTeX2e}[1997/12/01] \ProvidesPackage{ran_toks} - [2021/01/19 v1.3.1 Randomizing tokens (dps)] + [2021/06/06 v1.4 Randomizing tokens (dps)] \RequirePackage{verbatim} \@ifundefined{nextrandom}{\input{random.tex}}{} \def\nextrandom{\begingroup @@ -191,8 +191,8 @@ \newcommand{\useRTName}[1]{\gdef\rt@BaseName{#1}}% \let\rt@BaseName\@empty \newcommand{\bRTVToks}[1]{\rt@nCnt\z@\useRTName{#1}} -\newcommand{\eRTVToks}{\global - \rt@nameedef{\rt@BaseName Cnt}{\the\rt@nCnt}\expandafter +\newcommand{\eRTVToks}{% + \global\rt@nameedef{\rt@BaseName Cnt}{\the\rt@nCnt}\expandafter \r@nVToks\expandafter{\rt@BaseName}} \def\reVerbEnd{\ifhmode\unskip\fi} \def\rtVWHook#1{\def\@rgi{#1}\ifx\@rgi\@empty @@ -219,6 +219,10 @@ \immediate\write\rt@Verb@write{\string\reVerbEnd}% \immediate\closeout\rt@Verb@write } +\let\rtVWi\rtVW % dps5-29 +\let\endrtVWi\endrtVW +\let\rtVWii\rtVW % dps5-29 +\let\endrtVWii\endrtVW \def\r@nVToks#1{\begingroup \gdef\rt@BaseName{#1}% \expandafter\rt@nMax\@nameuse{#1Cnt}% @@ -314,22 +318,22 @@ \egroup \rt@next } -\newcommand{\displayListRandomly}[1][]{\bgroup +\newcommand{\displayListRandomly}[1][]{\begingroup \def\rt@prior{#1}\displ@yListRandomly } -\newcommand{\displ@yListRandomly}[2][]{\rt@nCnt\z@\expandafter - \ifx\csname nMax4#2\endcsname\relax +\newcommand{\displ@yListRandomly}[2][]{\@tempcntb\z@ % dps5-29 + \expandafter\ifx\csname nMax4#2\endcsname\relax \rt@rgi\space\textbf{??}\rt@badTokName{#2}#1% \else \rt@recordingfalse - \def\rt@post{#1}\useRTName{#2}\let\i\rt@nCnt + \def\rt@post{#1}\useRTName{#2}\let\i\@tempcntb \def\first{1}\edef\last{\@nameuse{nMax4#2}}\@tempcnta\last \advance\@tempcnta\m@ne - \edef\lessone{\the\@tempcnta}\@whilenum\rt@nCnt<\last - \advance\rt@nCnt\@ne - \do{\rt@prior\useRanTok{\the\rt@nCnt}\rt@post + \edef\lessone{\the\@tempcnta}\@whilenum\@tempcntb<\last + \advance\@tempcntb\@ne + \do{\rt@prior\useRanTok[#2]{\the\@tempcntb}\rt@post }\fi - \egroup + \endgroup } \endinput %% diff --git a/Master/texmf-dist/tex/latex/ran_toks/rt-dbapp.def b/Master/texmf-dist/tex/latex/ran_toks/rt-dbapp.def index ecbd1e6aaf4..a28b6d5fee8 100644 --- a/Master/texmf-dist/tex/latex/ran_toks/rt-dbapp.def +++ b/Master/texmf-dist/tex/latex/ran_toks/rt-dbapp.def @@ -70,6 +70,7 @@ question}} \def\xdb@unique#1{\@tempcnta\z@ \def\rt@STOP{\relax}% +\begin{Verbatim}[xleftmargin=\parindent,fontsize=\small, \let\\\relax\edef\x{\@nameuse{#1-List}}% \toks@=\expandafter{\x}\let\\\getR@nIndx \the\toks@\\\rt@STOP -- cgit v1.2.3