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

fix some faux pas in bunny

Joe Groff 2009-05-07 19:47:05 -05:00
parent b1f42da336
commit 94f92ad0eb
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/bunny/model/model.factor
View File

@ -89,7 +89,7 @@ M: bunny-buffers bunny-geom
GL_FLOAT 0 0 buffer-offset glNormalPointer GL_FLOAT 0 0 buffer-offset glNormalPointer
[ [
nv>> "float" heap-size * buffer-offset nv>> "float" heap-size * buffer-offset
3 GL_FLOAT 0 roll glVertexPointer [ 3 GL_FLOAT 0 ] dip glVertexPointer
] [ ] [
ni>> ni>>
GL_TRIANGLES swap GL_UNSIGNED_INT 0 buffer-offset glDrawElements GL_TRIANGLES swap GL_UNSIGNED_INT 0 buffer-offset glDrawElements

2
extra/bunny/outlined/outlined.factor
View File

@ -120,7 +120,7 @@ TUPLE: bunny-outlined
: outlining-supported? ( -- ? ) : outlining-supported? ( -- ? )
"2.0" { "2.0" {
"GL_ARB_shading_objects" "GL_ARB_shader_objects"
"GL_ARB_draw_buffers" "GL_ARB_draw_buffers"
"GL_ARB_multitexture" "GL_ARB_multitexture"
} has-gl-version-or-extensions? { } has-gl-version-or-extensions? {

4
extra/opengl/demo-support/demo-support.factor
View File

@ -1,9 +1,9 @@
USING: arrays kernel math math.functions math.order math.vectors USING: arrays kernel math math.functions math.order math.vectors
namespaces opengl opengl.gl sequences ui ui.gadgets ui.gestures 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 IN: opengl.demo-support
: FOV ( -- x ) 2.0 sqrt 1+ ; inline CONSTANT: FOV $[ 2.0 sqrt 1+ ]
CONSTANT: MOUSE-MOTION-SCALE 0.5 CONSTANT: MOUSE-MOTION-SCALE 0.5
CONSTANT: KEY-ROTATE-STEP 10.0 CONSTANT: KEY-ROTATE-STEP 10.0