summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pstricks/pst-fp.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/pstricks/pst-fp.tex')
-rw-r--r--Master/texmf-dist/tex/generic/pstricks/pst-fp.tex21
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