gml: fix simd

modern-harvey2
Doug Coleman 2017-12-28 17:16:22 -08:00
parent 887184e0e5
commit f7d9b7d50d
2 changed files with 5 additions and 4 deletions

View File

@ -8,9 +8,10 @@ math.order math.ranges math.vectors math.vectors.conversion
math.vectors.simd math.vectors.simd.cords method-chains models math.vectors.simd math.vectors.simd.cords method-chains models
namespaces sequences sets specialized-vectors typed ui namespaces sequences sets specialized-vectors typed ui
ui.gadgets ui.gadgets.worlds ui.gestures ui.pixel-formats ui.gadgets ui.gadgets.worlds ui.gestures ui.pixel-formats
vectors ; vectors specialized-arrays ;
FROM: math.matrices => m.v ; FROM: math.matrices => m.v ;
FROM: models => change-model ; FROM: models => change-model ;
SPECIALIZED-ARRAY: ushort
SPECIALIZED-VECTORS: ushort float-4 ; SPECIALIZED-VECTORS: ushort float-4 ;
IN: gml.viewer IN: gml.viewer

View File

@ -169,13 +169,13 @@ M: index-elements render-vertex-indexes-instanced
[ ] tri* [ ] tri*
swap index-buffer [ swap glDrawElementsInstanced ] with-gpu-data-ptr ; swap index-buffer [ swap glDrawElementsInstanced ] with-gpu-data-ptr ;
M: specialized-array render-vertex-indexes M: specialized-array-mixin render-vertex-indexes
GL_ELEMENT_ARRAY_BUFFER 0 glBindBuffer GL_ELEMENT_ARRAY_BUFFER 0 glBindBuffer
[ gl-primitive-mode ] [ gl-primitive-mode ]
[ [ length ] [ gl-array-element-type ] [ >c-ptr ] tri ] bi* [ [ length ] [ gl-array-element-type ] [ >c-ptr ] tri ] bi*
glDrawElements ; glDrawElements ;
M: specialized-array render-vertex-indexes-instanced M: specialized-array-mixin render-vertex-indexes-instanced
GL_ELEMENT_ARRAY_BUFFER 0 glBindBuffer GL_ELEMENT_ARRAY_BUFFER 0 glBindBuffer
[ gl-primitive-mode ] [ gl-primitive-mode ]
[ [ length ] [ gl-array-element-type ] [ >c-ptr ] tri ] [ [ length ] [ gl-array-element-type ] [ >c-ptr ] tri ]
@ -258,7 +258,7 @@ DEFER: uniform-texture-accessors
\ nip swap \ cleave [ ] 3sequence ; \ nip swap \ cleave [ ] 3sequence ;
UNION: binary-data UNION: binary-data
c-ptr specialized-array struct simd-128 ; c-ptr specialized-array-mixin struct simd-128 ;
GENERIC: >uniform-bool-array ( sequence -- c-array ) GENERIC: >uniform-bool-array ( sequence -- c-array )
GENERIC: >uniform-int-array ( sequence -- c-array ) GENERIC: >uniform-int-array ( sequence -- c-array )