/=, { {dup type /stringtype ne { =string cvs } if print } exec } bind def /pnum { =, ( ) print } def /pvec { exch pnum pnum } def /pmove { pvec (moveto) = } def /pline { pvec (lineto) = } def /pcurve { 6 4 roll pvec 4 2 roll pvec pvec (curveto) = } def /pclose { (closepath) = } def /ppath { /pmove load /pline load /pcurve load /pclose load pathforall } def newpath 200 200 moveto 300 200 lineto 300 300 lineto closepath 200 300 lineto 100 200 lineto gsave ppath reversepath grestore ppath 999999999999999 = (999999999999999) cvi = 999999999999999 cvi = (3 4) cvi = 7 3 idiv = 7.0 3 idiv = 7 3.0 idiv = (foo) (r) file 10 string readstring pop /s exch def s length = (}3) token = PSBugs.tioga Copyright Ó 1987 by Xerox Corporation. All rights reserved. Doug Wyatt, May 22, 1987 11:52:48 am PDT % reversepath clobbers gsaved path % weird cvi behavior % weird idiv behavior % bogus string result from readstring % token primitive fails to report syntaxerror ÊÓ˜™ Icode™