On Thu, Jul 21, 2011 at 8:11 AM, Karl Hammar <k...@aspodata.se> wrote: > Han-Wen Nienhuys: > ... >> Werner, can you have a look at http://codereview.appspot.com/4819041 ? > > /draw_round_box % width height x y blot > { > - setlinewidth % w h x y > - 0 setlinecap > - 1 setlinejoin > + dup > + 0.0 gt { > + setlinewidth % w h x y > + 0 setlinecap > + 1 setlinejoin > + > > There is no blot on the stack below (as indicated by the comment),
there is; the dup puts it on the stack. The comment indicate the state after the call. > You don't seem to use this, why defining it? > > +/draw_box % width height x y > +{ debugging fart. Will remove. -- Han-Wen Nienhuys - han...@xs4all.nl - http://www.xs4all.nl/~hanwen _______________________________________________ lilypond-devel mailing list lilypond-devel@gnu.org https://lists.gnu.org/mailman/listinfo/lilypond-devel