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

[factor.git] / basis / unix / groups / groups.factor

diff --git a/basis/unix/groups/groups.factor b/basis/unix/groups/groups.factor
index d214ebef833aac70a4953e9e1865c1e394bd7ae6..45e24a4ced19f9b4fa53244f8351ac754fb6dd13 100644 (file)
--- a/basis/unix/groups/groups.factor
+++ b/basis/unix/groups/groups.factor
@@ -18,7 +18,7 @@ GENERIC: group-struct ( obj -- group/f )
     gr_mem>> utf8 alien>strings ;
 
 : (group-struct) ( id -- group-struct id group-struct byte-array length void* )
-    [ unix.ffi:group <struct> ] dip over 4096
+    [ unix.ffi:group new ] dip over 4096
     [ <byte-array> ] keep f void* <ref> ;
 
 : check-group-struct ( group-struct ptr -- group-struct/f )