steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Tweak gl-rect to generate the correct output on Windows with Intel graphics

db4
Slava Pestov 2008-11-18 11:48:06 -06:00
parent bec8cc4239
commit b609ca7d01
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/opengl/opengl.factor
View File

@ -72,9 +72,9 @@ MACRO: all-enabled-client-state ( seq quot -- )
: (rect-vertices) ( dim -- vertices ) : (rect-vertices) ( dim -- vertices )
{ {
[ drop 0.5 0.5 ] [ drop 0.5 0.5 ]
[ first 0.5 - 0.5 ] [ first 0.3 - 0.5 ]
[ [ first 0.5 - ] [ second 0.5 - ] bi ] [ [ first 0.3 - ] [ second 0.3 - ] bi ]
[ second 0.5 - 0.5 swap ] [ second 0.3 - 0.5 swap ]
} cleave 8 narray >c-float-array ; } cleave 8 narray >c-float-array ;
: rect-vertices ( dim -- ) : rect-vertices ( dim -- )