From d47159a7f43a28a563b1f7c94f982e3f57945395 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 4 Oct 2017 23:04:03 +0000 Subject: pstricks (4oct17) git-svn-id: svn://tug.org/texlive/trunk@45464 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/generic/pstricks/pst-fp.tex | 21 ++++++++++++--------- 1 file changed, 12 insertions(+), 9 deletions(-) (limited to 'Master/texmf-dist/tex/generic/pstricks/pst-fp.tex') diff --git a/Master/texmf-dist/tex/generic/pstricks/pst-fp.tex b/Master/texmf-dist/tex/generic/pstricks/pst-fp.tex index 2ea9cf11f4f..2d4e748193a 100644 --- a/Master/texmf-dist/tex/generic/pstricks/pst-fp.tex +++ b/Master/texmf-dist/tex/generic/pstricks/pst-fp.tex @@ -1,4 +1,4 @@ -%% $Id: pst-fp.tex 446 2017-04-19 11:40:55Z herbert $ +%% $Id: pst-fp.tex 465 2017-05-22 17:50:57Z herbert $ %% %% %% This is file `pst-fp.tex', @@ -121,12 +121,12 @@ \def\pstFP@swallow#1\relax{} % \def\ifpstFP@zero#1{% - \ifnum% - \expandafter\ifnum\csname pstFP@#1ia\endcsname=0 0\else1\fi% - \expandafter\ifnum\csname pstFP@#1ib\endcsname=0 0\else1\fi% - \expandafter\ifnum\csname pstFP@#1fa\endcsname=0 0\else1\fi% + \ifnum + \expandafter\ifnum\csname pstFP@#1ia\endcsname=0 0\else1\fi + \expandafter\ifnum\csname pstFP@#1ib\endcsname=0 0\else1\fi + \expandafter\ifnum\csname pstFP@#1fa\endcsname=0 0\else1\fi \expandafter\ifnum\csname pstFP@#1fb\endcsname=0 0\else1\fi% - =0\relax% + =0\relax } % %read value @@ -485,7 +485,8 @@ \fi% \global\let\pstFP@tmp\pstFP@tmp% }% - \let#1\pstFP@tmp% +% \pstFPstripZeros\pstFP@tmp{#1}% + \let#1\pstFP@tmp } @@ -581,7 +582,8 @@ \global\let\pstFP@tmp=\pstFP@tmp% % }% - \let#1\pstFP@tmp% +% \pstFPstripZeros\pstFP@tmp{#1}% + \let#1\pstFP@tmp } %multiply two values @@ -705,7 +707,8 @@ \else\typeout{pstFPmul: Overflow}\fi% \else\typeout{pstFPmul: Overflow}\fi% \global\let\pstFP@tmp\pstFP@tmp}% - \let#1\pstFP@tmp% +% \pstFPstripZeros\pstFP@tmp{#1}% + \let#1\pstFP@tmp } % \catcode`\@=\PstAtCode\relax -- cgit v1.2.3