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

[factor.git] / extra / io / files / trash / macosx / macosx.factor

diff --git a/extra/io/files/trash/macosx/macosx.factor b/extra/io/files/trash/macosx/macosx.factor
index f7be3e41793b33f140ae3d885d939036ff24f896..3865eb7ab90c133385ef9a4fece8676f03b2e436 100644 (file)
--- a/extra/io/files/trash/macosx/macosx.factor
+++ b/extra/io/files/trash/macosx/macosx.factor
@@ -54,7 +54,7 @@ FUNCTION: OSStatus FSPathMakeRefWithOptions (
 : <fs-ref> ( path -- fs-ref )
     utf8 string>alien
     kFSPathMakeRefDoNotFollowLeafSymlink
-    FSRef <struct>
+    FSRef new
     [ f FSPathMakeRefWithOptions check-err ] keep ;
 
 PRIVATE>