gl-rect stack effect changed

db4
Slava Pestov 2008-11-16 13:07:03 -06:00
parent cd3c71c113
commit 77b77d6414
1 changed files with 1 additions and 1 deletions

View File

@ -7,7 +7,7 @@ IN: springies.ui
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
: draw-node ( node -- ) pos>> { -5 -5 } v+ dup { 10 10 } v+ gl-rect ;
: draw-node ( node -- ) pos>> { -5 -5 } v+ [ { 10 10 } gl-rect ] with-translation ;
: draw-spring ( spring -- )
[ node-a>> pos>> ] [ node-b>> pos>> ] bi gl-line ;