Fix tests and vector function predicates

This commit is contained in:
BirDt_ 2026-04-05 13:23:31 +08:00
parent 2991268ecb
commit 8dbf44a9f0
2 changed files with 10 additions and 10 deletions

View file

@ -18,7 +18,7 @@
(vector-* v2 (make-vector2 10 10))) => #t)
(check (vector-= (make-vector2 1 1)
(vector-/ v2 (make-vector2 10 10))) => #t)
(check (vector-magnitude (make-vector 100 0)) => 100)
(check (vector-= (make-vector 1 0)
(vector-normalize (make-vector 100 0))) => #t)
(check (vector-magnitude (make-vector2 100 0)) => 100)
(check (vector-= (make-vector2 1 0)
(vector-normalize (make-vector2 100 0))) => #t)
)