diff --git a/basis/opengl/opengl.factor b/basis/opengl/opengl.factor index f3ee56587d..9c66002f7e 100644 --- a/basis/opengl/opengl.factor +++ b/basis/opengl/opengl.factor @@ -2,12 +2,10 @@ ! Portions copyright (C) 2007 Eduardo Cavazos. ! Portions copyright (C) 2008 Joe Groff. ! See http://factorcode.org/license.txt for BSD license. -USING: alien alien.c-types alien.data ascii calendar -combinators.short-circuit continuations kernel libc math macros -namespaces math.vectors math.parser opengl.gl combinators -combinators.smart arrays sequences splitting words byte-arrays -assocs vocabs colors colors.constants accessors generalizations -sequences.generalizations locals fry specialized-arrays ; +USING: alien alien.c-types alien.data assocs colors +combinators.smart continuations fry init kernel locals macros +math namespaces opengl.gl sequences sequences.generalizations +specialized-arrays ; FROM: alien.c-types => float ; SPECIALIZED-ARRAY: float SPECIALIZED-ARRAY: uint @@ -223,3 +221,5 @@ MACRO: set-draw-buffers ( buffers -- ) glLoadIdentity GL_MODELVIEW glMatrixMode glLoadIdentity ; + +[ f gl-scale-factor set-global ] "opengl" add-startup-hook