<> <> <> <<>> <<% reversepath clobbers gsaved path>> /=, { {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 <<% weird cvi behavior>> 999999999999999 = (999999999999999) cvi = 999999999999999 cvi = (3 4) cvi = <<% weird idiv behavior>> 7 3 idiv = 7.0 3 idiv = 7 3.0 idiv = <<% bogus string result from readstring>> (foo) (r) file 10 string readstring pop /s exch def s length =