diff options
author | Karl Berry <karl@freefriends.org> | 2014-05-05 22:01:18 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2014-05-05 22:01:18 +0000 |
commit | d78a5a4de1e73a2151e8ed2635a199d928ccb559 (patch) | |
tree | ca490a3efa7d3614793427f850ec1aeb6bf971f1 /Master/texmf-dist/tex/latex/l3kernel/l3expan.sty | |
parent | b41cac6cebc8095cf8eaf7e84f8a2d5f63b7be38 (diff) |
latex3 (5may14)
git-svn-id: svn://tug.org/texlive/trunk@33859 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3kernel/l3expan.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/l3kernel/l3expan.sty | 511 |
1 files changed, 0 insertions, 511 deletions
diff --git a/Master/texmf-dist/tex/latex/l3kernel/l3expan.sty b/Master/texmf-dist/tex/latex/l3kernel/l3expan.sty deleted file mode 100644 index 40c33448806..00000000000 --- a/Master/texmf-dist/tex/latex/l3kernel/l3expan.sty +++ /dev/null @@ -1,511 +0,0 @@ -%% -%% This is file `l3expan.sty', -%% generated with the docstrip utility. -%% -%% The original source files were: -%% -%% l3expan.dtx (with options: `package') -%% -%% EXPERIMENTAL CODE -%% -%% Do not distribute this file without also distributing the -%% source files specified above. -%% -%% Do not distribute a modified version of this file. -%% -%% File: l3expan.dtx Copyright (C) 1990-2014 The LaTeX3 project -%% -%% It may be distributed and/or modified under the conditions of the -%% LaTeX Project Public License (LPPL), either version 1.3c of this -%% license or (at your option) any later version. The latest version -%% of this license is in the file -%% -%% http://www.latex-project.org/lppl.txt -%% -%% This file is part of the "l3kernel bundle" (The Work in LPPL) -%% and all files in that bundle must be distributed together. -%% -%% The released version of this bundle is available from CTAN. -%% -%% ----------------------------------------------------------------------- -%% -%% The development version of the bundle can be found at -%% -%% http://www.latex-project.org/svnroot/experimental/trunk/ -%% -%% for those people who are interested. -%% -%%%%%%%%%%% -%% NOTE: %% -%%%%%%%%%%% -%% -%% Snapshots taken from the repository represent work in progress and may -%% not work or may contain conflicting material! We therefore ask -%% people _not_ to put them into distributions, archives, etc. without -%% prior consultation with the LaTeX3 Project. -%% -%% ----------------------------------------------------------------------- -\RequirePackage{l3bootstrap} -\GetIdInfo$Id: l3expan.dtx 4642 2014-01-04 17:28:32Z joseph $ - {L3 Argument expansion} -\ProvidesExplPackage - {\ExplFileName}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription} -\__expl_package_check: -\cs_new:Npn \__exp_arg_next:nnn #1#2#3 { #2 \::: { #3 {#1} } } -\cs_new:Npn \__exp_arg_next:Nnn #1#2#3 { #2 \::: { #3 #1 } } -\cs_new:Npn \::: #1 {#1} -\cs_new:Npn \::n #1 \::: #2#3 { #1 \::: { #2 {#3} } } -\cs_new:Npn \::N #1 \::: #2#3 { #1 \::: {#2#3} } -\cs_new:Npn \::p #1 \::: #2#3# { #1 \::: {#2#3} } -\cs_new:Npn \::c #1 \::: #2#3 - { \exp_after:wN \__exp_arg_next:Nnn \cs:w #3 \cs_end: {#1} {#2} } -\cs_new:Npn \::o #1 \::: #2#3 - { \exp_after:wN \__exp_arg_next:nnn \exp_after:wN {#3} {#1} {#2} } -\cs_new:Npn \::f #1 \::: #2#3 - { - \exp_after:wN \__exp_arg_next:nnn - \exp_after:wN { \tex_romannumeral:D -`0 #3 } - {#1} {#2} - } -\use:nn { \cs_new_eq:NN \exp_stop_f: } { ~ } -\cs_new_protected:Npn \::x #1 \::: #2#3 - { - \cs_set_nopar:Npx \l__exp_internal_tl { {#3} } - \exp_after:wN \__exp_arg_next:nnn \l__exp_internal_tl {#1} {#2} - } -\cs_new:Npn \::V #1 \::: #2#3 - { - \exp_after:wN \__exp_arg_next:nnn - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:N #3 } - {#1} {#2} -} -\cs_new:Npn \::v # 1\::: #2#3 - { - \exp_after:wN \__exp_arg_next:nnn - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:c {#3} } - {#1} {#2} - } -\cs_new:Npn \__exp_eval_register:N #1 - { - \exp_after:wN \if_meaning:w \exp_not:N #1 #1 - \if_meaning:w \scan_stop: #1 - \__exp_eval_error_msg:w - \fi: - \else: - \exp_after:wN \use_i_ii:nnn - \fi: - \exp_after:wN \c_zero \tex_the:D #1 - } -\cs_new:Npn \__exp_eval_register:c #1 - { \exp_after:wN \__exp_eval_register:N \cs:w #1 \cs_end: } -\cs_new:Npn \__exp_eval_error_msg:w #1 \tex_the:D #2 - { - \fi: - \fi: - \__msg_kernel_expandable_error:nnn { kernel } { bad-variable } {#2} - \c_zero - } -\cs_new:Npn \exp_args:No #1#2 { \exp_after:wN #1 \exp_after:wN {#2} } -\cs_new:Npn \exp_args:NNo #1#2#3 - { \exp_after:wN #1 \exp_after:wN #2 \exp_after:wN {#3} } -\cs_new:Npn \exp_args:NNNo #1#2#3#4 - { \exp_after:wN #1 \exp_after:wN#2 \exp_after:wN #3 \exp_after:wN {#4} } -\cs_new:Npn \exp_args:NNc #1#2#3 - { \exp_after:wN #1 \exp_after:wN #2 \cs:w # 3\cs_end: } -\cs_new:Npn \exp_args:Ncc #1#2#3 - { \exp_after:wN #1 \cs:w #2 \exp_after:wN \cs_end: \cs:w #3 \cs_end: } -\cs_new:Npn \exp_args:Nccc #1#2#3#4 - { - \exp_after:wN #1 - \cs:w #2 \exp_after:wN \cs_end: - \cs:w #3 \exp_after:wN \cs_end: - \cs:w #4 \cs_end: - } -\cs_new:Npn \exp_args:Nf #1#2 - { \exp_after:wN #1 \exp_after:wN { \tex_romannumeral:D -`0 #2 } } -\cs_new:Npn \exp_args:Nv #1#2 - { - \exp_after:wN #1 \exp_after:wN - { \tex_romannumeral:D \__exp_eval_register:c {#2} } - } -\cs_new:Npn \exp_args:NV #1#2 - { - \exp_after:wN #1 \exp_after:wN - { \tex_romannumeral:D \__exp_eval_register:N #2 } - } -\cs_new:Npn \exp_args:NNf #1#2#3 - { - \exp_after:wN #1 - \exp_after:wN #2 - \exp_after:wN { \tex_romannumeral:D -`0 #3 } - } -\cs_new:Npn \exp_args:NNv #1#2#3 - { - \exp_after:wN #1 - \exp_after:wN #2 - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:c {#3} } - } -\cs_new:Npn \exp_args:NNV #1#2#3 - { - \exp_after:wN #1 - \exp_after:wN #2 - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:N #3 } - } -\cs_new:Npn \exp_args:Nco #1#2#3 - { - \exp_after:wN #1 - \cs:w #2 \exp_after:wN \cs_end: - \exp_after:wN {#3} - } -\cs_new:Npn \exp_args:Ncf #1#2#3 - { - \exp_after:wN #1 - \cs:w #2 \exp_after:wN \cs_end: - \exp_after:wN { \tex_romannumeral:D -`0 #3 } - } -\cs_new:Npn \exp_args:NVV #1#2#3 - { - \exp_after:wN #1 - \exp_after:wN { \tex_romannumeral:D \exp_after:wN - \__exp_eval_register:N \exp_after:wN #2 \exp_after:wN } - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:N #3 } - } -\cs_new:Npn \exp_args:NNNV #1#2#3#4 - { - \exp_after:wN #1 - \exp_after:wN #2 - \exp_after:wN #3 - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:N #4 } - } -\cs_new:Npn \exp_args:NcNc #1#2#3#4 - { - \exp_after:wN #1 - \cs:w #2 \exp_after:wN \cs_end: - \exp_after:wN #3 - \cs:w #4 \cs_end: - } -\cs_new:Npn \exp_args:NcNo #1#2#3#4 - { - \exp_after:wN #1 - \cs:w #2 \exp_after:wN \cs_end: - \exp_after:wN #3 - \exp_after:wN {#4} - } -\cs_new:Npn \exp_args:Ncco #1#2#3#4 - { - \exp_after:wN #1 - \cs:w #2 \exp_after:wN \cs_end: - \cs:w #3 \exp_after:wN \cs_end: - \exp_after:wN {#4} - } -\cs_new_protected_nopar:Npn \exp_args:Nx { \::x \::: } -\cs_new_nopar:Npn \exp_args:Nnc { \::n \::c \::: } -\cs_new_nopar:Npn \exp_args:Nfo { \::f \::o \::: } -\cs_new_nopar:Npn \exp_args:Nff { \::f \::f \::: } -\cs_new_nopar:Npn \exp_args:Nnf { \::n \::f \::: } -\cs_new_nopar:Npn \exp_args:Nno { \::n \::o \::: } -\cs_new_nopar:Npn \exp_args:NnV { \::n \::V \::: } -\cs_new_nopar:Npn \exp_args:Noo { \::o \::o \::: } -\cs_new_nopar:Npn \exp_args:Nof { \::o \::f \::: } -\cs_new_nopar:Npn \exp_args:Noc { \::o \::c \::: } -\cs_new_protected_nopar:Npn \exp_args:NNx { \::N \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Ncx { \::c \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Nnx { \::n \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Nox { \::o \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Nxo { \::x \::o \::: } -\cs_new_protected_nopar:Npn \exp_args:Nxx { \::x \::x \::: } -\cs_new_nopar:Npn \exp_args:NNno { \::N \::n \::o \::: } -\cs_new_nopar:Npn \exp_args:NNoo { \::N \::o \::o \::: } -\cs_new_nopar:Npn \exp_args:Nnnc { \::n \::n \::c \::: } -\cs_new_nopar:Npn \exp_args:Nnno { \::n \::n \::o \::: } -\cs_new_nopar:Npn \exp_args:Nooo { \::o \::o \::o \::: } -\cs_new_protected_nopar:Npn \exp_args:NNnx { \::N \::n \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:NNox { \::N \::o \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Nnnx { \::n \::n \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Nnox { \::n \::o \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Nccx { \::c \::c \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Ncnx { \::c \::n \::x \::: } -\cs_new_protected_nopar:Npn \exp_args:Noox { \::o \::o \::x \::: } -\cs_new:Npn \__exp_arg_last_unbraced:nn #1#2 { #2#1 } -\cs_new:Npn \::f_unbraced \::: #1#2 - { - \exp_after:wN \__exp_arg_last_unbraced:nn - \exp_after:wN { \tex_romannumeral:D -`0 #2 } {#1} - } -\cs_new:Npn \::o_unbraced \::: #1#2 - { \exp_after:wN \__exp_arg_last_unbraced:nn \exp_after:wN {#2} {#1} } -\cs_new:Npn \::V_unbraced \::: #1#2 - { - \exp_after:wN \__exp_arg_last_unbraced:nn - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:N #2 } {#1} - } -\cs_new:Npn \::v_unbraced \::: #1#2 - { - \exp_after:wN \__exp_arg_last_unbraced:nn - \exp_after:wN { \tex_romannumeral:D \__exp_eval_register:c {#2} } {#1} - } -\cs_new_protected:Npn \::x_unbraced \::: #1#2 - { - \cs_set_nopar:Npx \l__exp_internal_tl { \exp_not:n {#1} #2 } - \l__exp_internal_tl - } -\cs_new:Npn \exp_last_unbraced:NV #1#2 - { \exp_after:wN #1 \tex_romannumeral:D \__exp_eval_register:N #2 } -\cs_new:Npn \exp_last_unbraced:Nv #1#2 - { \exp_after:wN #1 \tex_romannumeral:D \__exp_eval_register:c {#2} } -\cs_new:Npn \exp_last_unbraced:No #1#2 { \exp_after:wN #1 #2 } -\cs_new:Npn \exp_last_unbraced:Nf #1#2 - { \exp_after:wN #1 \tex_romannumeral:D -`0 #2 } -\cs_new:Npn \exp_last_unbraced:Nco #1#2#3 - { \exp_after:wN #1 \cs:w #2 \exp_after:wN \cs_end: #3 } -\cs_new:Npn \exp_last_unbraced:NcV #1#2#3 - { - \exp_after:wN #1 - \cs:w #2 \exp_after:wN \cs_end: - \tex_romannumeral:D \__exp_eval_register:N #3 - } -\cs_new:Npn \exp_last_unbraced:NNV #1#2#3 - { - \exp_after:wN #1 - \exp_after:wN #2 - \tex_romannumeral:D \__exp_eval_register:N #3 - } -\cs_new:Npn \exp_last_unbraced:NNo #1#2#3 - { \exp_after:wN #1 \exp_after:wN #2 #3 } -\cs_new:Npn \exp_last_unbraced:NNNV #1#2#3#4 - { - \exp_after:wN #1 - \exp_after:wN #2 - \exp_after:wN #3 - \tex_romannumeral:D \__exp_eval_register:N #4 - } -\cs_new:Npn \exp_last_unbraced:NNNo #1#2#3#4 - { \exp_after:wN #1 \exp_after:wN #2 \exp_after:wN #3 #4 } -\cs_new_nopar:Npn \exp_last_unbraced:Nno { \::n \::o_unbraced \::: } -\cs_new_nopar:Npn \exp_last_unbraced:Noo { \::o \::o_unbraced \::: } -\cs_new_nopar:Npn \exp_last_unbraced:Nfo { \::f \::o_unbraced \::: } -\cs_new_nopar:Npn \exp_last_unbraced:NnNo { \::n \::N \::o_unbraced \::: } -\cs_new_protected_nopar:Npn \exp_last_unbraced:Nx { \::x_unbraced \::: } -\cs_new:Npn \exp_last_two_unbraced:Noo #1#2#3 - { \exp_after:wN \__exp_last_two_unbraced:noN \exp_after:wN {#3} {#2} #1 } -\cs_new:Npn \__exp_last_two_unbraced:noN #1#2#3 - { \exp_after:wN #3 #2 #1 } -\cs_new:Npn \exp_not:o #1 { \etex_unexpanded:D \exp_after:wN {#1} } -\cs_new:Npn \exp_not:c #1 { \exp_after:wN \exp_not:N \cs:w #1 \cs_end: } -\cs_new:Npn \exp_not:f #1 - { \etex_unexpanded:D \exp_after:wN { \tex_romannumeral:D -`0 #1 } } -\cs_new:Npn \exp_not:V #1 - { - \etex_unexpanded:D \exp_after:wN - { \tex_romannumeral:D \__exp_eval_register:N #1 } - } -\cs_new:Npn \exp_not:v #1 - { - \etex_unexpanded:D \exp_after:wN - { \tex_romannumeral:D \__exp_eval_register:c {#1} } - } -\cs_new_protected:Npn \cs_generate_variant:Nn #1#2 - { - \__chk_if_exist_cs:N #1 - \__cs_generate_variant:N #1 - \exp_after:wN \__cs_split_function:NN - \exp_after:wN #1 - \exp_after:wN \__cs_generate_variant:nnNN - \exp_after:wN #1 - \etex_detokenize:D {#2} , \scan_stop: , \q_recursion_stop - } -\group_begin: - \tex_catcode:D `\M = 12 \scan_stop: - \tex_catcode:D `\A = 12 \scan_stop: - \tex_catcode:D `\P = 12 \scan_stop: - \tex_catcode:D `\R = 12 \scan_stop: -\tex_lowercase:D - { - \group_end: - \cs_new_protected:Npn \__cs_generate_variant:N #1 - { - \exp_after:wN \if_meaning:w \exp_not:N #1 #1 - \cs_set_eq:NN \__cs_tmp:w \cs_new_protected_nopar:Npx - \else: - \exp_after:wN \__cs_generate_variant:ww - \token_to_meaning:N #1 MA \q_mark - \q_mark \cs_new_protected_nopar:Npx - PR - \q_mark \cs_new_nopar:Npx - \q_stop - \fi: - } - \cs_new_protected:Npn \__cs_generate_variant:ww #1 MA #2 \q_mark - { \__cs_generate_variant:wwNw #1 } - \cs_new_protected:Npn \__cs_generate_variant:wwNw - #1 PR #2 \q_mark #3 #4 \q_stop - { - \cs_set_eq:NN \__cs_tmp:w #3 - } - } -\cs_new_protected:Npn \__cs_generate_variant:nnNN #1#2#3#4 - { - \if_meaning:w \c_false_bool #3 - \__msg_kernel_error:nnx { kernel } { missing-colon } - { \token_to_str:c {#1} } - \exp_after:wN \use_none_delimit_by_q_recursion_stop:w - \fi: - \__cs_generate_variant:Nnnw #4 {#1}{#2} - } -\cs_new_protected:Npn \__cs_generate_variant:Nnnw #1#2#3#4 , - { - \if_meaning:w \scan_stop: #4 - \exp_after:wN \use_none_delimit_by_q_recursion_stop:w - \fi: - \use:x - { - \exp_not:N \__cs_generate_variant:wwNN - \__cs_generate_variant_loop:nNwN { } - #4 - \__cs_generate_variant_loop_end:nwwwNNnn - \q_mark - #3 ~ - { ~ { } \fi: \__cs_generate_variant_loop_long:wNNnn } ~ - { } - \q_stop - \exp_not:N #1 {#2} {#4} - } - \__cs_generate_variant:Nnnw #1 {#2} {#3} - } -\cs_new:Npn \__cs_generate_variant_loop:nNwN #1#2#3 \q_mark #4 - { - \if:w #2 #4 - \exp_after:wN \__cs_generate_variant_loop_same:w - \else: - \if:w N #4 \else: - \if:w n #4 \else: - \__cs_generate_variant_loop_invalid:NNwNNnn #4#2 - \fi: - \fi: - \fi: - #1 - \prg_do_nothing: - #2 - \__cs_generate_variant_loop:nNwN { } #3 \q_mark - } -\cs_new:Npn \__cs_generate_variant_loop_same:w - #1 \prg_do_nothing: #2#3#4 - { - #3 { #1 \__cs_generate_variant_same:N #2 } - } -\cs_new:Npn \__cs_generate_variant_loop_end:nwwwNNnn - #1#2 \q_mark #3 ~ #4 \q_stop #5#6#7#8 - { - \scan_stop: \scan_stop: \fi: - \exp_not:N \q_mark - \exp_not:N \q_stop - \exp_not:N #6 - \exp_not:c { #7 : #8 #1 #3 } - } -\cs_new:Npn \__cs_generate_variant_loop_long:wNNnn #1 \q_stop #2#3#4#5 - { - \exp_not:n - { - \q_mark - \__msg_kernel_error:nnxx { kernel } { variant-too-long } - {#5} { \token_to_str:N #3 } - \use_none:nnnn - \q_stop - #3 - #3 - } - } -\cs_new:Npn \__cs_generate_variant_loop_invalid:NNwNNnn - #1#2 \fi: \fi: \fi: #3 \q_stop #4#5#6#7 - { - \fi: \fi: \fi: - \exp_not:n - { - \q_mark - \__msg_kernel_error:nnxxxx { kernel } { invalid-variant } - {#7} { \token_to_str:N #5 } {#1} {#2} - \use_none:nnnn - \q_stop - #5 - #5 - } - } -\cs_new:Npn \__cs_generate_variant_same:N #1 - { - \if:w N #1 - N - \else: - \if:w p #1 - p - \else: - n - \fi: - \fi: - } -\cs_new_protected:Npn \__cs_generate_variant:wwNN - #1 \q_mark #2 \q_stop #3#4 - { - #2 - \cs_if_free:NTF #4 - { - \group_begin: - \__cs_generate_internal_variant:n {#1} - \__cs_tmp:w #4 { \exp_not:c { exp_args:N #1 } \exp_not:N #3 } - \group_end: - } - { - \iow_log:x - { - Variant~\token_to_str:N #4~% - already~defined;~ not~ changing~ it~on~line~% - \tex_the:D \tex_inputlineno:D - } - } - } -\group_begin: - \tex_catcode:D `\X = 12 \scan_stop: - \tex_lccode:D `\N = `\N \scan_stop: -\tex_lowercase:D - { - \group_end: - \cs_new_protected:Npn \__cs_generate_internal_variant:n #1 - { - \__cs_generate_internal_variant:wwnNwnn - #1 \q_mark - { \cs_set_eq:NN \__cs_tmp:w \cs_new_protected_nopar:Npx } - \cs_new_protected_nopar:cpx - X \q_mark - { } - \cs_new_nopar:cpx - \q_stop - { exp_args:N #1 } - { \__cs_generate_internal_variant_loop:n #1 { : \use_i:nn } } - } - \cs_new_protected:Npn \__cs_generate_internal_variant:wwnNwnn - #1 X #2 \q_mark #3 #4 #5 \q_stop #6 #7 - { - #3 - \cs_if_free:cT {#6} { #4 {#6} {#7} } - } - } -\cs_new:Npn \__cs_generate_internal_variant_loop:n #1 - { - \exp_after:wN \exp_not:N \cs:w :: #1 \cs_end: - \__cs_generate_internal_variant_loop:n - } -\cs_generate_variant:Nn \str_if_eq_p:nn { V , o } -\cs_generate_variant:Nn \str_if_eq_p:nn { nV , no , VV } -\cs_generate_variant:Nn \str_if_eq:nnT { V , o } -\cs_generate_variant:Nn \str_if_eq:nnT { nV , no , VV } -\cs_generate_variant:Nn \str_if_eq:nnF { V , o } -\cs_generate_variant:Nn \str_if_eq:nnF { nV , no , VV } -\cs_generate_variant:Nn \str_if_eq:nnTF { V , o } -\cs_generate_variant:Nn \str_if_eq:nnTF { nV , no , VV } -\cs_generate_variant:Nn \str_case:nn { o } -\cs_generate_variant:Nn \str_case:nnT { o } -\cs_generate_variant:Nn \str_case:nnF { o } -\cs_generate_variant:Nn \str_case:nnTF { o } -\cs_new_eq:NN \str_case:onn \str_case:onF -%% -%% -%% End of file `l3expan.sty'. |