From 6f432811f5492d33033b4d571df7dedc8e3d950e Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Thu, 6 Nov 2008 02:52:54 -0600 Subject: [PATCH] Fix mirrors --- basis/mirrors/mirrors.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/mirrors/mirrors.factor b/basis/mirrors/mirrors.factor index ce99314ce6..d3d6dbdb04 100644 --- a/basis/mirrors/mirrors.factor +++ b/basis/mirrors/mirrors.factor @@ -44,7 +44,7 @@ M: mirror >alist ( mirror -- alist ) [ object>> [ swap slot ] curry ] bi map zip ; -M: mirror assoc-size object>> layout-of size>> ; +M: mirror assoc-size object>> layout-of second ; INSTANCE: mirror assoc