[latex3-commits] [l3svn] r6927 - Rename \flag_zero:n to \flag_clear:n (see #336)
noreply at latex-project.org
noreply at latex-project.org
Tue Feb 14 13:18:33 CET 2017
Author: bruno
Date: 2017-02-14 13:18:32 +0100 (Tue, 14 Feb 2017)
New Revision: 6927
Modified:
trunk/l3experimental/l3str/l3regex.dtx
trunk/l3experimental/l3str/l3str-convert.dtx
trunk/l3kernel/l3flag.dtx
trunk/l3kernel/testfiles/m3expl001.luatex.tlg
trunk/l3kernel/testfiles/m3expl001.ptex.tlg
trunk/l3kernel/testfiles/m3expl001.tlg
trunk/l3kernel/testfiles/m3expl001.uptex.tlg
trunk/l3kernel/testfiles/m3expl001.xetex.tlg
trunk/l3kernel/testfiles/m3expl003.luatex.tlg
trunk/l3kernel/testfiles/m3expl003.ptex.tlg
trunk/l3kernel/testfiles/m3expl003.tlg
trunk/l3kernel/testfiles/m3expl003.uptex.tlg
trunk/l3kernel/testfiles/m3expl003.xetex.tlg
trunk/l3kernel/testfiles/m3flag001.lvt
trunk/l3kernel/testfiles/m3fp-traps001.lvt
trunk/l3trial/l3fp-extras/l3fp-symbolic.dtx
Log:
Rename \flag_zero:n to \flag_clear:n (see #336)
Modified: trunk/l3experimental/l3str/l3regex.dtx
===================================================================
--- trunk/l3experimental/l3str/l3regex.dtx 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3experimental/l3str/l3regex.dtx 2017-02-14 12:18:32 UTC (rev 6927)
@@ -5484,8 +5484,8 @@
\cs_new_protected:Npn \@@_group_end_extract_seq:N #1
{
\cs_set_eq:NN \__seq_item:n \scan_stop:
- \flag_zero:n { @@_begin }
- \flag_zero:n { @@_end }
+ \flag_clear:n { @@_begin }
+ \flag_clear:n { @@_end }
\tl_set:Nx \l_@@_internal_a_tl
{
\s__seq
Modified: trunk/l3experimental/l3str/l3str-convert.dtx
===================================================================
--- trunk/l3experimental/l3str/l3str-convert.dtx 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3experimental/l3str/l3str-convert.dtx 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1044,7 +1044,7 @@
{
\cs_new_protected:Npn \@@_convert_unescape_:
{
- \flag_zero:n { str_byte }
+ \flag_clear:n { str_byte }
\tl_gset:Nx \g_@@_result_tl
{ \exp_args:No \@@_filter_bytes:n \g_@@_result_tl }
\@@_if_flag_error:nnx { str_byte } { non-byte } { bytes }
@@ -1139,7 +1139,7 @@
{
\cs_new_protected:Npn \@@_convert_encode_:
{
- \flag_zero:n { str_error }
+ \flag_clear:n { str_error }
\@@_convert_gmap_internal:N \@@_encode_native_char:n
\@@_if_flag_error:nnx { str_error }
{ pdfTeX-native-overflow } { }
@@ -1281,7 +1281,7 @@
{ \tl_use:c { c_@@_encoding_#1_missing_tl } }
{ \q_stop \__prg_break: }
\__prg_break_point:
- \flag_zero:n { str_error }
+ \flag_clear:n { str_error }
\@@_convert_gmap:N \@@_decode_eight_bit_char:N
\@@_if_flag_error:nnx { str_error } { decode-8-bit } {#1}
\group_end:
@@ -1335,7 +1335,7 @@
{ \tl_use:c { c_@@_encoding_#1_tl } }
{ \q_stop \__prg_break: } { }
\__prg_break_point:
- \flag_zero:n { str_error }
+ \flag_clear:n { str_error }
\@@_convert_gmap_internal:N \@@_encode_eight_bit_char:n
\@@_if_flag_error:nnx { str_error } { encode-8-bit } {#1}
\group_end:
@@ -1478,7 +1478,7 @@
\cs_new_protected:Npn \@@_convert_unescape_hex:
{
\group_begin:
- \flag_zero:n { str_error }
+ \flag_clear:n { str_error }
\int_set:Nn \tex_escapechar:D { 92 }
\tl_gset:Nx \g_@@_result_tl
{
@@ -1558,8 +1558,8 @@
\cs_new_protected:cpn { @@_convert_unescape_#2: }
{
\group_begin:
- \flag_zero:n { str_byte }
- \flag_zero:n { str_error }
+ \flag_clear:n { str_byte }
+ \flag_clear:n { str_error }
\int_set:Nn \tex_escapechar:D { 92 }
\tl_gset:Nx \g_@@_result_tl
{
@@ -1652,8 +1652,8 @@
\cs_new_protected:Npn \@@_convert_unescape_string:
{
\group_begin:
- \flag_zero:n { str_byte }
- \flag_zero:n { str_error }
+ \flag_clear:n { str_byte }
+ \flag_clear:n { str_error }
\int_set:Nn \tex_escapechar:D { 92 }
\tl_gset:Nx \g_@@_result_tl
{
@@ -1975,7 +1975,7 @@
% }
% When decoding a string that is purportedly in the \textsc{utf-8}
% encoding, four different errors can occur, signalled by a specific
-% flag for each (we define those flags using \cs{flag_zero_new:n}
+% flag for each (we define those flags using \cs{flag_clear_new:n}
% rather than \cs{flag_new:n}, because they are shared with other
% encoding definition files).
% \begin{itemize}
@@ -1996,10 +1996,10 @@
% first remind the user what a correct \textsc{utf-8} string should
% look like, then add error-specific information.
% \begin{macrocode}
-\flag_zero_new:n { str_missing }
-\flag_zero_new:n { str_extra }
-\flag_zero_new:n { str_overlong }
-\flag_zero_new:n { str_overflow }
+\flag_clear_new:n { str_missing }
+\flag_clear_new:n { str_extra }
+\flag_clear_new:n { str_overlong }
+\flag_clear_new:n { str_overflow }
\__msg_kernel_new:nnnn { str } { utf8-decode }
{
Invalid~UTF-8~string: \exp_last_unbraced:Nf \use_none:n
@@ -2115,11 +2115,11 @@
% \begin{macrocode}
\cs_new_protected:cpn { @@_convert_decode_utf8: }
{
- \flag_zero:n { str_error }
- \flag_zero:n { str_missing }
- \flag_zero:n { str_extra }
- \flag_zero:n { str_overlong }
- \flag_zero:n { str_overflow }
+ \flag_clear:n { str_error }
+ \flag_clear:n { str_missing }
+ \flag_clear:n { str_extra }
+ \flag_clear:n { str_overlong }
+ \flag_clear:n { str_overflow }
\tl_gset:Nx \g_@@_result_tl
{
\exp_after:wN \@@_decode_utf_viii_start:N \g_@@_result_tl
@@ -2271,7 +2271,7 @@
{ \@@_encode_utf_xvi_aux:N \@@_output_byte_pair_le:n }
\cs_new_protected:Npn \@@_encode_utf_xvi_aux:N #1
{
- \flag_zero:n { str_error }
+ \flag_clear:n { str_error }
\cs_set_eq:NN \@@_tmp:w #1
\@@_convert_gmap_internal:N \@@_encode_utf_xvi_char:n
\@@_if_flag_error:nnx { str_error } { utf16-encode } { }
@@ -2314,9 +2314,9 @@
% an unexpected trail surrogate, and a string containing an odd number
% of bytes.
% \begin{macrocode}
- \flag_zero_new:n { str_missing }
- \flag_zero_new:n { str_extra }
- \flag_zero_new:n { str_end }
+ \flag_clear_new:n { str_missing }
+ \flag_clear_new:n { str_extra }
+ \flag_clear_new:n { str_end }
\__msg_kernel_new:nnnn { str } { utf16-encode }
{ Unicode~string~cannot~be~expressed~in~UTF-16:~surrogate. }
{
@@ -2409,10 +2409,10 @@
}
\cs_new_protected:Npn \@@_decode_utf_xvi:Nw #1#2 \s__stop
{
- \flag_zero:n { str_error }
- \flag_zero:n { str_missing }
- \flag_zero:n { str_extra }
- \flag_zero:n { str_end }
+ \flag_clear:n { str_error }
+ \flag_clear:n { str_missing }
+ \flag_clear:n { str_extra }
+ \flag_clear:n { str_end }
\cs_set:Npn \@@_tmp:w ##1 ##2 { ` ## #1 }
\tl_gset:Nx \g_@@_result_tl
{
@@ -2613,8 +2613,8 @@
% happens if the encoding was in fact not \textsc{utf-32}, because
% most arbitrary strings are not valid in \textsc{utf-32}.
% \begin{macrocode}
- \flag_zero_new:n { str_overflow }
- \flag_zero_new:n { str_end }
+ \flag_clear_new:n { str_overflow }
+ \flag_clear_new:n { str_end }
\__msg_kernel_new:nnnn { str } { utf32-decode }
{
Invalid~UTF-32~string: \exp_last_unbraced:Nf \use_none:n
@@ -2696,9 +2696,9 @@
}
\cs_new_protected:Npn \@@_decode_utf_xxxii:Nw #1#2 \s__stop
{
- \flag_zero:n { str_overflow }
- \flag_zero:n { str_end }
- \flag_zero:n { str_error }
+ \flag_clear:n { str_overflow }
+ \flag_clear:n { str_end }
+ \flag_clear:n { str_error }
\cs_set:Npn \@@_tmp:w ##1 ##2 { ` ## #1 }
\tl_gset:Nx \g_@@_result_tl
{
Modified: trunk/l3kernel/l3flag.dtx
===================================================================
--- trunk/l3kernel/l3flag.dtx 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/l3flag.dtx 2017-02-14 12:18:32 UTC (rev 6927)
@@ -95,19 +95,19 @@
% local variables. The \meta{flag} will initially have zero height.
% \end{function}
%
-% \begin{function}{\flag_zero:n}
+% \begin{function}{\flag_clear:n}
% \begin{syntax}
-% \cs{flag_zero:n} \Arg{flag name}
+% \cs{flag_clear:n} \Arg{flag name}
% \end{syntax}
% The \meta{flag}'s height is set to zero. The assignment is local.
% \end{function}
%
-% \begin{function}{\flag_zero_new:n}
+% \begin{function}{\flag_clear_new:n}
% \begin{syntax}
-% \cs{flag_zero_new:n} \Arg{flag name}
+% \cs{flag_clear_new:n} \Arg{flag name}
% \end{syntax}
% Ensures that the \meta{flag} exists globally by applying
-% \cs{flag_new:n} if necessary, then applies \cs{flag_zero:n}, setting
+% \cs{flag_new:n} if necessary, then applies \cs{flag_clear:n}, setting
% the height to zero locally.
% \end{function}
%
@@ -196,18 +196,18 @@
% \end{macrocode}
% \end{macro}
%
-% \begin{macro}{\flag_zero:n}
-% \begin{macro}[aux]{\@@_zero:wn}
+% \begin{macro}{\flag_clear:n}
+% \begin{macro}[aux]{\@@_clear:wn}
% Undefine control sequences, starting from the |0| flag, upwards,
% until reaching an undefined control sequence. We don't use
% \cs{cs_undefine:c} because that would act globally.
% \begin{macrocode}
-\cs_new_protected:Npn \flag_zero:n { \@@_zero:wn 0 ; }
-\cs_new_protected:Npn \@@_zero:wn #1 ; #2
+\cs_new_protected:Npn \flag_clear:n { \@@_clear:wn 0 ; }
+\cs_new_protected:Npn \@@_clear:wn #1 ; #2
{
\if_cs_exist:w flag~#2~#1 \cs_end:
\cs_set_eq:cN { flag~#2~#1 } \tex_undefined:D
- \exp_after:wN \@@_zero:wn
+ \exp_after:wN \@@_clear:wn
\__int_value:w \__int_eval:w \c_one + #1
\else:
\use_i:nnn
@@ -218,12 +218,12 @@
% \end{macro}
% \end{macro}
%
-% \begin{macro}{\flag_zero_new:n}
-% As for other datatypes, zero the \meta{flag} or create a new one,
+% \begin{macro}{\flag_clear_new:n}
+% As for other datatypes, clear the \meta{flag} or create a new one,
% as appropriate.
% \begin{macrocode}
-\cs_new_protected:Npn \flag_zero_new:n #1
- { \flag_if_exist:nTF {#1} { \flag_zero:n } { \flag_new:n } {#1} }
+\cs_new_protected:Npn \flag_clear_new:n #1
+ { \flag_if_exist:nTF {#1} { \flag_clear:n } { \flag_new:n } {#1} }
% \end{macrocode}
% \end{macro}
%
@@ -256,7 +256,7 @@
% \end{macro}
%
% \begin{macro}[EXP, pTF]{\flag_if_raised:n}
-% Test if the flag is non-zero, by checking the |0| control sequence.
+% Test if the flag has a non-zero height, by checking the |0| control sequence.
% \begin{macrocode}
\prg_new_conditional:Npnn \flag_if_raised:n #1 { p , T , F , TF }
{
@@ -310,10 +310,10 @@
% \begin{macrocode}
%<*package>
\tex_ifodd:D \l at expl@check at declarations@bool
- \cs_set_protected:Npn \flag_zero:n #1
+ \cs_set_protected:Npn \flag_clear:n #1
{
\exp_args:Nc \__chk_if_exist_var:N { flag~#1 }
- \@@_zero:wn 0 ; {#1}
+ \@@_clear:wn 0 ; {#1}
}
\cs_set:Npn \@@_chk_exist:n #1
{
Modified: trunk/l3kernel/testfiles/m3expl001.luatex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl001.luatex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl001.luatex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1666,9 +1666,9 @@
\g_tmpb_int=\count116
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl001.ptex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl001.ptex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl001.ptex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1398,9 +1398,9 @@
\g_tmpb_int=\count117
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl001.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl001.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl001.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1398,9 +1398,9 @@
\g_tmpb_int=\count116
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl001.uptex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl001.uptex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl001.uptex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1398,9 +1398,9 @@
\g_tmpb_int=\count117
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl001.xetex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl001.xetex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl001.xetex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1664,9 +1664,9 @@
\g_tmpb_int=\count116
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl003.luatex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl003.luatex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl003.luatex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1666,9 +1666,9 @@
\g_tmpb_int=\count116
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl003.ptex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl003.ptex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl003.ptex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1398,9 +1398,9 @@
\g_tmpb_int=\count117
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl003.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl003.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl003.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1398,9 +1398,9 @@
\g_tmpb_int=\count116
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl003.uptex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl003.uptex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl003.uptex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1398,9 +1398,9 @@
\g_tmpb_int=\count117
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3expl003.xetex.tlg
===================================================================
--- trunk/l3kernel/testfiles/m3expl003.xetex.tlg 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3expl003.xetex.tlg 2017-02-14 12:18:32 UTC (rev 6927)
@@ -1664,9 +1664,9 @@
\g_tmpb_int=\count116
Defining \c_minus_one on line ...
Defining \flag_new:n on line ...
-Defining \flag_zero:n on line ...
-Defining \__flag_zero:wn on line ...
-Defining \flag_zero_new:n on line ...
+Defining \flag_clear:n on line ...
+Defining \__flag_clear:wn on line ...
+Defining \flag_clear_new:n on line ...
Defining \flag_show:n on line ...
Defining \flag_log:n on line ...
Defining \flag_if_exist_p:n on line ...
Modified: trunk/l3kernel/testfiles/m3flag001.lvt
===================================================================
--- trunk/l3kernel/testfiles/m3flag001.lvt 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3flag001.lvt 2017-02-14 12:18:32 UTC (rev 6927)
@@ -56,7 +56,7 @@
\TYPE { \test: \flag_raise:n {C} \test: }
{
\prg_replicate:nn {10} { \flag_raise:n {C} }
- \flag_zero:n {C}
+ \flag_clear:n {C}
\TYPE { \test: \prg_replicate:nn {10} { \flag_raise:n {C} } \test: }
}
\TYPE { \test: }
@@ -76,7 +76,7 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\TEST { undefined }
{
- \flag_zero:n { other }
+ \flag_clear:n { other }
\flag_raise:n { other }
\TYPE { | \flag_raise:n { other } | }
\TYPE { | \flag_use:n { other } | }
Modified: trunk/l3kernel/testfiles/m3fp-traps001.lvt
===================================================================
--- trunk/l3kernel/testfiles/m3fp-traps001.lvt 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3kernel/testfiles/m3fp-traps001.lvt 2017-02-14 12:18:32 UTC (rev 6927)
@@ -20,7 +20,7 @@
\flag_if_raised:nTF { fp_invalid_operation } { \ERROR } { \FALSE }
\exp_args:Nx \use_none:n { \flag_raise:n { fp_invalid_operation } }
\flag_if_raised:nTF { fp_invalid_operation } { \TRUE } { \ERROR }
- \flag_zero:n { fp_invalid_operation }
+ \flag_clear:n { fp_invalid_operation }
\flag_if_raised:nTF { fp_invalid_operation } { \ERROR } { \FALSE }
{
\iow_term:x { \fp_to_tl:n { 0 * inf } }
@@ -44,7 +44,7 @@
\flag_if_raised:nTF { fp_invalid_operation } { \ERROR } { \FALSE }
\iow_term:x { \fp_to_tl:n { 0 * inf } }
\flag_if_raised:nTF { fp_invalid_operation } { \TRUE } { \ERROR }
- \flag_zero:n { fp_invalid_operation }
+ \flag_clear:n { fp_invalid_operation }
{
\fp_trap:nn { invalid_operation } { error }
\iow_term:x { \fp_to_tl:n { 0 * inf } }
@@ -70,7 +70,7 @@
\flag_if_raised:nTF { fp_division_by_zero } { \ERROR } { \FALSE }
\iow_term:x { \fp_to_tl:n { 1 / 0 } }
\flag_if_raised:nTF { fp_division_by_zero } { \TRUE } { \ERROR }
- \flag_zero:n { fp_division_by_zero }
+ \flag_clear:n { fp_division_by_zero }
{
\fp_trap:nn { division_by_zero } { error }
\iow_term:x { \fp_to_tl:n { 1 / 0 } }
@@ -95,7 +95,7 @@
{
\iow_term:x { \fp_to_tl:n { 1e9999 * 1e9999 } }
\flag_if_raised:nTF { fp_overflow } { \TRUE } { \ERROR }
- \flag_zero:n { fp_overflow }
+ \flag_clear:n { fp_overflow }
{
\fp_trap:nn { overflow } { none }
\iow_term:x { \fp_to_tl:n { 1e9999 * 1e9999 } }
@@ -111,17 +111,17 @@
\iow_term:x { \fp_to_tl:n { 1e9999 * 1e9999 } }
\flag_if_raised:nTF { fp_overflow } { \TRUE } { \ERROR }
}
- \flag_zero:n { fp_overflow }
+ \flag_clear:n { fp_overflow }
\iow_term:x { \fp_to_tl:n { 1e9999 * 1e9999 } }
\flag_if_raised:nTF { fp_overflow } { \TRUE } { \ERROR }
- \flag_zero:n { fp_overflow }
+ \flag_clear:n { fp_overflow }
\iow_term:x { \fp_to_tl:n { exp(1e5678) } }
\flag_if_raised:nTF { fp_overflow } { \TRUE } { \ERROR }
\fp_trap:nn { overflow } { error }
- \flag_zero:n { fp_overflow }
+ \flag_clear:n { fp_overflow }
\iow_term:x { \fp_to_tl:n { 1e9999 * 1e9999 } }
\flag_if_raised:nTF { fp_overflow } { \TRUE } { \ERROR }
- \flag_zero:n { fp_overflow }
+ \flag_clear:n { fp_overflow }
\iow_term:x { \fp_to_tl:n { exp(1e5678) } }
\flag_if_raised:nTF { fp_overflow } { \TRUE } { \ERROR }
}
@@ -131,7 +131,7 @@
{
\iow_term:x { \fp_to_tl:n { 1e-9999 * 1e-9999 } }
\flag_if_raised:nTF { fp_underflow } { \TRUE } { \ERROR }
- \flag_zero:n { fp_underflow }
+ \flag_clear:n { fp_underflow }
{
\fp_trap:nn { underflow } { none }
\iow_term:x { \fp_to_tl:n { 1e-9999 * 1e-9999 } }
@@ -147,17 +147,17 @@
\iow_term:x { \fp_to_tl:n { 1e-9999 * 1e-9999 } }
\flag_if_raised:nTF { fp_underflow } { \TRUE } { \ERROR }
}
- \flag_zero:n { fp_underflow }
+ \flag_clear:n { fp_underflow }
\iow_term:x { \fp_to_tl:n { 1e-9999 * 1e-9999 } }
\flag_if_raised:nTF { fp_underflow } { \TRUE } { \ERROR }
- \flag_zero:n { fp_underflow }
+ \flag_clear:n { fp_underflow }
\iow_term:x { \fp_to_tl:n { exp(-1e5678) } }
\flag_if_raised:nTF { fp_underflow } { \TRUE } { \ERROR }
\fp_trap:nn { underflow } { error }
- \flag_zero:n { fp_underflow }
+ \flag_clear:n { fp_underflow }
\iow_term:x { \fp_to_tl:n { 1e-9999 * 1e-9999 } }
\flag_if_raised:nTF { fp_underflow } { \TRUE } { \ERROR }
- \flag_zero:n { fp_underflow }
+ \flag_clear:n { fp_underflow }
\iow_term:x { \fp_to_tl:n { exp(-1e5678) } }
\flag_if_raised:nTF { fp_underflow } { \TRUE } { \ERROR }
}
Modified: trunk/l3trial/l3fp-extras/l3fp-symbolic.dtx
===================================================================
--- trunk/l3trial/l3fp-extras/l3fp-symbolic.dtx 2017-02-14 08:38:23 UTC (rev 6926)
+++ trunk/l3trial/l3fp-extras/l3fp-symbolic.dtx 2017-02-14 12:18:32 UTC (rev 6927)
@@ -658,7 +658,7 @@
\fp_set:Nn \l_@@_symbolic_fp {#2}
\cs_set_nopar:cpn { l_@@_variable_#1_fp }
{ \flag_raise:n { @@_symbolic } \c_nan_fp }
- \flag_zero:n { @@_symbolic }
+ \flag_clear:n { @@_symbolic }
\fp_set:cn { l_@@_variable_#1_fp } { \l_@@_symbolic_fp }
\flag_if_raised:nT { @@_symbolic }
{
More information about the latex3-commits
mailing list