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

db4
John Benediktsson 2011-11-15 08:18:22 -08:00
parent 95d5daaa7d
commit a248fc28a8
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 -- )