diff options
author | David Thompson <dthompson2@worcester.edu> | 2023-05-02 07:30:45 -0400 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2023-05-02 07:30:45 -0400 |
commit | 73b44ca69521499ebea600aa9dbe208aa4ecb8e9 (patch) | |
tree | a41d23a67d00a05358c182a9aea67be46b3d26c3 | |
parent | fdd4064db9a5632cb112622d84c0a143beed5fe8 (diff) |
graphics: buffer: Remove keyword args from apply-vertex-attribute.
-rw-r--r-- | chickadee/graphics/buffer.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/chickadee/graphics/buffer.scm b/chickadee/graphics/buffer.scm index 315d988..fff1a88 100644 --- a/chickadee/graphics/buffer.scm +++ b/chickadee/graphics/buffer.scm @@ -421,7 +421,7 @@ element is used for 2 instances, and so on." ((float) (data-type float)) ((double) (data-type double)))) -(define* (apply-vertex-attribute vertex-attribute #:optional attribute-index) +(define (apply-vertex-attribute vertex-attribute attribute-index) (with-graphics-state! ((g:buffer (vertex-attribute->buffer vertex-attribute))) ;; If there is no attribute-index, we assume this is being bound for ;; use as an index buffer. @@ -511,7 +511,7 @@ argument may be overridden. The following values are supported: ((index . vertex-attribute) (apply-vertex-attribute vertex-attribute index))) attributes) - (when indices (apply-vertex-attribute indices))) + (when indices (apply-vertex-attribute indices #f))) ;; Restore the old array. Is this needed? ;; (graphics-engine-commit!) array)) @@ -531,7 +531,7 @@ argument may be overridden. The following values are supported: (let ((indices (vertex-array-indices array))) (if indices (begin - (apply-vertex-attribute indices) + (apply-vertex-attribute indices #f) (gl-draw-elements (vertex-array-mode-gl array) (or count (vertex-attribute-length indices)) @@ -549,7 +549,7 @@ argument may be overridden. The following values are supported: (let ((indices (vertex-array-indices array))) (if indices (begin - (apply-vertex-attribute indices) + (apply-vertex-attribute indices #f) (gl-draw-elements-instanced (vertex-array-mode-gl array) (or count (vertex-attribute-length indices)) |