diff options
author | Karl Berry <karl@freefriends.org> | 2012-02-28 00:40:51 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2012-02-28 00:40:51 +0000 |
commit | 29c459636115f7de4ae9a8681927b52a1e896805 (patch) | |
tree | 5200a1da0c7a7bae64d8c07c48df4a5daf30323e /Master/texmf-dist/tex/latex/l3kernel/l3token.sty | |
parent | e20ea4bdd670e0418363a2a38a54b422a4d83231 (diff) |
l3kernel 3471 (26feb12)
git-svn-id: svn://tug.org/texlive/trunk@25525 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3kernel/l3token.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/l3kernel/l3token.sty | 22 |
1 files changed, 20 insertions, 2 deletions
diff --git a/Master/texmf-dist/tex/latex/l3kernel/l3token.sty b/Master/texmf-dist/tex/latex/l3kernel/l3token.sty index 3bab1bd32dd..04531db0274 100644 --- a/Master/texmf-dist/tex/latex/l3kernel/l3token.sty +++ b/Master/texmf-dist/tex/latex/l3kernel/l3token.sty @@ -46,7 +46,7 @@ %% %% ----------------------------------------------------------------------- \RequirePackage{l3names} -\GetIdInfo$Id: l3token.dtx 3316 2012-02-06 12:24:43Z bruno $ +\GetIdInfo$Id: l3token.dtx 3460 2012-02-26 12:16:41Z will $ {L3 Experimental token manipulation} \ProvidesExplPackage {\ExplFileName}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription} @@ -181,7 +181,7 @@ \seq_set_from_clist:Nn \l_char_active_seq } } - { { " , $ , & , ^ , _ , ~ } } + { { " , $ , & , ^ , _ , ~ } } %$ \seq_new:N \l_char_special_seq \seq_set_from_clist:Nn \l_char_special_seq { \ , \" , \# , \$ , \% , \& , \\ , \^ , \_ , \{ , \} , \~ } @@ -367,6 +367,24 @@ % } } \cs_new:Npn \token_if_int_register_aux:w #1 COUXY #2 \q_stop { #1 ~ } + \prg_new_conditional:Npnn \token_if_muskip_register:N #1 { p , T , F , TF } + { + \if_meaning:w \tex_muskip:D #1 + \prg_return_false: + \else: + \if_meaning:w \tex_muskipdef:D #1 + \prg_return_false: + \else: + \str_if_eq_return:xx + { + \exp_after:wN \token_if_muskip_register_aux:w + \token_to_meaning:N #1 MUSKIP \q_stop + } + { \token_to_str:N \ } + \fi: + \fi: + } + \cs_new:Npn \token_if_muskip_register_aux:w #1 MUSKIP #2 \q_stop { #1 ~ } \prg_new_conditional:Npnn \token_if_skip_register:N #1 { p , T , F , TF } { \if_meaning:w \tex_skip:D #1 |