diff options
Diffstat (limited to 'chickadee/graphics/particles.scm')
-rw-r--r-- | chickadee/graphics/particles.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/chickadee/graphics/particles.scm b/chickadee/graphics/particles.scm index d8bd1b2..35aa6fc 100644 --- a/chickadee/graphics/particles.scm +++ b/chickadee/graphics/particles.scm @@ -24,10 +24,10 @@ #:use-module (chickadee math matrix) #:use-module (chickadee math rect) #:use-module (chickadee math vector) - #:use-module (chickadee graphics blend) #:use-module (chickadee graphics buffer) #:use-module (chickadee graphics color) #:use-module (chickadee graphics engine) + #:use-module (chickadee graphics gpu) #:use-module (chickadee graphics shader) #:use-module (chickadee graphics texture) #:export (make-particle-emitter @@ -285,7 +285,7 @@ default. (hw (- hh) 1.0 0.0) (hw hh 1.0 1.0) ((- hw) hh 0.0 1.0))) - (geometry-index-append! geometry 0 3 2 0 2 1)) + (geometry-index-append! geometry 0 2 3 0 1 2)) (%make-particles capacity 0 ;; 1 extra element as swap space for sorting. @@ -431,8 +431,8 @@ default. (let ((shader (graphics-variable-ref particles-shader)) (mvp (graphics-variable-ref mvp-matrix)) (geometry (particles-geometry particles))) - (with-graphics-state ((g:blend-mode (particles-blend-mode particles)) - (g:texture-0 (particles-texture particles))) + (with-graphics-state ((blend-mode (particles-blend-mode particles)) + (texture 0 (texture-id (particles-texture particles)))) (shader-apply/instanced shader (geometry-vertex-array geometry) (particles-size particles) |