[Problem] \scale macro doesn't work

Denis Girou Denis.Girou at idris.fr
Wed Jan 7 18:41:08 CET 1998


-----------------------------------------------------------------------------
This is the PSTricks mailing list, devoted to discussions about computational
graphics in (La)TeX using the PSTricks package from Timothy van Zandt.
For help using this mailing list, see instructions at the end of message.
-----------------------------------------------------------------------------

  I found recently that the \scale macro doesn't work (I'm sure it is too not
heavily used...)

  In fact, it is our error building PSTricks 97, as we miss to include the
corresponding correction form the pstricks.bug file from 0.93 version.

  * 98/01/07 pstricks.tex (93a/b-97 patch 9): The \scale macro doesn't work,
due to a bug correction from the 0.93 pstricks.bug file not reported in
PSTricks 97.
(reported by Denis Girou <Denis.Girou at idris.fr>)

\documentclass{article}

\usepackage{pstricks}

\makeatletter
% DG/SR modification begin - Jan. 7, 1998 (missing from pstricks.bug 0.93)
%\def\pst at getscale#1#2{%
%\pst at expandafter\pst at getnumii{#1 #1} {} {} {}\@nil
%\@psttrue
%\ifdim\pst at tempg\p@=\z@
%\@pstrickserr{Bad scaling argument `#1'}\@ehpa
%\def\pst at tempg{1 }%
%\@pstfalse
%\fi
%\ifdim\pst at temph\p@=\z@
%\if at pst\@pstrickserr{Bad scaling argument `#1'}\@ehpa\fi
%\def\pst at temph{1 }%
%\fi
%\edef#2{\pst at tempg\space \pst at temph\space scale }%
%\ifdim\pst at tempg\p@=\p@ \ifdim\pst at temph\p@=\p@
%\def#2{}%
%\fi\fi}
\def\pst at getscale#1#2{%
\edef\pst at tempg{#1}%
\ifx\pst at tempg\@none
\def#2{}%
\else
\pst at expandafter\pst at getnumii{#1 #1} {} {} {}\@nil
\ifdim\pst at tempg\p@=\z@
\@pstrickserr{Bad scaling argument `#1'}\@ehpa
\def#2{}%
\else
\ifdim\pst at temph\p@=\z@
\@pstrickserr{Bad scaling argument `#1'}\@ehpa
\def#2{}%
\else
\edef#2{\pst at tempg\space \pst at temph\space scale }%
\fi
\fi
\fi}
% DG/SR modification end
\makeatother

\pagestyle{empty}

\begin{document}

\pscustom{\scale{2}\moveto(1,0)\lineto(0,1)}

\end{document}

D.G.

-----------------------------------------------------------------------------
The list interface (subscription, information, access to the archives) is on:
http://www.tug.org/cgi-bin/lwgate/pstricks
Otherway to unsubscribe, send mail to pstricks-request at mail.tug.org
with a blank subject and in body the line unsubscribe <email-address>
-----------------------------------------------------------------------------



More information about the PSTricks mailing list