diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/pstricks/pst-fp.tex')
-rw-r--r-- | Master/texmf-dist/tex/generic/pstricks/pst-fp.tex | 21 |
1 files changed, 12 insertions, 9 deletions
diff --git a/Master/texmf-dist/tex/generic/pstricks/pst-fp.tex b/Master/texmf-dist/tex/generic/pstricks/pst-fp.tex index 2ea9cf11f4f..97e189f99f9 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 451 2017-05-11 12:32:06Z 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 |