Fixed Memory Leaks. :)

2019-11-10 00:50:09 +01:00
parent a790a38655
commit bb1cfcd3c3
19 changed files with 199 additions and 173 deletions
@@ -8,7 +8,7 @@

 (assert (= (type v1) (type v2) :vector3))

-(assert (= (v1 'scalar-product v2) 10))
+(assert (= (v1 (quote scalar-product) v2) 10))

 (assert (-> (-> v1 cross-product v2) equal? (make-vector3 -4 8 -4)))