]> gitweb @ CieloNegro.org - bindings-CarbonCore.git/blobdiff - Bindings/CoreServices/CarbonCore/Files.hsc
OSUtils.h
[bindings-CarbonCore.git] / Bindings / CoreServices / CarbonCore / Files.hsc
index df6bdcd0b108a20689fcbff498847bba1330b07c..0a8f481d33899f147ed5af043afc83f8a27580dd 100644 (file)
@@ -6,6 +6,8 @@ module Bindings.CoreServices.CarbonCore.Files where
 #strict_import
 import Bindings.CoreServices.CarbonCore.Finder
 import Bindings.CoreServices.CarbonCore.MacTypes
+import Bindings.CoreServices.CarbonCore.OSUtils
+import System.Posix.Types
 
 #starttype struct HFSUniStr255
 #  field       length , <UInt16>
@@ -1603,8 +1605,9 @@ import Bindings.CoreServices.CarbonCore.MacTypes
 #ccall FSFileSecuritySetOwnerUUID   , <FSFileSecurityRef> -> Ptr <CFUUIDBytes> -> IO <OSStatus>
 #ccall FSFileSecurityGetGroupUUID   , <FSFileSecurityRef> -> Ptr <CFUUIDBytes> -> IO <OSStatus>
 #ccall FSFileSecuritySetGroupUUID   , <FSFileSecurityRef> -> Ptr <CFUUIDBytes> -> IO <OSStatus>
-#ccall FSFileSecurityCopyAccessControlList, <FSFileSecurityRef> -> <acl_t> -> IO <OSStatus>
-#ccall FSFileSecuritySetAccessControlList , <FSFileSecurityRef> -> <acl_t> -> IO <OSStatus>
+-- FIXME: acl_t
+-- #ccall FSFileSecurityCopyAccessControlList, <FSFileSecurityRef> -> CACL -> IO <OSStatus>
+-- #ccall FSFileSecuritySetAccessControlList , <FSFileSecurityRef> -> CACL -> IO <OSStatus>
 #ccall FSFileSecurityGetOwner       , <FSFileSecurityRef> -> Ptr <UInt32> -> IO <OSStatus>
 #ccall FSFileSecuritySetOwner       , <FSFileSecurityRef> -> <UInt32> -> IO <OSStatus>
 #ccall FSFileSecurityGetGroup       , <FSFileSecurityRef> -> Ptr <UInt32> -> IO <OSStatus>