]> gitweb.factorcode.org Git - factor.git/commitdiff
fix some faux pas in bunny
authorJoe Groff <arcata@gmail.com>
Fri, 8 May 2009 00:47:05 +0000 (19:47 -0500)
committerJoe Groff <arcata@gmail.com>
Fri, 8 May 2009 00:47:05 +0000 (19:47 -0500)
extra/bunny/model/model.factor
extra/bunny/outlined/outlined.factor
extra/opengl/demo-support/demo-support.factor

index 0009e39fa7a4460b5538edb2e0dee9332ebb493b..387193690270436f674a6a313112882f4270a671 100755 (executable)
@@ -89,7 +89,7 @@ M: bunny-buffers bunny-geom
             GL_FLOAT 0 0 buffer-offset glNormalPointer
             [
                 nv>> "float" heap-size * buffer-offset
-                3 GL_FLOAT 0 roll glVertexPointer
+                [ 3 GL_FLOAT 0 ] dip glVertexPointer
             ] [
                 ni>>
                 GL_TRIANGLES swap GL_UNSIGNED_INT 0 buffer-offset glDrawElements
index 0ad2a72100e97cbe1c0678287f3ab088916652c6..7d614ff94769a56345f44f516300e8312fd6d5f9 100755 (executable)
@@ -120,7 +120,7 @@ TUPLE: bunny-outlined
 
 : outlining-supported? ( -- ? )
     "2.0" {
-        "GL_ARB_shading_objects"
+        "GL_ARB_shader_objects"
         "GL_ARB_draw_buffers"
         "GL_ARB_multitexture"
     } has-gl-version-or-extensions? {
index 35c64d4ad1106cd361292d1dfe1a9ee7de59cc45..8afbd52647e2e2ef68fa9af50a4c9e4f2d5d2f02 100755 (executable)
@@ -1,9 +1,9 @@
 USING: arrays kernel math math.functions math.order math.vectors
 namespaces opengl opengl.gl sequences ui ui.gadgets ui.gestures
-ui.gadgets.worlds ui.render accessors combinators ;
+ui.gadgets.worlds ui.render accessors combinators literals ;
 IN: opengl.demo-support
 
-: FOV ( -- x ) 2.0 sqrt 1+ ; inline
+CONSTANT: FOV $[ 2.0 sqrt 1+ ]
 CONSTANT: MOUSE-MOTION-SCALE 0.5
 CONSTANT: KEY-ROTATE-STEP 10.0