classes.struct: moving to new/boa instead of <struct>/<struct-boa>

[factor.git] / extra / classes / struct / vectored / vectored.factor

diff --git a/extra/classes/struct/vectored/vectored.factor b/extra/classes/struct/vectored/vectored.factor
index a9be5fe966051acfa4bd16d35b21ba0a9f5be5fa..1926040f5575443f9d83cefe7ffb6c668548b5a4 100644 (file)
--- a/extra/classes/struct/vectored/vectored.factor
+++ b/extra/classes/struct/vectored/vectored.factor
@@ -41,7 +41,7 @@ MACRO: (vectored-slots) ( struct-class -- quot: ( n -- slots... ) )
 
 MACRO: (vectored-element>) ( struct-class -- quot: ( elt -- struct ) )
     [ struct-slots [ name>> reader-word 1quotation ] map ] keep
-    '[ _ cleave _ <struct-boa> ] ;
+    '[ _ cleave _ boa ] ;
 
 SLOT: (n)
 SLOT: (vectored)