change ERROR: words from throw-foo back to foo.

[factor.git] / extra / io / files / acls / macosx / ffi / ffi.factor

diff --git a/extra/io/files/acls/macosx/ffi/ffi.factor b/extra/io/files/acls/macosx/ffi/ffi.factor
index c757d3c40ee8a0a2e47ac00702ef87a673b804e9..38a2a003f6139175b2c57a94fb5f50bbef5a3b14 100644 (file)
--- a/extra/io/files/acls/macosx/ffi/ffi.factor
+++ b/extra/io/files/acls/macosx/ffi/ffi.factor
@@ -77,7 +77,7 @@ CONSTANT: ACL_EXTENDED_DENY  2
 ERROR: bad-acl-tag-t n ;
 
 : acl_tag_t>string ( n -- string )
-    dup 0 2 between? [ throw-bad-acl-tag-t ] unless
+    dup 0 2 between? [ bad-acl-tag-t ] unless
     { "undefined" "allow" "deny" } nth ;
 
 ! acl_flag_t