From ef358fe94be17fdea4c6cc28e6dc730a9a1d3d85 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 13 Mar 2017 21:10:24 +0000 Subject: l3 git-svn-id: svn://tug.org/texlive/trunk@43488 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex | 20 +++++++++++++++++--- 1 file changed, 17 insertions(+), 3 deletions(-) (limited to 'Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex') diff --git a/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex b/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex index 72b29f13e11..08580e71110 100644 --- a/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex +++ b/Master/texmf-dist/tex/latex/l3kernel/expl3-code.tex @@ -60,8 +60,8 @@ %% File: expl3.dtx Copyright (C) 1990-2017 The LaTeX3 Project \def\ExplFileName{expl3}% \def\ExplFileDescription{L3 programming layer}% -\def\ExplFileDate{2017/03/07}% -\def\ExplFileVersion{6984}% +\def\ExplFileDate{2017/03/11}% +\def\ExplFileVersion{6988}% \begingroup \def\next{\endgroup}% \expandafter\ifx\csname PackageError\endcsname\relax @@ -10381,7 +10381,7 @@ { is~undefined. } } %% File: l3fp.dtx Copyright (C) 2011-2017 The LaTeX3 Project -\GetIdInfo$Id: l3fp.dtx 6923 2017-02-14 03:07:25Z bruno $ +\GetIdInfo$Id: l3fp.dtx 6987 2017-03-11 01:06:52Z bruno $ {L3 Floating points} %% File: l3fp-aux.dtx Copyright(C) 2011-2014,2016-2017 The LaTeX3 Project \cs_new:Npn \__fp_use_none_stop_f:n #1 { \exp_stop_f: } @@ -11883,6 +11883,8 @@ { \__fp_parse_unary_function:nNN {exp} ? } \cs_new:Npn \__fp_parse_word_ln:N { \__fp_parse_unary_function:nNN {ln} ? } +\cs_new:Npn \__fp_parse_word_sign:N + { \__fp_parse_unary_function:nNN {sign} ? } \cs_new:Npn \__fp_parse_word_sqrt:N { \__fp_parse_unary_function:nNN {sqrt} ? } \tl_map_inline:nn @@ -12627,6 +12629,18 @@ { \fi: \fi: #2 } \cs_new:Npn \__fp_minmax_break_o:w #1 \fi: \fi: #2 \s__fp #3; #4; { \fi: \__fp_exp_after_o:w \s__fp #3; } +\cs_new:Npn \__fp_sign_o:w ? \s__fp \__fp_chk:w #1#2; @ + { + \if_case:w #1 \exp_stop_f: + \__fp_case_return_same_o:w + \or: \exp_after:wN \__fp_sign_aux_o:w + \or: \exp_after:wN \__fp_sign_aux_o:w + \else: \__fp_case_return_same_o:w + \fi: + \s__fp \__fp_chk:w #1 #2; + } +\cs_new:Npn \__fp_sign_aux_o:w \s__fp \__fp_chk:w #1 #2 #3 ; + { \__fp_exp_after_o:w \s__fp \__fp_chk:w 1#2{1}{1000}{0000}{0000}{0000}; } \cs_new:cpn { __fp_not_o:w } #1 \s__fp \__fp_chk:w #2#3; @ { \if_meaning:w 0 #2 -- cgit v1.2.3