Optimization

diff --git a/extra/xml/data/data.factor b/extra/xml/data/data.factor
index 1850171537b3c0cd7f6e97438723009e5014eb35..58ff2a3f6c90618adca81ea2db6d13d2f587f053 100644 (file)
--- a/extra/xml/data/data.factor
+++ b/extra/xml/data/data.factor
@@ -65,7 +65,6 @@ M: attrs set-at
 
 M: attrs assoc-size length ;
 M: attrs new-assoc drop V{ } new <attrs> ;
-M: attrs assoc-find >r delegate r> assoc-find ;
 M: attrs >alist delegate >alist ;
 
 : >attrs ( assoc -- attrs )