summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/l3experimental/l3str/l3flag.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3experimental/l3str/l3flag.sty')
-rw-r--r--Master/texmf-dist/tex/latex/l3experimental/l3str/l3flag.sty40
1 files changed, 20 insertions, 20 deletions
diff --git a/Master/texmf-dist/tex/latex/l3experimental/l3str/l3flag.sty b/Master/texmf-dist/tex/latex/l3experimental/l3str/l3flag.sty
index b56100853ab..63970cdd45d 100644
--- a/Master/texmf-dist/tex/latex/l3experimental/l3str/l3flag.sty
+++ b/Master/texmf-dist/tex/latex/l3experimental/l3str/l3flag.sty
@@ -47,59 +47,59 @@
%% -----------------------------------------------------------------------
\RequirePackage{expl3}
\GetIdInfo$Id: l3flag.dtx 3039 2011-12-08 09:22:35Z bruno $
- {L3 Experimental Flags}
+ {L3 Experimental flags}
\ProvidesExplPackage
{\ExplFileName}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription}
\cs_new_protected:Npn \flag_new:n #1
{
- \cs_new:cpn { flag_trap_#1:w } ##1 ;
- { \exp_after:wN \use_none:n \cs:w l_#1_##1_flag \cs_end: }
+ \cs_new:cpn { __flag_trap_#1:w } ##1 ;
+ { \exp_after:wN \use_none:n \cs:w __flag_#1_##1: \cs_end: }
}
\cs_new_protected:Npn \flag_clear:n #1
- { \flag_clear_aux:ww 0 ; #1 \q_stop }
-\cs_new_protected:Npn \flag_clear_aux:ww #1 ; #2 \q_stop
+ { \__flag_clear:ww 0 ; #1 \q_stop }
+\cs_new_protected:Npn \__flag_clear:ww #1 ; #2 \q_stop
{
- \if_cs_exist:w l_#2_#1_flag \cs_end:
+ \if_cs_exist:w __flag_#2_#1: \cs_end:
\else:
\exp_after:wN \use_none_delimit_by_q_stop:w
\fi:
- \cs_set_eq:cN { l_#2_#1_flag } \c_undefined:D
- \exp_after:wN \flag_clear_aux:ww
- \int_use:N \int_eval:w \c_one + #1 ;
+ \cs_set_eq:cN { __flag_#2_#1: } \c_undefined:D
+ \exp_after:wN \__flag_clear:ww
+ \int_use:N \__int_eval:w \c_one + #1 ;
#2 \q_stop
}
\cs_new_protected:Npn \flag_clear_new:n #1
{ \flag_if_exist:nTF {#1} { \flag_clear:n } { \flag_new:n } {#1} }
\cs_new_protected:Npn \flag_set_trap:nn #1#2
- { \cs_set:cpn { flag_trap_#1:w } ##1 ; {#2} }
+ { \cs_set:cpn { __flag_trap_#1:w } ##1 ; {#2} }
\prg_new_conditional:Npnn \flag_if_exist:n #1 { p , T , F , TF }
{
- \cs_if_exist:cTF { flag_trap_#1:w }
+ \cs_if_exist:cTF { __flag_trap_#1:w }
{ \prg_return_true: } { \prg_return_false: }
}
\prg_new_conditional:Npnn \flag_if_raised:n #1 { p , T , F , TF }
{
- \if_cs_exist:w l_#1_0_flag \cs_end:
+ \if_cs_exist:w __flag_#1_0: \cs_end:
\prg_return_true:
\else:
\prg_return_false:
\fi:
}
-\cs_new:Npn \flag_height:n #1 { \flag_height_loop:ww 0; #1 \q_stop }
-\cs_new:Npn \flag_height_loop:ww #1 ; #2 \q_stop
+\cs_new:Npn \flag_height:n #1 { \__flag_height_loop:ww 0; #1 \q_stop }
+\cs_new:Npn \__flag_height_loop:ww #1 ; #2 \q_stop
{
- \if_cs_exist:w l_#2_#1_flag \cs_end:
- \exp_after:wN \flag_height_loop:ww \int_use:N \int_eval:w \c_one +
+ \if_cs_exist:w __flag_#2_#1: \cs_end:
+ \exp_after:wN \__flag_height_loop:ww \int_use:N \__int_eval:w \c_one +
\else:
- \exp_after:wN \flag_height_end:ww
+ \exp_after:wN \__flag_height_end:ww
\fi:
#1 ; #2 \q_stop
}
-\cs_new:Npn \flag_height_end:ww #1 ; #2 \q_stop { #1 }
+\cs_new:Npn \__flag_height_end:ww #1 ; #2 \q_stop { #1 }
\cs_new:Npn \flag_raise:n #1
{
- \cs:w flag_trap_#1:w \exp_after:wN \cs_end:
- \int_value:w \flag_height:n {#1} ;
+ \cs:w __flag_trap_#1:w \exp_after:wN \cs_end:
+ \__int_value:w \flag_height:n {#1} ;
}
%%
%%