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

[factor.git] / extra / tools / time / struct / struct.factor

diff --git a/extra/tools/time/struct/struct.factor b/extra/tools/time/struct/struct.factor
index 16a0549ec57e86e08e2f0d480a870f6a0595e973..f13edf085d34d45370f058477ca132d0a061c283 100644 (file)
--- a/extra/tools/time/struct/struct.factor
+++ b/extra/tools/time/struct/struct.factor
@@ -15,14 +15,14 @@ STRUCT: benchmark-data-pair
     { stop benchmark-data } ;
 
 : <benchmark-data> ( -- benchmark-data )
-    \ benchmark-data <struct>
+    \ benchmark-data new
         nano-count >>time
         data-room >>data-room
         code-room >>code-room
         callback-room >>callback-room ; inline
 
 : <benchmark-data-pair> ( start stop -- benchmark-data-pair )
-    \ benchmark-data-pair <struct>
+    \ benchmark-data-pair new
         swap >>stop
         swap >>start ; inline