diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/expl3/l3token.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/expl3/l3token.dtx | 50 |
1 files changed, 25 insertions, 25 deletions
diff --git a/Master/texmf-dist/source/latex/expl3/l3token.dtx b/Master/texmf-dist/source/latex/expl3/l3token.dtx index 14d84cb0122..fa1767465d4 100644 --- a/Master/texmf-dist/source/latex/expl3/l3token.dtx +++ b/Master/texmf-dist/source/latex/expl3/l3token.dtx @@ -35,7 +35,7 @@ \RequirePackage{l3names} %</driver|package> %\fi -\GetIdInfo$Id: l3token.dtx 1890 2010-04-11 03:37:15Z will $ +\GetIdInfo$Id: l3token.dtx 2029 2010-09-19 13:59:02Z joseph $ {L3 Experimental token investigation and manipulation} %\iffalse %<*driver> @@ -1165,9 +1165,9 @@ % be a problem! % \begin{macrocode} \prg_new_conditional:Nnn \token_if_macro:N {p,TF,T,F} { - \exp_after:wN \token_if_macro_p_aux:w \token_to_meaning:N #1 -> \q_nil + \exp_after:wN \token_if_macro_p_aux:w \token_to_meaning:N #1 -> \q_stop } -\cs_new_nopar:Npn \token_if_macro_p_aux:w #1 -> #2 \q_nil{ +\cs_new_nopar:Npn \token_if_macro_p_aux:w #1 -> #2 \q_stop{ \if_predicate:w \tl_if_empty_p:n{#2} \prg_return_false: \else: \prg_return_true: \fi: } @@ -1260,9 +1260,9 @@ % \begin{macrocode} \prg_new_conditional:Nnn \token_if_chardef:N {p,TF,T,F} { \exp_after:wN \token_if_chardef_aux:w - \token_to_meaning:N #1?CHAR"\q_nil + \token_to_meaning:N #1?CHAR"\q_stop } -\cs_new_nopar:Npn \token_if_chardef_aux:w #1?CHAR"#2\q_nil{ +\cs_new_nopar:Npn \token_if_chardef_aux:w #1?CHAR"#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1270,9 +1270,9 @@ % \begin{macrocode} \prg_new_conditional:Nnn \token_if_mathchardef:N {p,TF,T,F} { \exp_after:wN \token_if_mathchardef_aux:w - \token_to_meaning:N #1?MAYHCHAR"\q_nil + \token_to_meaning:N #1?MAYHCHAR"\q_stop } -\cs_new_nopar:Npn \token_if_mathchardef_aux:w #1?MAYHCHAR"#2\q_nil{ +\cs_new_nopar:Npn \token_if_mathchardef_aux:w #1?MAYHCHAR"#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1285,10 +1285,10 @@ \prg_return_false: \else: \exp_after:wN \token_if_int_register_aux:w - \token_to_meaning:N #1?COUXY\q_nil + \token_to_meaning:N #1?COUXY\q_stop \fi: } -\cs_new_nopar:Npn \token_if_int_register_aux:w #1?COUXY#2\q_nil{ +\cs_new_nopar:Npn \token_if_int_register_aux:w #1?COUXY#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1299,10 +1299,10 @@ \prg_return_false: \else: \exp_after:wN \token_if_skip_register_aux:w - \token_to_meaning:N #1?SKIP\q_nil + \token_to_meaning:N #1?SKIP\q_stop \fi: } -\cs_new_nopar:Npn \token_if_skip_register_aux:w #1?SKIP#2\q_nil{ +\cs_new_nopar:Npn \token_if_skip_register_aux:w #1?SKIP#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1313,10 +1313,10 @@ \c_false_bool \else: \exp_after:wN \token_if_dim_register_aux:w - \token_to_meaning:N #1?ZIMEX\q_nil + \token_to_meaning:N #1?ZIMEX\q_stop \fi: } -\cs_new_nopar:Npn \token_if_dim_register_aux:w #1?ZIMEX#2\q_nil{ +\cs_new_nopar:Npn \token_if_dim_register_aux:w #1?ZIMEX#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1327,10 +1327,10 @@ \prg_return_false: \else: \exp_after:wN \token_if_toks_register_aux:w - \token_to_meaning:N #1?YOKS\q_nil + \token_to_meaning:N #1?YOKS\q_stop \fi: } -\cs_new_nopar:Npn \token_if_toks_register_aux:w #1?YOKS#2\q_nil{ +\cs_new_nopar:Npn \token_if_toks_register_aux:w #1?YOKS#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1338,9 +1338,9 @@ % \begin{macrocode} \prg_new_conditional:Nnn \token_if_protected_macro:N {p,TF,T,F} { \exp_after:wN \token_if_protected_macro_aux:w - \token_to_meaning:N #1?PROYECYEZ~MACRO\q_nil + \token_to_meaning:N #1?PROYECYEZ~MACRO\q_stop } -\cs_new_nopar:Npn \token_if_protected_macro_aux:w #1?PROYECYEZ~MACRO#2\q_nil{ +\cs_new_nopar:Npn \token_if_protected_macro_aux:w #1?PROYECYEZ~MACRO#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1348,9 +1348,9 @@ % \begin{macrocode} \prg_new_conditional:Nnn \token_if_long_macro:N {p,TF,T,F} { \exp_after:wN \token_if_long_macro_aux:w - \token_to_meaning:N #1?LOXG~MACRO\q_nil + \token_to_meaning:N #1?LOXG~MACRO\q_stop } -\cs_new_nopar:Npn \token_if_long_macro_aux:w #1?LOXG~MACRO#2\q_nil{ +\cs_new_nopar:Npn \token_if_long_macro_aux:w #1?LOXG~MACRO#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1359,10 +1359,10 @@ % \begin{macrocode} \prg_new_conditional:Nnn \token_if_protected_long_macro:N {p,TF,T,F} { \exp_after:wN \token_if_protected_long_macro_aux:w - \token_to_meaning:N #1?PROYECYEZ?LOXG~MACRO\q_nil + \token_to_meaning:N #1?PROYECYEZ?LOXG~MACRO\q_stop } \cs_new_nopar:Npn \token_if_protected_long_macro_aux:w #1 - ?PROYECYEZ?LOXG~MACRO#2\q_nil{ + ?PROYECYEZ?LOXG~MACRO#2\q_stop{ \tl_if_empty:nTF {#1} {\prg_return_true:} {\prg_return_false:} } % \end{macrocode} @@ -1400,25 +1400,25 @@ \char_set_catcode:nn{`\O}{12} \tl_to_lowercase:n{ \group_end: - \cs_new_nopar:Npn \token_get_prefix_arg_replacement_aux:w #1MACRO?#2->#3\q_nil#4{ + \cs_new_nopar:Npn \token_get_prefix_arg_replacement_aux:w #1MACRO?#2->#3\q_stop#4{ #4{#1}{#2}{#3} } \cs_new_nopar:Npn\token_get_prefix_spec:N #1{ \token_if_macro:NTF #1{ \exp_after:wN \token_get_prefix_arg_replacement_aux:w - \token_to_meaning:N #1\q_nil\use_i:nnn + \token_to_meaning:N #1\q_stop\use_i:nnn }{\scan_stop:} } \cs_new_nopar:Npn\token_get_arg_spec:N #1{ \token_if_macro:NTF #1{ \exp_after:wN \token_get_prefix_arg_replacement_aux:w - \token_to_meaning:N #1\q_nil\use_ii:nnn + \token_to_meaning:N #1\q_stop\use_ii:nnn }{\scan_stop:} } \cs_new_nopar:Npn\token_get_replacement_spec:N #1{ \token_if_macro:NTF #1{ \exp_after:wN \token_get_prefix_arg_replacement_aux:w - \token_to_meaning:N #1\q_nil\use_iii:nnn + \token_to_meaning:N #1\q_stop\use_iii:nnn }{\scan_stop:} } } |