From 22fdbf53f65434c45f33ce5049679478e1072e58 Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info>
Date: Fri, 4 Jul 2008 11:19:42 -0500
Subject: [PATCH] math.quaternions: use 2bi in q*
---
extra/math/quaternions/quaternions.factor | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/extra/math/quaternions/quaternions.factor b/extra/math/quaternions/quaternions.factor
index f121e4a0d1..b7bfd92a1b 100755
--- a/extra/math/quaternions/quaternions.factor
+++ b/extra/math/quaternions/quaternions.factor
@@ -24,7 +24,7 @@ PRIVATE>
: q* ( u v -- u*v )
#! Multiply quaternions.
- [ q*a ] 2keep q*b 2array ;
+ [ q*a ] [ q*b ] 2bi 2array ;
: qconjugate ( u -- u' )
#! Quaternion conjugate.