summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2021-05-12 20:48:10 -0400
committerDavid Thompson <dthompson2@worcester.edu>2021-05-12 20:48:10 -0400
commit3152304d7c04c19e8780dccab3ac4793fde06ad2 (patch)
tree5783629f1f5e2a3dbacb686825054848696c8c5b
parent662d04ffa53f9c400d959ceeb9af9a7bb9ad63cf (diff)
math: vector: Fix vec3-copy!
-rw-r--r--chickadee/math/vector.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/chickadee/math/vector.scm b/chickadee/math/vector.scm
index 3476326..3cc1a9a 100644
--- a/chickadee/math/vector.scm
+++ b/chickadee/math/vector.scm
@@ -210,8 +210,10 @@ polar coordinate (R, THETA) with an arbitrary ORIGIN point."
(define (vec3-copy! source-vec3 target-vec3)
"Copy SOURCE-VEC3 to TARGET-VEC3."
- (set-vec3-x! target-vec3 (vec3-x source-vec3))
- (set-vec3-y! target-vec3 (vec3-y source-vec3)))
+ (set-vec3! target-vec3
+ (vec3-x source-vec3)
+ (vec3-y source-vec3)
+ (vec3-z source-vec3)))
(define (vec2-copy vec2)
"Return a new vec2 that is a copy of VEC2."