[latex3-commits] [git/LaTeX3-latex3-latex3] master: Add \conditionally at traceoff (from trace.sty) to two noisy expl3 functions (b197599)

[Bruno Le Floch]

Repository : https://github.com/latex3/latex3
On branch  : master
Link       : https://github.com/latex3/latex3/commit/b197599ede4aee2247ae0095f64b5b33abbce4ca

>---------------------------------------------------------------

commit b197599ede4aee2247ae0095f64b5b33abbce4ca
Author: Bruno Le Floch <bruno at le-floch.fr>
Date:   Fri Apr 6 23:44:58 2018 -0400

    Add \conditionally at traceoff (from trace.sty) to two noisy expl3 functions
    
    This is somewhat experimental.  It may make sense to provide a package that
    suppresses \traceon output likewise for all non-expandable commands: even
    for simple ones like \seq_put_left:Nn this reduces terminal output.


>---------------------------------------------------------------

b197599ede4aee2247ae0095f64b5b33abbce4ca
 l3kernel/l3file.dtx |    4 ++++
 l3kernel/l3msg.dtx  |    5 +++++
 2 files changed, 9 insertions(+)

diff --git a/l3kernel/l3file.dtx b/l3kernel/l3file.dtx
index 07b7b34..73a5aba 100644
--- a/l3kernel/l3file.dtx
+++ b/l3kernel/l3file.dtx
@@ -1456,10 +1456,14 @@
 %   \verb*|\ | uses an \enquote{other} space rather than a normal space,
 %   because the latter might be absorbed by \TeX{} to end a number or
 %   other \texttt{f}-type expansions.
+%   Use \cs{conditionally at traceoff} if defined; it is introduced by the
+%   \pkg{trace} package and suppresses uninteresting tracing of the
+%   wrapping code.
 %    \begin{macrocode}
 \cs_new_protected:Npn \iow_wrap:nnnN #1#2#3#4
   {
     \group_begin:
+%<package>      \use:c { conditionally at traceoff }
       \int_set:Nn \tex_escapechar:D { -1 }
       \cs_set:Npx \{ { \token_to_str:N \{ }
       \cs_set:Npx \# { \token_to_str:N \# }
diff --git a/l3kernel/l3msg.dtx b/l3kernel/l3msg.dtx
index df43e08..6e38e71 100644
--- a/l3kernel/l3msg.dtx
+++ b/l3kernel/l3msg.dtx
@@ -1258,9 +1258,13 @@
 %   assignment to \cs{@@_use_code:} is similar to \cs{tl_set:Nn}.
 %   The message is eventually produced with whatever \cs{l_@@_class_tl}
 %   is when \cs{@@_use_code:} is called.
+%   Here is also a good place to suppress tracing output if the
+%   \pkg{trace} package is loaded since all (non-expandable) messages go
+%   through this auxiliary.
 %    \begin{macrocode}
 \cs_new_protected:Npn \@@_use:nnnnnnn #1#2#3#4#5#6#7
   {
+%<package>    \use:c { conditionally at traceoff }
     \msg_if_exist:nnTF {#2} {#3}
       {
         \@@_class_chk_exist:nT {#1}
@@ -1278,6 +1282,7 @@
           }
       }
       { \__kernel_msg_error:nnxx { kernel } { message-unknown } {#2} {#3} }
+%<package>    \use:c { conditionally at traceon }
   }
 \cs_new_protected:Npn \@@_use_code: { }
 %    \end{macrocode}