From 32481f8e2f2909a50788532c58f8d9deff479ed9 Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Mon, 9 Feb 2009 15:01:41 -0600
Subject: [PATCH] my stuped, let me show u it

---
 basis/alien/complex/functor/functor.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/alien/complex/functor/functor.factor b/basis/alien/complex/functor/functor.factor
index c6644eba1d..31af0291b4 100644
--- a/basis/alien/complex/functor/functor.factor
+++ b/basis/alien/complex/functor/functor.factor
@@ -28,8 +28,8 @@ T in get
 define-struct
 
 T c-type
-<T> 1quotation >>boxer-quot
-*T 1quotation >>unboxer-quot
+<T> 1quotation >>unboxer-quot
+*T 1quotation >>boxer-quot
 drop
 
 ;FUNCTOR