opengl: fix small typo in fix-coordinates stack effect. Fixes #406.

John Benediktsson 2011-11-15 08:18:22 -08:00
parent bae84edb38
commit 414a768706
1 changed files with 1 additions and 1 deletions

View File

@ -200,7 +200,7 @@ MACRO: set-draw-buffers ( buffers -- )
: with-translation ( loc quot -- )
[ [ gl-translate ] dip call ] do-matrix ; inline
: fix-coordinates ( point1 point2 -- x1 y2 x2 y2 )
: fix-coordinates ( point1 point2 -- x1 y1 x2 y2 )
[ first2 [ >fixnum ] bi@ ] bi@ ;
: gl-set-clip ( loc dim -- )