diff --git a/CHANGES.md b/CHANGES.md index 0ad8b649e..9e0a0d65c 100644 --- a/CHANGES.md +++ b/CHANGES.md @@ -20,9 +20,7 @@ API changes: for some params. * Added bindings for _CoreData_, _CloudKit_, and _NaturalLanguage_ frameworks. * AppKit and UIKit now include Foundation which doesn't need to be opened - separately. Foundation includes CoreFoundation and CoreGraphics. As a result, - GNUstep users will need to build and link the [CoreBase](https://github.com/gnustep/libs-corebase) - and [Quartz 2D/CoreGraphics](https://github.com/gnustep/libs-opal) libs. + separately, and Foundation includes CoreFoundation and CoreGraphics. ## v0.2.2 diff --git a/CoreFoundation/CoreFoundation_fn.ml b/CoreFoundation/CoreFoundation_fn.ml index ecd7409e6..34db30600 100644 --- a/CoreFoundation/CoreFoundation_fn.ml +++ b/CoreFoundation/CoreFoundation_fn.ml @@ -1,215 +1,218 @@ (* auto-generated, do not modify *) +[@@@ocaml.warning "-33"] open Runtime open Objc -let _CFAbsoluteTimeAddGregorianUnits = Foreign.foreign "CFAbsoluteTimeAddGregorianUnits" (double @-> (ptr CFTimeZone.t) @-> CFGregorianUnits.t @-> returning double) -let _CFAbsoluteTimeGetCurrent = Foreign.foreign "CFAbsoluteTimeGetCurrent" (void @-> returning double) -let _CFAbsoluteTimeGetDayOfWeek = Foreign.foreign "CFAbsoluteTimeGetDayOfWeek" (double @-> (ptr CFTimeZone.t) @-> returning int) -let _CFAbsoluteTimeGetDayOfYear = Foreign.foreign "CFAbsoluteTimeGetDayOfYear" (double @-> (ptr CFTimeZone.t) @-> returning int) -let _CFAbsoluteTimeGetDifferenceAsGregorianUnits = Foreign.foreign "CFAbsoluteTimeGetDifferenceAsGregorianUnits" (double @-> double @-> (ptr CFTimeZone.t) @-> ullong @-> returning CFGregorianUnits.t) -let _CFAbsoluteTimeGetGregorianDate = Foreign.foreign "CFAbsoluteTimeGetGregorianDate" (double @-> (ptr CFTimeZone.t) @-> returning CFGregorianDate.t) -let _CFAbsoluteTimeGetWeekOfYear = Foreign.foreign "CFAbsoluteTimeGetWeekOfYear" (double @-> (ptr CFTimeZone.t) @-> returning int) -let _CFAllocatorAllocate = Foreign.foreign "CFAllocatorAllocate" ((ptr CFAllocator.t) @-> llong @-> ullong @-> returning (ptr void)) -let _CFAllocatorCreate = Foreign.foreign "CFAllocatorCreate" ((ptr CFAllocator.t) @-> (ptr CFAllocatorContext.t) @-> returning (ptr CFAllocator.t)) -let _CFAllocatorDeallocate = Foreign.foreign "CFAllocatorDeallocate" ((ptr CFAllocator.t) @-> (ptr void) @-> returning void) -let _CFAllocatorGetContext = Foreign.foreign "CFAllocatorGetContext" ((ptr CFAllocator.t) @-> (ptr CFAllocatorContext.t) @-> returning void) -let _CFAllocatorGetDefault = Foreign.foreign "CFAllocatorGetDefault" (void @-> returning (ptr CFAllocator.t)) -let _CFAllocatorGetPreferredSizeForSize = Foreign.foreign "CFAllocatorGetPreferredSizeForSize" ((ptr CFAllocator.t) @-> llong @-> ullong @-> returning llong) -let _CFAllocatorGetTypeID = Foreign.foreign "CFAllocatorGetTypeID" (void @-> returning ullong) -let _CFAllocatorReallocate = Foreign.foreign "CFAllocatorReallocate" ((ptr CFAllocator.t) @-> (ptr void) @-> llong @-> ullong @-> returning (ptr void)) -let _CFAllocatorSetDefault = Foreign.foreign "CFAllocatorSetDefault" ((ptr CFAllocator.t) @-> returning void) -let _CFArrayAppendArray = Foreign.foreign "CFArrayAppendArray" ((ptr CFArray.t) @-> (ptr CFArray.t) @-> CFRange.t @-> returning void) -let _CFArrayAppendValue = Foreign.foreign "CFArrayAppendValue" ((ptr CFArray.t) @-> (ptr void) @-> returning void) -let _CFArrayApplyFunction = Foreign.foreign "CFArrayApplyFunction" ((ptr CFArray.t) @-> CFRange.t @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CFArrayBSearchValues = Foreign.foreign "CFArrayBSearchValues" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning llong) @-> (ptr void) @-> returning llong) -let _CFArrayContainsValue = Foreign.foreign "CFArrayContainsValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning bool) -let _CFArrayCreate = Foreign.foreign "CFArrayCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> llong @-> (ptr CFArrayCallBacks.t) @-> returning (ptr CFArray.t)) -let _CFArrayCreateCopy = Foreign.foreign "CFArrayCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFArray.t) @-> returning (ptr CFArray.t)) -let _CFArrayCreateMutable = Foreign.foreign "CFArrayCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFArrayCallBacks.t) @-> returning (ptr CFArray.t)) -let _CFArrayCreateMutableCopy = Foreign.foreign "CFArrayCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFArray.t) @-> returning (ptr CFArray.t)) -let _CFArrayExchangeValuesAtIndices = Foreign.foreign "CFArrayExchangeValuesAtIndices" ((ptr CFArray.t) @-> llong @-> llong @-> returning void) -let _CFArrayGetCount = Foreign.foreign "CFArrayGetCount" ((ptr CFArray.t) @-> returning llong) -let _CFArrayGetCountOfValue = Foreign.foreign "CFArrayGetCountOfValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning llong) -let _CFArrayGetFirstIndexOfValue = Foreign.foreign "CFArrayGetFirstIndexOfValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning llong) -let _CFArrayGetLastIndexOfValue = Foreign.foreign "CFArrayGetLastIndexOfValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning llong) -let _CFArrayGetTypeID = Foreign.foreign "CFArrayGetTypeID" (void @-> returning ullong) -let _CFArrayGetValueAtIndex = Foreign.foreign "CFArrayGetValueAtIndex" ((ptr CFArray.t) @-> llong @-> returning (ptr void)) -let _CFArrayGetValues = Foreign.foreign "CFArrayGetValues" ((ptr CFArray.t) @-> CFRange.t @-> (ptr (ptr void)) @-> returning void) -let _CFArrayInsertValueAtIndex = Foreign.foreign "CFArrayInsertValueAtIndex" ((ptr CFArray.t) @-> llong @-> (ptr void) @-> returning void) -let _CFArrayRemoveAllValues = Foreign.foreign "CFArrayRemoveAllValues" ((ptr CFArray.t) @-> returning void) -let _CFArrayRemoveValueAtIndex = Foreign.foreign "CFArrayRemoveValueAtIndex" ((ptr CFArray.t) @-> llong @-> returning void) -let _CFArrayReplaceValues = Foreign.foreign "CFArrayReplaceValues" ((ptr CFArray.t) @-> CFRange.t @-> (ptr (ptr void)) @-> llong @-> returning void) -let _CFArraySetValueAtIndex = Foreign.foreign "CFArraySetValueAtIndex" ((ptr CFArray.t) @-> llong @-> (ptr void) @-> returning void) -let _CFArraySortValues = Foreign.foreign "CFArraySortValues" ((ptr CFArray.t) @-> CFRange.t @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning llong) @-> (ptr void) @-> returning void) -let _CFAttributedStringBeginEditing = Foreign.foreign "CFAttributedStringBeginEditing" ((ptr CFAttributedString.t) @-> returning void) -let _CFAttributedStringCreate = Foreign.foreign "CFAttributedStringCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFAttributedString.t)) -let _CFAttributedStringCreateCopy = Foreign.foreign "CFAttributedStringCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFAttributedString.t) @-> returning (ptr CFAttributedString.t)) -let _CFAttributedStringCreateMutable = Foreign.foreign "CFAttributedStringCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFAttributedString.t)) -let _CFAttributedStringCreateMutableCopy = Foreign.foreign "CFAttributedStringCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFAttributedString.t) @-> returning (ptr CFAttributedString.t)) -let _CFAttributedStringCreateWithSubstring = Foreign.foreign "CFAttributedStringCreateWithSubstring" ((ptr CFAllocator.t) @-> (ptr CFAttributedString.t) @-> CFRange.t @-> returning (ptr CFAttributedString.t)) -let _CFAttributedStringEndEditing = Foreign.foreign "CFAttributedStringEndEditing" ((ptr CFAttributedString.t) @-> returning void) -let _CFAttributedStringGetAttribute = Foreign.foreign "CFAttributedStringGetAttribute" ((ptr CFAttributedString.t) @-> llong @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> returning id) -let _CFAttributedStringGetAttributeAndLongestEffectiveRange = Foreign.foreign "CFAttributedStringGetAttributeAndLongestEffectiveRange" ((ptr CFAttributedString.t) @-> llong @-> (ptr CFString.t) @-> CFRange.t @-> (ptr CFRange.t) @-> returning id) -let _CFAttributedStringGetAttributes = Foreign.foreign "CFAttributedStringGetAttributes" ((ptr CFAttributedString.t) @-> llong @-> (ptr CFRange.t) @-> returning (ptr CFDictionary.t)) -let _CFAttributedStringGetAttributesAndLongestEffectiveRange = Foreign.foreign "CFAttributedStringGetAttributesAndLongestEffectiveRange" ((ptr CFAttributedString.t) @-> llong @-> CFRange.t @-> (ptr CFRange.t) @-> returning (ptr CFDictionary.t)) -let _CFAttributedStringGetLength = Foreign.foreign "CFAttributedStringGetLength" ((ptr CFAttributedString.t) @-> returning llong) -let _CFAttributedStringGetMutableString = Foreign.foreign "CFAttributedStringGetMutableString" ((ptr CFAttributedString.t) @-> returning (ptr CFString.t)) -let _CFAttributedStringGetString = Foreign.foreign "CFAttributedStringGetString" ((ptr CFAttributedString.t) @-> returning (ptr CFString.t)) -let _CFAttributedStringGetTypeID = Foreign.foreign "CFAttributedStringGetTypeID" (void @-> returning ullong) -let _CFAttributedStringRemoveAttribute = Foreign.foreign "CFAttributedStringRemoveAttribute" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFString.t) @-> returning void) -let _CFAttributedStringReplaceAttributedString = Foreign.foreign "CFAttributedStringReplaceAttributedString" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFAttributedString.t) @-> returning void) -let _CFAttributedStringReplaceString = Foreign.foreign "CFAttributedStringReplaceString" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFString.t) @-> returning void) -let _CFAttributedStringSetAttribute = Foreign.foreign "CFAttributedStringSetAttribute" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFString.t) @-> id @-> returning void) -let _CFAttributedStringSetAttributes = Foreign.foreign "CFAttributedStringSetAttributes" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFDictionary.t) @-> bool @-> returning void) -let _CFAutorelease = Foreign.foreign "CFAutorelease" (id @-> returning id) -let _CFBagAddValue = Foreign.foreign "CFBagAddValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) -let _CFBagApplyFunction = Foreign.foreign "CFBagApplyFunction" ((ptr CFBag.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CFBagContainsValue = Foreign.foreign "CFBagContainsValue" ((ptr CFBag.t) @-> (ptr void) @-> returning bool) -let _CFBagCreate = Foreign.foreign "CFBagCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> llong @-> (ptr CFBagCallBacks.t) @-> returning (ptr CFBag.t)) -let _CFBagCreateCopy = Foreign.foreign "CFBagCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFBag.t) @-> returning (ptr CFBag.t)) -let _CFBagCreateMutable = Foreign.foreign "CFBagCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBagCallBacks.t) @-> returning (ptr CFBag.t)) -let _CFBagCreateMutableCopy = Foreign.foreign "CFBagCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBag.t) @-> returning (ptr CFBag.t)) -let _CFBagGetCount = Foreign.foreign "CFBagGetCount" ((ptr CFBag.t) @-> returning llong) -let _CFBagGetCountOfValue = Foreign.foreign "CFBagGetCountOfValue" ((ptr CFBag.t) @-> (ptr void) @-> returning llong) -let _CFBagGetTypeID = Foreign.foreign "CFBagGetTypeID" (void @-> returning ullong) -let _CFBagGetValue = Foreign.foreign "CFBagGetValue" ((ptr CFBag.t) @-> (ptr void) @-> returning (ptr void)) -let _CFBagGetValueIfPresent = Foreign.foreign "CFBagGetValueIfPresent" ((ptr CFBag.t) @-> (ptr void) @-> (ptr (ptr void)) @-> returning bool) -let _CFBagGetValues = Foreign.foreign "CFBagGetValues" ((ptr CFBag.t) @-> (ptr (ptr void)) @-> returning void) -let _CFBagRemoveAllValues = Foreign.foreign "CFBagRemoveAllValues" ((ptr CFBag.t) @-> returning void) -let _CFBagRemoveValue = Foreign.foreign "CFBagRemoveValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) -let _CFBagReplaceValue = Foreign.foreign "CFBagReplaceValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) -let _CFBagSetValue = Foreign.foreign "CFBagSetValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) -let _CFBinaryHeapAddValue = Foreign.foreign "CFBinaryHeapAddValue" ((ptr CFBinaryHeap.t) @-> (ptr void) @-> returning void) -let _CFBinaryHeapApplyFunction = Foreign.foreign "CFBinaryHeapApplyFunction" ((ptr CFBinaryHeap.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CFBinaryHeapContainsValue = Foreign.foreign "CFBinaryHeapContainsValue" ((ptr CFBinaryHeap.t) @-> (ptr void) @-> returning bool) -let _CFBinaryHeapCreate = Foreign.foreign "CFBinaryHeapCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBinaryHeapCallBacks.t) @-> (ptr CFBinaryHeapCompareContext.t) @-> returning (ptr CFBinaryHeap.t)) -let _CFBinaryHeapCreateCopy = Foreign.foreign "CFBinaryHeapCreateCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBinaryHeap.t) @-> returning (ptr CFBinaryHeap.t)) -let _CFBinaryHeapGetCount = Foreign.foreign "CFBinaryHeapGetCount" ((ptr CFBinaryHeap.t) @-> returning llong) -let _CFBinaryHeapGetCountOfValue = Foreign.foreign "CFBinaryHeapGetCountOfValue" ((ptr CFBinaryHeap.t) @-> (ptr void) @-> returning llong) -let _CFBinaryHeapGetMinimum = Foreign.foreign "CFBinaryHeapGetMinimum" ((ptr CFBinaryHeap.t) @-> returning (ptr void)) -let _CFBinaryHeapGetMinimumIfPresent = Foreign.foreign "CFBinaryHeapGetMinimumIfPresent" ((ptr CFBinaryHeap.t) @-> (ptr (ptr void)) @-> returning bool) -let _CFBinaryHeapGetTypeID = Foreign.foreign "CFBinaryHeapGetTypeID" (void @-> returning ullong) -let _CFBinaryHeapGetValues = Foreign.foreign "CFBinaryHeapGetValues" ((ptr CFBinaryHeap.t) @-> (ptr (ptr void)) @-> returning void) -let _CFBinaryHeapRemoveAllValues = Foreign.foreign "CFBinaryHeapRemoveAllValues" ((ptr CFBinaryHeap.t) @-> returning void) -let _CFBinaryHeapRemoveMinimumValue = Foreign.foreign "CFBinaryHeapRemoveMinimumValue" ((ptr CFBinaryHeap.t) @-> returning void) -let _CFBitVectorContainsBit = Foreign.foreign "CFBitVectorContainsBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning bool) -let _CFBitVectorCreate = Foreign.foreign "CFBitVectorCreate" ((ptr CFAllocator.t) @-> string @-> llong @-> returning (ptr CFBitVector.t)) -let _CFBitVectorCreateCopy = Foreign.foreign "CFBitVectorCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFBitVector.t) @-> returning (ptr CFBitVector.t)) -let _CFBitVectorCreateMutable = Foreign.foreign "CFBitVectorCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFBitVector.t)) -let _CFBitVectorCreateMutableCopy = Foreign.foreign "CFBitVectorCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBitVector.t) @-> returning (ptr CFBitVector.t)) -let _CFBitVectorFlipBitAtIndex = Foreign.foreign "CFBitVectorFlipBitAtIndex" ((ptr CFBitVector.t) @-> llong @-> returning void) -let _CFBitVectorFlipBits = Foreign.foreign "CFBitVectorFlipBits" ((ptr CFBitVector.t) @-> CFRange.t @-> returning void) -let _CFBitVectorGetBitAtIndex = Foreign.foreign "CFBitVectorGetBitAtIndex" ((ptr CFBitVector.t) @-> llong @-> returning uint) -let _CFBitVectorGetBits = Foreign.foreign "CFBitVectorGetBits" ((ptr CFBitVector.t) @-> CFRange.t @-> string @-> returning void) -let _CFBitVectorGetCount = Foreign.foreign "CFBitVectorGetCount" ((ptr CFBitVector.t) @-> returning llong) -let _CFBitVectorGetCountOfBit = Foreign.foreign "CFBitVectorGetCountOfBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning llong) -let _CFBitVectorGetFirstIndexOfBit = Foreign.foreign "CFBitVectorGetFirstIndexOfBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning llong) -let _CFBitVectorGetLastIndexOfBit = Foreign.foreign "CFBitVectorGetLastIndexOfBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning llong) -let _CFBitVectorGetTypeID = Foreign.foreign "CFBitVectorGetTypeID" (void @-> returning ullong) -let _CFBitVectorSetAllBits = Foreign.foreign "CFBitVectorSetAllBits" ((ptr CFBitVector.t) @-> uint @-> returning void) -let _CFBitVectorSetBitAtIndex = Foreign.foreign "CFBitVectorSetBitAtIndex" ((ptr CFBitVector.t) @-> llong @-> uint @-> returning void) -let _CFBitVectorSetBits = Foreign.foreign "CFBitVectorSetBits" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning void) -let _CFBitVectorSetCount = Foreign.foreign "CFBitVectorSetCount" ((ptr CFBitVector.t) @-> llong @-> returning void) -let _CFBooleanGetTypeID = Foreign.foreign "CFBooleanGetTypeID" (void @-> returning ullong) -let _CFBooleanGetValue = Foreign.foreign "CFBooleanGetValue" ((ptr CFBoolean.t) @-> returning bool) -let _CFBundleCloseBundleResourceMap = Foreign.foreign "CFBundleCloseBundleResourceMap" ((ptr CFBundle.t) @-> int @-> returning void) -let _CFBundleCopyAuxiliaryExecutableURL = Foreign.foreign "CFBundleCopyAuxiliaryExecutableURL" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyBuiltInPlugInsURL = Foreign.foreign "CFBundleCopyBuiltInPlugInsURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyBundleLocalizations = Foreign.foreign "CFBundleCopyBundleLocalizations" ((ptr CFBundle.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyBundleURL = Foreign.foreign "CFBundleCopyBundleURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyExecutableArchitectures = Foreign.foreign "CFBundleCopyExecutableArchitectures" ((ptr CFBundle.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyExecutableArchitecturesForURL = Foreign.foreign "CFBundleCopyExecutableArchitecturesForURL" ((ptr CFURL.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyExecutableURL = Foreign.foreign "CFBundleCopyExecutableURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyInfoDictionaryForURL = Foreign.foreign "CFBundleCopyInfoDictionaryForURL" ((ptr CFURL.t) @-> returning (ptr CFDictionary.t)) -let _CFBundleCopyInfoDictionaryInDirectory = Foreign.foreign "CFBundleCopyInfoDictionaryInDirectory" ((ptr CFURL.t) @-> returning (ptr CFDictionary.t)) -let _CFBundleCopyLocalizationsForPreferences = Foreign.foreign "CFBundleCopyLocalizationsForPreferences" ((ptr CFArray.t) @-> (ptr CFArray.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyLocalizationsForURL = Foreign.foreign "CFBundleCopyLocalizationsForURL" ((ptr CFURL.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyLocalizedString = Foreign.foreign "CFBundleCopyLocalizedString" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFBundleCopyPreferredLocalizationsFromArray = Foreign.foreign "CFBundleCopyPreferredLocalizationsFromArray" ((ptr CFArray.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyPrivateFrameworksURL = Foreign.foreign "CFBundleCopyPrivateFrameworksURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyResourceURL = Foreign.foreign "CFBundleCopyResourceURL" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyResourceURLForLocalization = Foreign.foreign "CFBundleCopyResourceURLForLocalization" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyResourceURLInDirectory = Foreign.foreign "CFBundleCopyResourceURLInDirectory" ((ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopyResourceURLsOfType = Foreign.foreign "CFBundleCopyResourceURLsOfType" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyResourceURLsOfTypeForLocalization = Foreign.foreign "CFBundleCopyResourceURLsOfTypeForLocalization" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyResourceURLsOfTypeInDirectory = Foreign.foreign "CFBundleCopyResourceURLsOfTypeInDirectory" ((ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) -let _CFBundleCopyResourcesDirectoryURL = Foreign.foreign "CFBundleCopyResourcesDirectoryURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopySharedFrameworksURL = Foreign.foreign "CFBundleCopySharedFrameworksURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopySharedSupportURL = Foreign.foreign "CFBundleCopySharedSupportURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCopySupportFilesDirectoryURL = Foreign.foreign "CFBundleCopySupportFilesDirectoryURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) -let _CFBundleCreate = Foreign.foreign "CFBundleCreate" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFBundle.t)) -let _CFBundleCreateBundlesFromDirectory = Foreign.foreign "CFBundleCreateBundlesFromDirectory" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) -let _CFBundleGetAllBundles = Foreign.foreign "CFBundleGetAllBundles" (void @-> returning (ptr CFArray.t)) -let _CFBundleGetBundleWithIdentifier = Foreign.foreign "CFBundleGetBundleWithIdentifier" ((ptr CFString.t) @-> returning (ptr CFBundle.t)) -let _CFBundleGetDataPointerForName = Foreign.foreign "CFBundleGetDataPointerForName" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning (ptr void)) -let _CFBundleGetDataPointersForNames = Foreign.foreign "CFBundleGetDataPointersForNames" ((ptr CFBundle.t) @-> (ptr CFArray.t) @-> (ptr (ptr void)) @-> returning void) -let _CFBundleGetDevelopmentRegion = Foreign.foreign "CFBundleGetDevelopmentRegion" ((ptr CFBundle.t) @-> returning (ptr CFString.t)) -let _CFBundleGetFunctionPointerForName = Foreign.foreign "CFBundleGetFunctionPointerForName" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning (ptr void)) -let _CFBundleGetFunctionPointersForNames = Foreign.foreign "CFBundleGetFunctionPointersForNames" ((ptr CFBundle.t) @-> (ptr CFArray.t) @-> (ptr (ptr void)) @-> returning void) -let _CFBundleGetIdentifier = Foreign.foreign "CFBundleGetIdentifier" ((ptr CFBundle.t) @-> returning (ptr CFString.t)) -let _CFBundleGetInfoDictionary = Foreign.foreign "CFBundleGetInfoDictionary" ((ptr CFBundle.t) @-> returning (ptr CFDictionary.t)) -let _CFBundleGetLocalInfoDictionary = Foreign.foreign "CFBundleGetLocalInfoDictionary" ((ptr CFBundle.t) @-> returning (ptr CFDictionary.t)) -let _CFBundleGetMainBundle = Foreign.foreign "CFBundleGetMainBundle" (void @-> returning (ptr CFBundle.t)) -let _CFBundleGetPackageInfo = Foreign.foreign "CFBundleGetPackageInfo" ((ptr CFBundle.t) @-> (ptr uint) @-> (ptr uint) @-> returning void) -let _CFBundleGetPackageInfoInDirectory = Foreign.foreign "CFBundleGetPackageInfoInDirectory" ((ptr CFURL.t) @-> (ptr uint) @-> (ptr uint) @-> returning bool) -let _CFBundleGetPlugIn = Foreign.foreign "CFBundleGetPlugIn" ((ptr CFBundle.t) @-> returning (ptr CFBundle.t)) -let _CFBundleGetTypeID = Foreign.foreign "CFBundleGetTypeID" (void @-> returning ullong) -let _CFBundleGetValueForInfoDictionaryKey = Foreign.foreign "CFBundleGetValueForInfoDictionaryKey" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning id) -let _CFBundleGetVersionNumber = Foreign.foreign "CFBundleGetVersionNumber" ((ptr CFBundle.t) @-> returning uint) -let _CFBundleIsArchitectureLoadable = Foreign.foreign "CFBundleIsArchitectureLoadable" (int @-> returning bool) -let _CFBundleIsExecutableLoadable = Foreign.foreign "CFBundleIsExecutableLoadable" ((ptr CFBundle.t) @-> returning bool) -let _CFBundleIsExecutableLoadableForURL = Foreign.foreign "CFBundleIsExecutableLoadableForURL" ((ptr CFURL.t) @-> returning bool) -let _CFBundleIsExecutableLoaded = Foreign.foreign "CFBundleIsExecutableLoaded" ((ptr CFBundle.t) @-> returning bool) -let _CFBundleLoadExecutable = Foreign.foreign "CFBundleLoadExecutable" ((ptr CFBundle.t) @-> returning bool) -let _CFBundleLoadExecutableAndReturnError = Foreign.foreign "CFBundleLoadExecutableAndReturnError" ((ptr CFBundle.t) @-> (ptr (ptr CFError.t)) @-> returning bool) -let _CFBundleOpenBundleResourceFiles = Foreign.foreign "CFBundleOpenBundleResourceFiles" ((ptr CFBundle.t) @-> (ptr int) @-> (ptr int) @-> returning int) -let _CFBundleOpenBundleResourceMap = Foreign.foreign "CFBundleOpenBundleResourceMap" ((ptr CFBundle.t) @-> returning int) -let _CFBundlePreflightExecutable = Foreign.foreign "CFBundlePreflightExecutable" ((ptr CFBundle.t) @-> (ptr (ptr CFError.t)) @-> returning bool) -let _CFBundleUnloadExecutable = Foreign.foreign "CFBundleUnloadExecutable" ((ptr CFBundle.t) @-> returning void) +open CoreFoundation_globals + +let _CFAbsoluteTimeAddGregorianUnits = Foreign.foreign ~stub:true "CFAbsoluteTimeAddGregorianUnits" (double @-> (ptr CFTimeZone.t) @-> CFGregorianUnits.t @-> returning double) +let _CFAbsoluteTimeGetCurrent = Foreign.foreign ~stub:true "CFAbsoluteTimeGetCurrent" (void @-> returning double) +let _CFAbsoluteTimeGetDayOfWeek = Foreign.foreign ~stub:true "CFAbsoluteTimeGetDayOfWeek" (double @-> (ptr CFTimeZone.t) @-> returning int) +let _CFAbsoluteTimeGetDayOfYear = Foreign.foreign ~stub:true "CFAbsoluteTimeGetDayOfYear" (double @-> (ptr CFTimeZone.t) @-> returning int) +let _CFAbsoluteTimeGetDifferenceAsGregorianUnits = Foreign.foreign ~stub:true "CFAbsoluteTimeGetDifferenceAsGregorianUnits" (double @-> double @-> (ptr CFTimeZone.t) @-> ullong @-> returning CFGregorianUnits.t) +let _CFAbsoluteTimeGetGregorianDate = Foreign.foreign ~stub:true "CFAbsoluteTimeGetGregorianDate" (double @-> (ptr CFTimeZone.t) @-> returning CFGregorianDate.t) +let _CFAbsoluteTimeGetWeekOfYear = Foreign.foreign ~stub:true "CFAbsoluteTimeGetWeekOfYear" (double @-> (ptr CFTimeZone.t) @-> returning int) +let _CFAllocatorAllocate = Foreign.foreign ~stub:true "CFAllocatorAllocate" ((ptr CFAllocator.t) @-> llong @-> ullong @-> returning (ptr void)) +let _CFAllocatorCreate = Foreign.foreign ~stub:true "CFAllocatorCreate" ((ptr CFAllocator.t) @-> (ptr CFAllocatorContext.t) @-> returning (ptr CFAllocator.t)) +let _CFAllocatorDeallocate = Foreign.foreign ~stub:true "CFAllocatorDeallocate" ((ptr CFAllocator.t) @-> (ptr void) @-> returning void) +let _CFAllocatorGetContext = Foreign.foreign ~stub:true "CFAllocatorGetContext" ((ptr CFAllocator.t) @-> (ptr CFAllocatorContext.t) @-> returning void) +let _CFAllocatorGetDefault = Foreign.foreign ~stub:true "CFAllocatorGetDefault" (void @-> returning (ptr CFAllocator.t)) +let _CFAllocatorGetPreferredSizeForSize = Foreign.foreign ~stub:true "CFAllocatorGetPreferredSizeForSize" ((ptr CFAllocator.t) @-> llong @-> ullong @-> returning llong) +let _CFAllocatorGetTypeID = Foreign.foreign ~stub:true "CFAllocatorGetTypeID" (void @-> returning ullong) +let _CFAllocatorReallocate = Foreign.foreign ~stub:true "CFAllocatorReallocate" ((ptr CFAllocator.t) @-> (ptr void) @-> llong @-> ullong @-> returning (ptr void)) +let _CFAllocatorSetDefault = Foreign.foreign ~stub:true "CFAllocatorSetDefault" ((ptr CFAllocator.t) @-> returning void) +let _CFArrayAppendArray = Foreign.foreign ~stub:true "CFArrayAppendArray" ((ptr CFArray.t) @-> (ptr CFArray.t) @-> CFRange.t @-> returning void) +let _CFArrayAppendValue = Foreign.foreign ~stub:true "CFArrayAppendValue" ((ptr CFArray.t) @-> (ptr void) @-> returning void) +let _CFArrayApplyFunction = Foreign.foreign ~stub:true "CFArrayApplyFunction" ((ptr CFArray.t) @-> CFRange.t @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CFArrayBSearchValues = Foreign.foreign ~stub:true "CFArrayBSearchValues" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning llong) @-> (ptr void) @-> returning llong) +let _CFArrayContainsValue = Foreign.foreign ~stub:true "CFArrayContainsValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning bool) +let _CFArrayCreate = Foreign.foreign ~stub:true "CFArrayCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> llong @-> (ptr CFArrayCallBacks.t) @-> returning (ptr CFArray.t)) +let _CFArrayCreateCopy = Foreign.foreign ~stub:true "CFArrayCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFArray.t) @-> returning (ptr CFArray.t)) +let _CFArrayCreateMutable = Foreign.foreign ~stub:true "CFArrayCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFArrayCallBacks.t) @-> returning (ptr CFArray.t)) +let _CFArrayCreateMutableCopy = Foreign.foreign ~stub:true "CFArrayCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFArray.t) @-> returning (ptr CFArray.t)) +let _CFArrayExchangeValuesAtIndices = Foreign.foreign ~stub:true "CFArrayExchangeValuesAtIndices" ((ptr CFArray.t) @-> llong @-> llong @-> returning void) +let _CFArrayGetCount = Foreign.foreign ~stub:true "CFArrayGetCount" ((ptr CFArray.t) @-> returning llong) +let _CFArrayGetCountOfValue = Foreign.foreign ~stub:true "CFArrayGetCountOfValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning llong) +let _CFArrayGetFirstIndexOfValue = Foreign.foreign ~stub:true "CFArrayGetFirstIndexOfValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning llong) +let _CFArrayGetLastIndexOfValue = Foreign.foreign ~stub:true "CFArrayGetLastIndexOfValue" ((ptr CFArray.t) @-> CFRange.t @-> (ptr void) @-> returning llong) +let _CFArrayGetTypeID = Foreign.foreign ~stub:true "CFArrayGetTypeID" (void @-> returning ullong) +let _CFArrayGetValueAtIndex = Foreign.foreign ~stub:true "CFArrayGetValueAtIndex" ((ptr CFArray.t) @-> llong @-> returning (ptr void)) +let _CFArrayGetValues = Foreign.foreign ~stub:true "CFArrayGetValues" ((ptr CFArray.t) @-> CFRange.t @-> (ptr (ptr void)) @-> returning void) +let _CFArrayInsertValueAtIndex = Foreign.foreign ~stub:true "CFArrayInsertValueAtIndex" ((ptr CFArray.t) @-> llong @-> (ptr void) @-> returning void) +let _CFArrayRemoveAllValues = Foreign.foreign ~stub:true "CFArrayRemoveAllValues" ((ptr CFArray.t) @-> returning void) +let _CFArrayRemoveValueAtIndex = Foreign.foreign ~stub:true "CFArrayRemoveValueAtIndex" ((ptr CFArray.t) @-> llong @-> returning void) +let _CFArrayReplaceValues = Foreign.foreign ~stub:true "CFArrayReplaceValues" ((ptr CFArray.t) @-> CFRange.t @-> (ptr (ptr void)) @-> llong @-> returning void) +let _CFArraySetValueAtIndex = Foreign.foreign ~stub:true "CFArraySetValueAtIndex" ((ptr CFArray.t) @-> llong @-> (ptr void) @-> returning void) +let _CFArraySortValues = Foreign.foreign ~stub:true "CFArraySortValues" ((ptr CFArray.t) @-> CFRange.t @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning llong) @-> (ptr void) @-> returning void) +let _CFAttributedStringBeginEditing = Foreign.foreign ~stub:true "CFAttributedStringBeginEditing" ((ptr CFAttributedString.t) @-> returning void) +let _CFAttributedStringCreate = Foreign.foreign ~stub:true "CFAttributedStringCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFAttributedString.t)) +let _CFAttributedStringCreateCopy = Foreign.foreign ~stub:true "CFAttributedStringCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFAttributedString.t) @-> returning (ptr CFAttributedString.t)) +let _CFAttributedStringCreateMutable = Foreign.foreign ~stub:true "CFAttributedStringCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFAttributedString.t)) +let _CFAttributedStringCreateMutableCopy = Foreign.foreign ~stub:true "CFAttributedStringCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFAttributedString.t) @-> returning (ptr CFAttributedString.t)) +let _CFAttributedStringCreateWithSubstring = Foreign.foreign ~stub:true "CFAttributedStringCreateWithSubstring" ((ptr CFAllocator.t) @-> (ptr CFAttributedString.t) @-> CFRange.t @-> returning (ptr CFAttributedString.t)) +let _CFAttributedStringEndEditing = Foreign.foreign ~stub:true "CFAttributedStringEndEditing" ((ptr CFAttributedString.t) @-> returning void) +let _CFAttributedStringGetAttribute = Foreign.foreign ~stub:true "CFAttributedStringGetAttribute" ((ptr CFAttributedString.t) @-> llong @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> returning id) +let _CFAttributedStringGetAttributeAndLongestEffectiveRange = Foreign.foreign ~stub:true "CFAttributedStringGetAttributeAndLongestEffectiveRange" ((ptr CFAttributedString.t) @-> llong @-> (ptr CFString.t) @-> CFRange.t @-> (ptr CFRange.t) @-> returning id) +let _CFAttributedStringGetAttributes = Foreign.foreign ~stub:true "CFAttributedStringGetAttributes" ((ptr CFAttributedString.t) @-> llong @-> (ptr CFRange.t) @-> returning (ptr CFDictionary.t)) +let _CFAttributedStringGetAttributesAndLongestEffectiveRange = Foreign.foreign ~stub:true "CFAttributedStringGetAttributesAndLongestEffectiveRange" ((ptr CFAttributedString.t) @-> llong @-> CFRange.t @-> (ptr CFRange.t) @-> returning (ptr CFDictionary.t)) +let _CFAttributedStringGetLength = Foreign.foreign ~stub:true "CFAttributedStringGetLength" ((ptr CFAttributedString.t) @-> returning llong) +let _CFAttributedStringGetMutableString = Foreign.foreign ~stub:true "CFAttributedStringGetMutableString" ((ptr CFAttributedString.t) @-> returning (ptr CFString.t)) +let _CFAttributedStringGetString = Foreign.foreign ~stub:true "CFAttributedStringGetString" ((ptr CFAttributedString.t) @-> returning (ptr CFString.t)) +let _CFAttributedStringGetTypeID = Foreign.foreign ~stub:true "CFAttributedStringGetTypeID" (void @-> returning ullong) +let _CFAttributedStringRemoveAttribute = Foreign.foreign ~stub:true "CFAttributedStringRemoveAttribute" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFString.t) @-> returning void) +let _CFAttributedStringReplaceAttributedString = Foreign.foreign ~stub:true "CFAttributedStringReplaceAttributedString" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFAttributedString.t) @-> returning void) +let _CFAttributedStringReplaceString = Foreign.foreign ~stub:true "CFAttributedStringReplaceString" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFString.t) @-> returning void) +let _CFAttributedStringSetAttribute = Foreign.foreign ~stub:true "CFAttributedStringSetAttribute" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFString.t) @-> id @-> returning void) +let _CFAttributedStringSetAttributes = Foreign.foreign ~stub:true "CFAttributedStringSetAttributes" ((ptr CFAttributedString.t) @-> CFRange.t @-> (ptr CFDictionary.t) @-> bool @-> returning void) +let _CFAutorelease = Foreign.foreign ~stub:true "CFAutorelease" (id @-> returning id) +let _CFBagAddValue = Foreign.foreign ~stub:true "CFBagAddValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) +let _CFBagApplyFunction = Foreign.foreign ~stub:true "CFBagApplyFunction" ((ptr CFBag.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CFBagContainsValue = Foreign.foreign ~stub:true "CFBagContainsValue" ((ptr CFBag.t) @-> (ptr void) @-> returning bool) +let _CFBagCreate = Foreign.foreign ~stub:true "CFBagCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> llong @-> (ptr CFBagCallBacks.t) @-> returning (ptr CFBag.t)) +let _CFBagCreateCopy = Foreign.foreign ~stub:true "CFBagCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFBag.t) @-> returning (ptr CFBag.t)) +let _CFBagCreateMutable = Foreign.foreign ~stub:true "CFBagCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBagCallBacks.t) @-> returning (ptr CFBag.t)) +let _CFBagCreateMutableCopy = Foreign.foreign ~stub:true "CFBagCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBag.t) @-> returning (ptr CFBag.t)) +let _CFBagGetCount = Foreign.foreign ~stub:true "CFBagGetCount" ((ptr CFBag.t) @-> returning llong) +let _CFBagGetCountOfValue = Foreign.foreign ~stub:true "CFBagGetCountOfValue" ((ptr CFBag.t) @-> (ptr void) @-> returning llong) +let _CFBagGetTypeID = Foreign.foreign ~stub:true "CFBagGetTypeID" (void @-> returning ullong) +let _CFBagGetValue = Foreign.foreign ~stub:true "CFBagGetValue" ((ptr CFBag.t) @-> (ptr void) @-> returning (ptr void)) +let _CFBagGetValueIfPresent = Foreign.foreign ~stub:true "CFBagGetValueIfPresent" ((ptr CFBag.t) @-> (ptr void) @-> (ptr (ptr void)) @-> returning bool) +let _CFBagGetValues = Foreign.foreign ~stub:true "CFBagGetValues" ((ptr CFBag.t) @-> (ptr (ptr void)) @-> returning void) +let _CFBagRemoveAllValues = Foreign.foreign ~stub:true "CFBagRemoveAllValues" ((ptr CFBag.t) @-> returning void) +let _CFBagRemoveValue = Foreign.foreign ~stub:true "CFBagRemoveValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) +let _CFBagReplaceValue = Foreign.foreign ~stub:true "CFBagReplaceValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) +let _CFBagSetValue = Foreign.foreign ~stub:true "CFBagSetValue" ((ptr CFBag.t) @-> (ptr void) @-> returning void) +let _CFBinaryHeapAddValue = Foreign.foreign ~stub:true "CFBinaryHeapAddValue" ((ptr CFBinaryHeap.t) @-> (ptr void) @-> returning void) +let _CFBinaryHeapApplyFunction = Foreign.foreign ~stub:true "CFBinaryHeapApplyFunction" ((ptr CFBinaryHeap.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CFBinaryHeapContainsValue = Foreign.foreign ~stub:true "CFBinaryHeapContainsValue" ((ptr CFBinaryHeap.t) @-> (ptr void) @-> returning bool) +let _CFBinaryHeapCreate = Foreign.foreign ~stub:true "CFBinaryHeapCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBinaryHeapCallBacks.t) @-> (ptr CFBinaryHeapCompareContext.t) @-> returning (ptr CFBinaryHeap.t)) +let _CFBinaryHeapCreateCopy = Foreign.foreign ~stub:true "CFBinaryHeapCreateCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBinaryHeap.t) @-> returning (ptr CFBinaryHeap.t)) +let _CFBinaryHeapGetCount = Foreign.foreign ~stub:true "CFBinaryHeapGetCount" ((ptr CFBinaryHeap.t) @-> returning llong) +let _CFBinaryHeapGetCountOfValue = Foreign.foreign ~stub:true "CFBinaryHeapGetCountOfValue" ((ptr CFBinaryHeap.t) @-> (ptr void) @-> returning llong) +let _CFBinaryHeapGetMinimum = Foreign.foreign ~stub:true "CFBinaryHeapGetMinimum" ((ptr CFBinaryHeap.t) @-> returning (ptr void)) +let _CFBinaryHeapGetMinimumIfPresent = Foreign.foreign ~stub:true "CFBinaryHeapGetMinimumIfPresent" ((ptr CFBinaryHeap.t) @-> (ptr (ptr void)) @-> returning bool) +let _CFBinaryHeapGetTypeID = Foreign.foreign ~stub:true "CFBinaryHeapGetTypeID" (void @-> returning ullong) +let _CFBinaryHeapGetValues = Foreign.foreign ~stub:true "CFBinaryHeapGetValues" ((ptr CFBinaryHeap.t) @-> (ptr (ptr void)) @-> returning void) +let _CFBinaryHeapRemoveAllValues = Foreign.foreign ~stub:true "CFBinaryHeapRemoveAllValues" ((ptr CFBinaryHeap.t) @-> returning void) +let _CFBinaryHeapRemoveMinimumValue = Foreign.foreign ~stub:true "CFBinaryHeapRemoveMinimumValue" ((ptr CFBinaryHeap.t) @-> returning void) +let _CFBitVectorContainsBit = Foreign.foreign ~stub:true "CFBitVectorContainsBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning bool) +let _CFBitVectorCreate = Foreign.foreign ~stub:true "CFBitVectorCreate" ((ptr CFAllocator.t) @-> string @-> llong @-> returning (ptr CFBitVector.t)) +let _CFBitVectorCreateCopy = Foreign.foreign ~stub:true "CFBitVectorCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFBitVector.t) @-> returning (ptr CFBitVector.t)) +let _CFBitVectorCreateMutable = Foreign.foreign ~stub:true "CFBitVectorCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFBitVector.t)) +let _CFBitVectorCreateMutableCopy = Foreign.foreign ~stub:true "CFBitVectorCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFBitVector.t) @-> returning (ptr CFBitVector.t)) +let _CFBitVectorFlipBitAtIndex = Foreign.foreign ~stub:true "CFBitVectorFlipBitAtIndex" ((ptr CFBitVector.t) @-> llong @-> returning void) +let _CFBitVectorFlipBits = Foreign.foreign ~stub:true "CFBitVectorFlipBits" ((ptr CFBitVector.t) @-> CFRange.t @-> returning void) +let _CFBitVectorGetBitAtIndex = Foreign.foreign ~stub:true "CFBitVectorGetBitAtIndex" ((ptr CFBitVector.t) @-> llong @-> returning uint) +let _CFBitVectorGetBits = Foreign.foreign ~stub:true "CFBitVectorGetBits" ((ptr CFBitVector.t) @-> CFRange.t @-> string @-> returning void) +let _CFBitVectorGetCount = Foreign.foreign ~stub:true "CFBitVectorGetCount" ((ptr CFBitVector.t) @-> returning llong) +let _CFBitVectorGetCountOfBit = Foreign.foreign ~stub:true "CFBitVectorGetCountOfBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning llong) +let _CFBitVectorGetFirstIndexOfBit = Foreign.foreign ~stub:true "CFBitVectorGetFirstIndexOfBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning llong) +let _CFBitVectorGetLastIndexOfBit = Foreign.foreign ~stub:true "CFBitVectorGetLastIndexOfBit" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning llong) +let _CFBitVectorGetTypeID = Foreign.foreign ~stub:true "CFBitVectorGetTypeID" (void @-> returning ullong) +let _CFBitVectorSetAllBits = Foreign.foreign ~stub:true "CFBitVectorSetAllBits" ((ptr CFBitVector.t) @-> uint @-> returning void) +let _CFBitVectorSetBitAtIndex = Foreign.foreign ~stub:true "CFBitVectorSetBitAtIndex" ((ptr CFBitVector.t) @-> llong @-> uint @-> returning void) +let _CFBitVectorSetBits = Foreign.foreign ~stub:true "CFBitVectorSetBits" ((ptr CFBitVector.t) @-> CFRange.t @-> uint @-> returning void) +let _CFBitVectorSetCount = Foreign.foreign ~stub:true "CFBitVectorSetCount" ((ptr CFBitVector.t) @-> llong @-> returning void) +let _CFBooleanGetTypeID = Foreign.foreign ~stub:true "CFBooleanGetTypeID" (void @-> returning ullong) +let _CFBooleanGetValue = Foreign.foreign ~stub:true "CFBooleanGetValue" ((ptr CFBoolean.t) @-> returning bool) +let _CFBundleCloseBundleResourceMap = Foreign.foreign ~stub:true "CFBundleCloseBundleResourceMap" ((ptr CFBundle.t) @-> int @-> returning void) +let _CFBundleCopyAuxiliaryExecutableURL = Foreign.foreign ~stub:true "CFBundleCopyAuxiliaryExecutableURL" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyBuiltInPlugInsURL = Foreign.foreign ~stub:true "CFBundleCopyBuiltInPlugInsURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyBundleLocalizations = Foreign.foreign ~stub:true "CFBundleCopyBundleLocalizations" ((ptr CFBundle.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyBundleURL = Foreign.foreign ~stub:true "CFBundleCopyBundleURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyExecutableArchitectures = Foreign.foreign ~stub:true "CFBundleCopyExecutableArchitectures" ((ptr CFBundle.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyExecutableArchitecturesForURL = Foreign.foreign ~stub:true "CFBundleCopyExecutableArchitecturesForURL" ((ptr CFURL.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyExecutableURL = Foreign.foreign ~stub:true "CFBundleCopyExecutableURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyInfoDictionaryForURL = Foreign.foreign ~stub:true "CFBundleCopyInfoDictionaryForURL" ((ptr CFURL.t) @-> returning (ptr CFDictionary.t)) +let _CFBundleCopyInfoDictionaryInDirectory = Foreign.foreign ~stub:true "CFBundleCopyInfoDictionaryInDirectory" ((ptr CFURL.t) @-> returning (ptr CFDictionary.t)) +let _CFBundleCopyLocalizationsForPreferences = Foreign.foreign ~stub:true "CFBundleCopyLocalizationsForPreferences" ((ptr CFArray.t) @-> (ptr CFArray.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyLocalizationsForURL = Foreign.foreign ~stub:true "CFBundleCopyLocalizationsForURL" ((ptr CFURL.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyLocalizedString = Foreign.foreign ~stub:true "CFBundleCopyLocalizedString" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFBundleCopyPreferredLocalizationsFromArray = Foreign.foreign ~stub:true "CFBundleCopyPreferredLocalizationsFromArray" ((ptr CFArray.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyPrivateFrameworksURL = Foreign.foreign ~stub:true "CFBundleCopyPrivateFrameworksURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyResourceURL = Foreign.foreign ~stub:true "CFBundleCopyResourceURL" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyResourceURLForLocalization = Foreign.foreign ~stub:true "CFBundleCopyResourceURLForLocalization" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyResourceURLInDirectory = Foreign.foreign ~stub:true "CFBundleCopyResourceURLInDirectory" ((ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopyResourceURLsOfType = Foreign.foreign ~stub:true "CFBundleCopyResourceURLsOfType" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyResourceURLsOfTypeForLocalization = Foreign.foreign ~stub:true "CFBundleCopyResourceURLsOfTypeForLocalization" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyResourceURLsOfTypeInDirectory = Foreign.foreign ~stub:true "CFBundleCopyResourceURLsOfTypeInDirectory" ((ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) +let _CFBundleCopyResourcesDirectoryURL = Foreign.foreign ~stub:true "CFBundleCopyResourcesDirectoryURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopySharedFrameworksURL = Foreign.foreign ~stub:true "CFBundleCopySharedFrameworksURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopySharedSupportURL = Foreign.foreign ~stub:true "CFBundleCopySharedSupportURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCopySupportFilesDirectoryURL = Foreign.foreign ~stub:true "CFBundleCopySupportFilesDirectoryURL" ((ptr CFBundle.t) @-> returning (ptr CFURL.t)) +let _CFBundleCreate = Foreign.foreign ~stub:true "CFBundleCreate" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFBundle.t)) +let _CFBundleCreateBundlesFromDirectory = Foreign.foreign ~stub:true "CFBundleCreateBundlesFromDirectory" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) +let _CFBundleGetAllBundles = Foreign.foreign ~stub:true "CFBundleGetAllBundles" (void @-> returning (ptr CFArray.t)) +let _CFBundleGetBundleWithIdentifier = Foreign.foreign ~stub:true "CFBundleGetBundleWithIdentifier" ((ptr CFString.t) @-> returning (ptr CFBundle.t)) +let _CFBundleGetDataPointerForName = Foreign.foreign ~stub:true "CFBundleGetDataPointerForName" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning (ptr void)) +let _CFBundleGetDataPointersForNames = Foreign.foreign ~stub:true "CFBundleGetDataPointersForNames" ((ptr CFBundle.t) @-> (ptr CFArray.t) @-> (ptr (ptr void)) @-> returning void) +let _CFBundleGetDevelopmentRegion = Foreign.foreign ~stub:true "CFBundleGetDevelopmentRegion" ((ptr CFBundle.t) @-> returning (ptr CFString.t)) +let _CFBundleGetFunctionPointerForName = Foreign.foreign ~stub:true "CFBundleGetFunctionPointerForName" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning (ptr void)) +let _CFBundleGetFunctionPointersForNames = Foreign.foreign ~stub:true "CFBundleGetFunctionPointersForNames" ((ptr CFBundle.t) @-> (ptr CFArray.t) @-> (ptr (ptr void)) @-> returning void) +let _CFBundleGetIdentifier = Foreign.foreign ~stub:true "CFBundleGetIdentifier" ((ptr CFBundle.t) @-> returning (ptr CFString.t)) +let _CFBundleGetInfoDictionary = Foreign.foreign ~stub:true "CFBundleGetInfoDictionary" ((ptr CFBundle.t) @-> returning (ptr CFDictionary.t)) +let _CFBundleGetLocalInfoDictionary = Foreign.foreign ~stub:true "CFBundleGetLocalInfoDictionary" ((ptr CFBundle.t) @-> returning (ptr CFDictionary.t)) +let _CFBundleGetMainBundle = Foreign.foreign ~stub:true "CFBundleGetMainBundle" (void @-> returning (ptr CFBundle.t)) +let _CFBundleGetPackageInfo = Foreign.foreign ~stub:true "CFBundleGetPackageInfo" ((ptr CFBundle.t) @-> (ptr uint) @-> (ptr uint) @-> returning void) +let _CFBundleGetPackageInfoInDirectory = Foreign.foreign ~stub:true "CFBundleGetPackageInfoInDirectory" ((ptr CFURL.t) @-> (ptr uint) @-> (ptr uint) @-> returning bool) +let _CFBundleGetPlugIn = Foreign.foreign ~stub:true "CFBundleGetPlugIn" ((ptr CFBundle.t) @-> returning (ptr CFBundle.t)) +let _CFBundleGetTypeID = Foreign.foreign ~stub:true "CFBundleGetTypeID" (void @-> returning ullong) +let _CFBundleGetValueForInfoDictionaryKey = Foreign.foreign ~stub:true "CFBundleGetValueForInfoDictionaryKey" ((ptr CFBundle.t) @-> (ptr CFString.t) @-> returning id) +let _CFBundleGetVersionNumber = Foreign.foreign ~stub:true "CFBundleGetVersionNumber" ((ptr CFBundle.t) @-> returning uint) +let _CFBundleIsArchitectureLoadable = Foreign.foreign ~stub:true "CFBundleIsArchitectureLoadable" (int @-> returning bool) +let _CFBundleIsExecutableLoadable = Foreign.foreign ~stub:true "CFBundleIsExecutableLoadable" ((ptr CFBundle.t) @-> returning bool) +let _CFBundleIsExecutableLoadableForURL = Foreign.foreign ~stub:true "CFBundleIsExecutableLoadableForURL" ((ptr CFURL.t) @-> returning bool) +let _CFBundleIsExecutableLoaded = Foreign.foreign ~stub:true "CFBundleIsExecutableLoaded" ((ptr CFBundle.t) @-> returning bool) +let _CFBundleLoadExecutable = Foreign.foreign ~stub:true "CFBundleLoadExecutable" ((ptr CFBundle.t) @-> returning bool) +let _CFBundleLoadExecutableAndReturnError = Foreign.foreign ~stub:true "CFBundleLoadExecutableAndReturnError" ((ptr CFBundle.t) @-> (ptr (ptr CFError.t)) @-> returning bool) +let _CFBundleOpenBundleResourceFiles = Foreign.foreign ~stub:true "CFBundleOpenBundleResourceFiles" ((ptr CFBundle.t) @-> (ptr int) @-> (ptr int) @-> returning int) +let _CFBundleOpenBundleResourceMap = Foreign.foreign ~stub:true "CFBundleOpenBundleResourceMap" ((ptr CFBundle.t) @-> returning int) +let _CFBundlePreflightExecutable = Foreign.foreign ~stub:true "CFBundlePreflightExecutable" ((ptr CFBundle.t) @-> (ptr (ptr CFError.t)) @-> returning bool) +let _CFBundleUnloadExecutable = Foreign.foreign ~stub:true "CFBundleUnloadExecutable" ((ptr CFBundle.t) @-> returning void) (* let _CFByteOrderGetCurrent = Foreign.foreign "Camlkit_CFByteOrderGetCurrent" (void @-> returning llong) *) -let _CFCalendarAddComponents = Foreign.foreign "CFCalendarAddComponents" ((ptr CFCalendar.t) @-> (ptr double) @-> ullong @-> string @-> returning bool) -let _CFCalendarComposeAbsoluteTime = Foreign.foreign "CFCalendarComposeAbsoluteTime" ((ptr CFCalendar.t) @-> (ptr double) @-> string @-> returning bool) -let _CFCalendarCopyCurrent = Foreign.foreign "CFCalendarCopyCurrent" (void @-> returning (ptr CFCalendar.t)) -let _CFCalendarCopyLocale = Foreign.foreign "CFCalendarCopyLocale" ((ptr CFCalendar.t) @-> returning (ptr CFLocale.t)) -let _CFCalendarCopyTimeZone = Foreign.foreign "CFCalendarCopyTimeZone" ((ptr CFCalendar.t) @-> returning (ptr CFTimeZone.t)) -let _CFCalendarCreateWithIdentifier = Foreign.foreign "CFCalendarCreateWithIdentifier" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFCalendar.t)) -let _CFCalendarDecomposeAbsoluteTime = Foreign.foreign "CFCalendarDecomposeAbsoluteTime" ((ptr CFCalendar.t) @-> double @-> string @-> returning bool) -let _CFCalendarGetComponentDifference = Foreign.foreign "CFCalendarGetComponentDifference" ((ptr CFCalendar.t) @-> double @-> double @-> ullong @-> string @-> returning bool) -let _CFCalendarGetFirstWeekday = Foreign.foreign "CFCalendarGetFirstWeekday" ((ptr CFCalendar.t) @-> returning llong) -let _CFCalendarGetIdentifier = Foreign.foreign "CFCalendarGetIdentifier" ((ptr CFCalendar.t) @-> returning (ptr CFString.t)) -let _CFCalendarGetMaximumRangeOfUnit = Foreign.foreign "CFCalendarGetMaximumRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> returning CFRange.t) -let _CFCalendarGetMinimumDaysInFirstWeek = Foreign.foreign "CFCalendarGetMinimumDaysInFirstWeek" ((ptr CFCalendar.t) @-> returning llong) -let _CFCalendarGetMinimumRangeOfUnit = Foreign.foreign "CFCalendarGetMinimumRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> returning CFRange.t) -let _CFCalendarGetOrdinalityOfUnit = Foreign.foreign "CFCalendarGetOrdinalityOfUnit" ((ptr CFCalendar.t) @-> ullong @-> ullong @-> double @-> returning llong) -let _CFCalendarGetRangeOfUnit = Foreign.foreign "CFCalendarGetRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> ullong @-> double @-> returning CFRange.t) -let _CFCalendarGetTimeRangeOfUnit = Foreign.foreign "CFCalendarGetTimeRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> double @-> (ptr double) @-> (ptr double) @-> returning bool) -let _CFCalendarGetTypeID = Foreign.foreign "CFCalendarGetTypeID" (void @-> returning ullong) -let _CFCalendarSetFirstWeekday = Foreign.foreign "CFCalendarSetFirstWeekday" ((ptr CFCalendar.t) @-> llong @-> returning void) -let _CFCalendarSetLocale = Foreign.foreign "CFCalendarSetLocale" ((ptr CFCalendar.t) @-> (ptr CFLocale.t) @-> returning void) -let _CFCalendarSetMinimumDaysInFirstWeek = Foreign.foreign "CFCalendarSetMinimumDaysInFirstWeek" ((ptr CFCalendar.t) @-> llong @-> returning void) -let _CFCalendarSetTimeZone = Foreign.foreign "CFCalendarSetTimeZone" ((ptr CFCalendar.t) @-> (ptr CFTimeZone.t) @-> returning void) -let _CFCharacterSetAddCharactersInRange = Foreign.foreign "CFCharacterSetAddCharactersInRange" ((ptr CFCharacterSet.t) @-> CFRange.t @-> returning void) -let _CFCharacterSetAddCharactersInString = Foreign.foreign "CFCharacterSetAddCharactersInString" ((ptr CFCharacterSet.t) @-> (ptr CFString.t) @-> returning void) -let _CFCharacterSetCreateBitmapRepresentation = Foreign.foreign "CFCharacterSetCreateBitmapRepresentation" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFData.t)) -let _CFCharacterSetCreateCopy = Foreign.foreign "CFCharacterSetCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetCreateInvertedSet = Foreign.foreign "CFCharacterSetCreateInvertedSet" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetCreateMutable = Foreign.foreign "CFCharacterSetCreateMutable" ((ptr CFAllocator.t) @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetCreateMutableCopy = Foreign.foreign "CFCharacterSetCreateMutableCopy" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetCreateWithBitmapRepresentation = Foreign.foreign "CFCharacterSetCreateWithBitmapRepresentation" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetCreateWithCharactersInRange = Foreign.foreign "CFCharacterSetCreateWithCharactersInRange" ((ptr CFAllocator.t) @-> CFRange.t @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetCreateWithCharactersInString = Foreign.foreign "CFCharacterSetCreateWithCharactersInString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetGetPredefined = Foreign.foreign "CFCharacterSetGetPredefined" (llong @-> returning (ptr CFCharacterSet.t)) -let _CFCharacterSetGetTypeID = Foreign.foreign "CFCharacterSetGetTypeID" (void @-> returning ullong) -let _CFCharacterSetHasMemberInPlane = Foreign.foreign "CFCharacterSetHasMemberInPlane" ((ptr CFCharacterSet.t) @-> llong @-> returning bool) -let _CFCharacterSetIntersect = Foreign.foreign "CFCharacterSetIntersect" ((ptr CFCharacterSet.t) @-> (ptr CFCharacterSet.t) @-> returning void) -let _CFCharacterSetInvert = Foreign.foreign "CFCharacterSetInvert" ((ptr CFCharacterSet.t) @-> returning void) -let _CFCharacterSetIsCharacterMember = Foreign.foreign "CFCharacterSetIsCharacterMember" ((ptr CFCharacterSet.t) @-> ushort @-> returning bool) -let _CFCharacterSetIsLongCharacterMember = Foreign.foreign "CFCharacterSetIsLongCharacterMember" ((ptr CFCharacterSet.t) @-> uint @-> returning bool) -let _CFCharacterSetIsSupersetOfSet = Foreign.foreign "CFCharacterSetIsSupersetOfSet" ((ptr CFCharacterSet.t) @-> (ptr CFCharacterSet.t) @-> returning bool) -let _CFCharacterSetRemoveCharactersInRange = Foreign.foreign "CFCharacterSetRemoveCharactersInRange" ((ptr CFCharacterSet.t) @-> CFRange.t @-> returning void) -let _CFCharacterSetRemoveCharactersInString = Foreign.foreign "CFCharacterSetRemoveCharactersInString" ((ptr CFCharacterSet.t) @-> (ptr CFString.t) @-> returning void) -let _CFCharacterSetUnion = Foreign.foreign "CFCharacterSetUnion" ((ptr CFCharacterSet.t) @-> (ptr CFCharacterSet.t) @-> returning void) +let _CFCalendarAddComponents = Foreign.foreign ~stub:true "CFCalendarAddComponents" ((ptr CFCalendar.t) @-> (ptr double) @-> ullong @-> string @-> returning bool) +let _CFCalendarComposeAbsoluteTime = Foreign.foreign ~stub:true "CFCalendarComposeAbsoluteTime" ((ptr CFCalendar.t) @-> (ptr double) @-> string @-> returning bool) +let _CFCalendarCopyCurrent = Foreign.foreign ~stub:true "CFCalendarCopyCurrent" (void @-> returning (ptr CFCalendar.t)) +let _CFCalendarCopyLocale = Foreign.foreign ~stub:true "CFCalendarCopyLocale" ((ptr CFCalendar.t) @-> returning (ptr CFLocale.t)) +let _CFCalendarCopyTimeZone = Foreign.foreign ~stub:true "CFCalendarCopyTimeZone" ((ptr CFCalendar.t) @-> returning (ptr CFTimeZone.t)) +let _CFCalendarCreateWithIdentifier = Foreign.foreign ~stub:true "CFCalendarCreateWithIdentifier" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFCalendar.t)) +let _CFCalendarDecomposeAbsoluteTime = Foreign.foreign ~stub:true "CFCalendarDecomposeAbsoluteTime" ((ptr CFCalendar.t) @-> double @-> string @-> returning bool) +let _CFCalendarGetComponentDifference = Foreign.foreign ~stub:true "CFCalendarGetComponentDifference" ((ptr CFCalendar.t) @-> double @-> double @-> ullong @-> string @-> returning bool) +let _CFCalendarGetFirstWeekday = Foreign.foreign ~stub:true "CFCalendarGetFirstWeekday" ((ptr CFCalendar.t) @-> returning llong) +let _CFCalendarGetIdentifier = Foreign.foreign ~stub:true "CFCalendarGetIdentifier" ((ptr CFCalendar.t) @-> returning (ptr CFString.t)) +let _CFCalendarGetMaximumRangeOfUnit = Foreign.foreign ~stub:true "CFCalendarGetMaximumRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> returning CFRange.t) +let _CFCalendarGetMinimumDaysInFirstWeek = Foreign.foreign ~stub:true "CFCalendarGetMinimumDaysInFirstWeek" ((ptr CFCalendar.t) @-> returning llong) +let _CFCalendarGetMinimumRangeOfUnit = Foreign.foreign ~stub:true "CFCalendarGetMinimumRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> returning CFRange.t) +let _CFCalendarGetOrdinalityOfUnit = Foreign.foreign ~stub:true "CFCalendarGetOrdinalityOfUnit" ((ptr CFCalendar.t) @-> ullong @-> ullong @-> double @-> returning llong) +let _CFCalendarGetRangeOfUnit = Foreign.foreign ~stub:true "CFCalendarGetRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> ullong @-> double @-> returning CFRange.t) +let _CFCalendarGetTimeRangeOfUnit = Foreign.foreign ~stub:true "CFCalendarGetTimeRangeOfUnit" ((ptr CFCalendar.t) @-> ullong @-> double @-> (ptr double) @-> (ptr double) @-> returning bool) +let _CFCalendarGetTypeID = Foreign.foreign ~stub:true "CFCalendarGetTypeID" (void @-> returning ullong) +let _CFCalendarSetFirstWeekday = Foreign.foreign ~stub:true "CFCalendarSetFirstWeekday" ((ptr CFCalendar.t) @-> llong @-> returning void) +let _CFCalendarSetLocale = Foreign.foreign ~stub:true "CFCalendarSetLocale" ((ptr CFCalendar.t) @-> (ptr CFLocale.t) @-> returning void) +let _CFCalendarSetMinimumDaysInFirstWeek = Foreign.foreign ~stub:true "CFCalendarSetMinimumDaysInFirstWeek" ((ptr CFCalendar.t) @-> llong @-> returning void) +let _CFCalendarSetTimeZone = Foreign.foreign ~stub:true "CFCalendarSetTimeZone" ((ptr CFCalendar.t) @-> (ptr CFTimeZone.t) @-> returning void) +let _CFCharacterSetAddCharactersInRange = Foreign.foreign ~stub:true "CFCharacterSetAddCharactersInRange" ((ptr CFCharacterSet.t) @-> CFRange.t @-> returning void) +let _CFCharacterSetAddCharactersInString = Foreign.foreign ~stub:true "CFCharacterSetAddCharactersInString" ((ptr CFCharacterSet.t) @-> (ptr CFString.t) @-> returning void) +let _CFCharacterSetCreateBitmapRepresentation = Foreign.foreign ~stub:true "CFCharacterSetCreateBitmapRepresentation" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFData.t)) +let _CFCharacterSetCreateCopy = Foreign.foreign ~stub:true "CFCharacterSetCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetCreateInvertedSet = Foreign.foreign ~stub:true "CFCharacterSetCreateInvertedSet" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetCreateMutable = Foreign.foreign ~stub:true "CFCharacterSetCreateMutable" ((ptr CFAllocator.t) @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetCreateMutableCopy = Foreign.foreign ~stub:true "CFCharacterSetCreateMutableCopy" ((ptr CFAllocator.t) @-> (ptr CFCharacterSet.t) @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetCreateWithBitmapRepresentation = Foreign.foreign ~stub:true "CFCharacterSetCreateWithBitmapRepresentation" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetCreateWithCharactersInRange = Foreign.foreign ~stub:true "CFCharacterSetCreateWithCharactersInRange" ((ptr CFAllocator.t) @-> CFRange.t @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetCreateWithCharactersInString = Foreign.foreign ~stub:true "CFCharacterSetCreateWithCharactersInString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetGetPredefined = Foreign.foreign ~stub:true "CFCharacterSetGetPredefined" (llong @-> returning (ptr CFCharacterSet.t)) +let _CFCharacterSetGetTypeID = Foreign.foreign ~stub:true "CFCharacterSetGetTypeID" (void @-> returning ullong) +let _CFCharacterSetHasMemberInPlane = Foreign.foreign ~stub:true "CFCharacterSetHasMemberInPlane" ((ptr CFCharacterSet.t) @-> llong @-> returning bool) +let _CFCharacterSetIntersect = Foreign.foreign ~stub:true "CFCharacterSetIntersect" ((ptr CFCharacterSet.t) @-> (ptr CFCharacterSet.t) @-> returning void) +let _CFCharacterSetInvert = Foreign.foreign ~stub:true "CFCharacterSetInvert" ((ptr CFCharacterSet.t) @-> returning void) +let _CFCharacterSetIsCharacterMember = Foreign.foreign ~stub:true "CFCharacterSetIsCharacterMember" ((ptr CFCharacterSet.t) @-> ushort @-> returning bool) +let _CFCharacterSetIsLongCharacterMember = Foreign.foreign ~stub:true "CFCharacterSetIsLongCharacterMember" ((ptr CFCharacterSet.t) @-> uint @-> returning bool) +let _CFCharacterSetIsSupersetOfSet = Foreign.foreign ~stub:true "CFCharacterSetIsSupersetOfSet" ((ptr CFCharacterSet.t) @-> (ptr CFCharacterSet.t) @-> returning bool) +let _CFCharacterSetRemoveCharactersInRange = Foreign.foreign ~stub:true "CFCharacterSetRemoveCharactersInRange" ((ptr CFCharacterSet.t) @-> CFRange.t @-> returning void) +let _CFCharacterSetRemoveCharactersInString = Foreign.foreign ~stub:true "CFCharacterSetRemoveCharactersInString" ((ptr CFCharacterSet.t) @-> (ptr CFString.t) @-> returning void) +let _CFCharacterSetUnion = Foreign.foreign ~stub:true "CFCharacterSetUnion" ((ptr CFCharacterSet.t) @-> (ptr CFCharacterSet.t) @-> returning void) (* let _CFConvertDoubleHostToSwapped = Foreign.foreign "Camlkit_CFConvertDoubleHostToSwapped" (double @-> returning CFSwappedFloat64.t) *) (* let _CFConvertDoubleSwappedToHost = Foreign.foreign "Camlkit_CFConvertDoubleSwappedToHost" (CFSwappedFloat64.t @-> returning double) *) (* let _CFConvertFloat32HostToSwapped = Foreign.foreign "Camlkit_CFConvertFloat32HostToSwapped" (float @-> returning CFSwappedFloat32.t) *) @@ -218,448 +221,448 @@ let _CFCharacterSetUnion = Foreign.foreign "CFCharacterSetUnion" ((ptr CFCharact (* let _CFConvertFloat64SwappedToHost = Foreign.foreign "Camlkit_CFConvertFloat64SwappedToHost" (CFSwappedFloat64.t @-> returning double) *) (* let _CFConvertFloatHostToSwapped = Foreign.foreign "Camlkit_CFConvertFloatHostToSwapped" (float @-> returning CFSwappedFloat32.t) *) (* let _CFConvertFloatSwappedToHost = Foreign.foreign "Camlkit_CFConvertFloatSwappedToHost" (CFSwappedFloat32.t @-> returning float) *) -let _CFCopyDescription = Foreign.foreign "CFCopyDescription" (id @-> returning (ptr CFString.t)) -let _CFCopyHomeDirectoryURL = Foreign.foreign "CFCopyHomeDirectoryURL" (void @-> returning (ptr CFURL.t)) -let _CFCopyTypeIDDescription = Foreign.foreign "CFCopyTypeIDDescription" (ullong @-> returning (ptr CFString.t)) -let _CFDataAppendBytes = Foreign.foreign "CFDataAppendBytes" ((ptr CFData.t) @-> string @-> llong @-> returning void) -let _CFDataCreate = Foreign.foreign "CFDataCreate" ((ptr CFAllocator.t) @-> string @-> llong @-> returning (ptr CFData.t)) -let _CFDataCreateCopy = Foreign.foreign "CFDataCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CFData.t)) -let _CFDataCreateMutable = Foreign.foreign "CFDataCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFData.t)) -let _CFDataCreateMutableCopy = Foreign.foreign "CFDataCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFData.t) @-> returning (ptr CFData.t)) -let _CFDataCreateWithBytesNoCopy = Foreign.foreign "CFDataCreateWithBytesNoCopy" ((ptr CFAllocator.t) @-> string @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFData.t)) -let _CFDataDeleteBytes = Foreign.foreign "CFDataDeleteBytes" ((ptr CFData.t) @-> CFRange.t @-> returning void) -let _CFDataFind = Foreign.foreign "CFDataFind" ((ptr CFData.t) @-> (ptr CFData.t) @-> CFRange.t @-> ullong @-> returning CFRange.t) -let _CFDataGetBytePtr = Foreign.foreign "CFDataGetBytePtr" ((ptr CFData.t) @-> returning string) -let _CFDataGetBytes = Foreign.foreign "CFDataGetBytes" ((ptr CFData.t) @-> CFRange.t @-> string @-> returning void) -let _CFDataGetLength = Foreign.foreign "CFDataGetLength" ((ptr CFData.t) @-> returning llong) -let _CFDataGetMutableBytePtr = Foreign.foreign "CFDataGetMutableBytePtr" ((ptr CFData.t) @-> returning string) -let _CFDataGetTypeID = Foreign.foreign "CFDataGetTypeID" (void @-> returning ullong) -let _CFDataIncreaseLength = Foreign.foreign "CFDataIncreaseLength" ((ptr CFData.t) @-> llong @-> returning void) -let _CFDataReplaceBytes = Foreign.foreign "CFDataReplaceBytes" ((ptr CFData.t) @-> CFRange.t @-> string @-> llong @-> returning void) -let _CFDataSetLength = Foreign.foreign "CFDataSetLength" ((ptr CFData.t) @-> llong @-> returning void) -let _CFDateCompare = Foreign.foreign "CFDateCompare" ((ptr CFDate.t) @-> (ptr CFDate.t) @-> (ptr void) @-> returning llong) -let _CFDateCreate = Foreign.foreign "CFDateCreate" ((ptr CFAllocator.t) @-> double @-> returning (ptr CFDate.t)) -let _CFDateFormatterCopyProperty = Foreign.foreign "CFDateFormatterCopyProperty" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> returning id) -let _CFDateFormatterCreate = Foreign.foreign "CFDateFormatterCreate" ((ptr CFAllocator.t) @-> (ptr CFLocale.t) @-> llong @-> llong @-> returning (ptr CFDateFormatter.t)) -let _CFDateFormatterCreateDateFormatFromTemplate = Foreign.foreign "CFDateFormatterCreateDateFormatFromTemplate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> ullong @-> (ptr CFLocale.t) @-> returning (ptr CFString.t)) -let _CFDateFormatterCreateDateFromString = Foreign.foreign "CFDateFormatterCreateDateFromString" ((ptr CFAllocator.t) @-> (ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> returning (ptr CFDate.t)) -let _CFDateFormatterCreateISO8601Formatter = Foreign.foreign "CFDateFormatterCreateISO8601Formatter" ((ptr CFAllocator.t) @-> ullong @-> returning (ptr CFDateFormatter.t)) -let _CFDateFormatterCreateStringWithAbsoluteTime = Foreign.foreign "CFDateFormatterCreateStringWithAbsoluteTime" ((ptr CFAllocator.t) @-> (ptr CFDateFormatter.t) @-> double @-> returning (ptr CFString.t)) -let _CFDateFormatterCreateStringWithDate = Foreign.foreign "CFDateFormatterCreateStringWithDate" ((ptr CFAllocator.t) @-> (ptr CFDateFormatter.t) @-> (ptr CFDate.t) @-> returning (ptr CFString.t)) -let _CFDateFormatterGetAbsoluteTimeFromString = Foreign.foreign "CFDateFormatterGetAbsoluteTimeFromString" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> (ptr double) @-> returning bool) -let _CFDateFormatterGetDateStyle = Foreign.foreign "CFDateFormatterGetDateStyle" ((ptr CFDateFormatter.t) @-> returning llong) -let _CFDateFormatterGetFormat = Foreign.foreign "CFDateFormatterGetFormat" ((ptr CFDateFormatter.t) @-> returning (ptr CFString.t)) -let _CFDateFormatterGetLocale = Foreign.foreign "CFDateFormatterGetLocale" ((ptr CFDateFormatter.t) @-> returning (ptr CFLocale.t)) -let _CFDateFormatterGetTimeStyle = Foreign.foreign "CFDateFormatterGetTimeStyle" ((ptr CFDateFormatter.t) @-> returning llong) -let _CFDateFormatterGetTypeID = Foreign.foreign "CFDateFormatterGetTypeID" (void @-> returning ullong) -let _CFDateFormatterSetFormat = Foreign.foreign "CFDateFormatterSetFormat" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> returning void) -let _CFDateFormatterSetProperty = Foreign.foreign "CFDateFormatterSetProperty" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> id @-> returning void) -let _CFDateGetAbsoluteTime = Foreign.foreign "CFDateGetAbsoluteTime" ((ptr CFDate.t) @-> returning double) -let _CFDateGetTimeIntervalSinceDate = Foreign.foreign "CFDateGetTimeIntervalSinceDate" ((ptr CFDate.t) @-> (ptr CFDate.t) @-> returning double) -let _CFDateGetTypeID = Foreign.foreign "CFDateGetTypeID" (void @-> returning ullong) -let _CFDictionaryAddValue = Foreign.foreign "CFDictionaryAddValue" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr void) @-> returning void) -let _CFDictionaryApplyFunction = Foreign.foreign "CFDictionaryApplyFunction" ((ptr CFDictionary.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CFDictionaryContainsKey = Foreign.foreign "CFDictionaryContainsKey" ((ptr CFDictionary.t) @-> (ptr void) @-> returning bool) -let _CFDictionaryContainsValue = Foreign.foreign "CFDictionaryContainsValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning bool) -let _CFDictionaryCreate = Foreign.foreign "CFDictionaryCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> (ptr (ptr void)) @-> llong @-> (ptr CFDictionaryKeyCallBacks.t) @-> (ptr CFDictionaryValueCallBacks.t) @-> returning (ptr CFDictionary.t)) -let _CFDictionaryCreateCopy = Foreign.foreign "CFDictionaryCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFDictionary.t)) -let _CFDictionaryCreateMutable = Foreign.foreign "CFDictionaryCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFDictionaryKeyCallBacks.t) @-> (ptr CFDictionaryValueCallBacks.t) @-> returning (ptr CFDictionary.t)) -let _CFDictionaryCreateMutableCopy = Foreign.foreign "CFDictionaryCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFDictionary.t) @-> returning (ptr CFDictionary.t)) -let _CFDictionaryGetCount = Foreign.foreign "CFDictionaryGetCount" ((ptr CFDictionary.t) @-> returning llong) -let _CFDictionaryGetCountOfKey = Foreign.foreign "CFDictionaryGetCountOfKey" ((ptr CFDictionary.t) @-> (ptr void) @-> returning llong) -let _CFDictionaryGetCountOfValue = Foreign.foreign "CFDictionaryGetCountOfValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning llong) -let _CFDictionaryGetKeysAndValues = Foreign.foreign "CFDictionaryGetKeysAndValues" ((ptr CFDictionary.t) @-> (ptr (ptr void)) @-> (ptr (ptr void)) @-> returning void) -let _CFDictionaryGetTypeID = Foreign.foreign "CFDictionaryGetTypeID" (void @-> returning ullong) -let _CFDictionaryGetValue = Foreign.foreign "CFDictionaryGetValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning (ptr void)) -let _CFDictionaryGetValueIfPresent = Foreign.foreign "CFDictionaryGetValueIfPresent" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr (ptr void)) @-> returning bool) -let _CFDictionaryRemoveAllValues = Foreign.foreign "CFDictionaryRemoveAllValues" ((ptr CFDictionary.t) @-> returning void) -let _CFDictionaryRemoveValue = Foreign.foreign "CFDictionaryRemoveValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning void) -let _CFDictionaryReplaceValue = Foreign.foreign "CFDictionaryReplaceValue" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr void) @-> returning void) -let _CFDictionarySetValue = Foreign.foreign "CFDictionarySetValue" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr void) @-> returning void) -let _CFEqual = Foreign.foreign "CFEqual" (id @-> id @-> returning bool) -let _CFErrorCopyDescription = Foreign.foreign "CFErrorCopyDescription" ((ptr CFError.t) @-> returning (ptr CFString.t)) -let _CFErrorCopyFailureReason = Foreign.foreign "CFErrorCopyFailureReason" ((ptr CFError.t) @-> returning (ptr CFString.t)) -let _CFErrorCopyRecoverySuggestion = Foreign.foreign "CFErrorCopyRecoverySuggestion" ((ptr CFError.t) @-> returning (ptr CFString.t)) -let _CFErrorCopyUserInfo = Foreign.foreign "CFErrorCopyUserInfo" ((ptr CFError.t) @-> returning (ptr CFDictionary.t)) -let _CFErrorCreate = Foreign.foreign "CFErrorCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> (ptr CFDictionary.t) @-> returning (ptr CFError.t)) -let _CFErrorCreateWithUserInfoKeysAndValues = Foreign.foreign "CFErrorCreateWithUserInfoKeysAndValues" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> (ptr (ptr void)) @-> (ptr (ptr void)) @-> llong @-> returning (ptr CFError.t)) -let _CFErrorGetCode = Foreign.foreign "CFErrorGetCode" ((ptr CFError.t) @-> returning llong) -let _CFErrorGetDomain = Foreign.foreign "CFErrorGetDomain" ((ptr CFError.t) @-> returning (ptr CFString.t)) -let _CFErrorGetTypeID = Foreign.foreign "CFErrorGetTypeID" (void @-> returning ullong) -let _CFFileDescriptorCreate = Foreign.foreign "CFFileDescriptorCreate" ((ptr CFAllocator.t) @-> int @-> bool @-> Foreign.funptr ((ptr CFFileDescriptor.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFFileDescriptorContext.t) @-> returning (ptr CFFileDescriptor.t)) -let _CFFileDescriptorCreateRunLoopSource = Foreign.foreign "CFFileDescriptorCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFFileDescriptor.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) -let _CFFileDescriptorDisableCallBacks = Foreign.foreign "CFFileDescriptorDisableCallBacks" ((ptr CFFileDescriptor.t) @-> ullong @-> returning void) -let _CFFileDescriptorEnableCallBacks = Foreign.foreign "CFFileDescriptorEnableCallBacks" ((ptr CFFileDescriptor.t) @-> ullong @-> returning void) -let _CFFileDescriptorGetContext = Foreign.foreign "CFFileDescriptorGetContext" ((ptr CFFileDescriptor.t) @-> (ptr CFFileDescriptorContext.t) @-> returning void) -let _CFFileDescriptorGetNativeDescriptor = Foreign.foreign "CFFileDescriptorGetNativeDescriptor" ((ptr CFFileDescriptor.t) @-> returning int) -let _CFFileDescriptorGetTypeID = Foreign.foreign "CFFileDescriptorGetTypeID" (void @-> returning ullong) -let _CFFileDescriptorInvalidate = Foreign.foreign "CFFileDescriptorInvalidate" ((ptr CFFileDescriptor.t) @-> returning void) -let _CFFileDescriptorIsValid = Foreign.foreign "CFFileDescriptorIsValid" ((ptr CFFileDescriptor.t) @-> returning bool) -let _CFFileSecurityClearProperties = Foreign.foreign "CFFileSecurityClearProperties" ((ptr CFFileSecurity.t) @-> ullong @-> returning bool) -let _CFFileSecurityCopyAccessControlList = Foreign.foreign "CFFileSecurityCopyAccessControlList" ((ptr CFFileSecurity.t) @-> (ptr (ptr void)) @-> returning bool) -let _CFFileSecurityCopyGroupUUID = Foreign.foreign "CFFileSecurityCopyGroupUUID" ((ptr CFFileSecurity.t) @-> (ptr (ptr CFUUID.t)) @-> returning bool) -let _CFFileSecurityCopyOwnerUUID = Foreign.foreign "CFFileSecurityCopyOwnerUUID" ((ptr CFFileSecurity.t) @-> (ptr (ptr CFUUID.t)) @-> returning bool) -let _CFFileSecurityCreate = Foreign.foreign "CFFileSecurityCreate" ((ptr CFAllocator.t) @-> returning (ptr CFFileSecurity.t)) -let _CFFileSecurityCreateCopy = Foreign.foreign "CFFileSecurityCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFFileSecurity.t) @-> returning (ptr CFFileSecurity.t)) -let _CFFileSecurityGetGroup = Foreign.foreign "CFFileSecurityGetGroup" ((ptr CFFileSecurity.t) @-> (ptr uint) @-> returning bool) -let _CFFileSecurityGetMode = Foreign.foreign "CFFileSecurityGetMode" ((ptr CFFileSecurity.t) @-> (ptr ushort) @-> returning bool) -let _CFFileSecurityGetOwner = Foreign.foreign "CFFileSecurityGetOwner" ((ptr CFFileSecurity.t) @-> (ptr uint) @-> returning bool) -let _CFFileSecurityGetTypeID = Foreign.foreign "CFFileSecurityGetTypeID" (void @-> returning ullong) -let _CFFileSecuritySetAccessControlList = Foreign.foreign "CFFileSecuritySetAccessControlList" ((ptr CFFileSecurity.t) @-> (ptr void) @-> returning bool) -let _CFFileSecuritySetGroup = Foreign.foreign "CFFileSecuritySetGroup" ((ptr CFFileSecurity.t) @-> uint @-> returning bool) -let _CFFileSecuritySetGroupUUID = Foreign.foreign "CFFileSecuritySetGroupUUID" ((ptr CFFileSecurity.t) @-> (ptr CFUUID.t) @-> returning bool) -let _CFFileSecuritySetMode = Foreign.foreign "CFFileSecuritySetMode" ((ptr CFFileSecurity.t) @-> ushort @-> returning bool) -let _CFFileSecuritySetOwner = Foreign.foreign "CFFileSecuritySetOwner" ((ptr CFFileSecurity.t) @-> uint @-> returning bool) -let _CFFileSecuritySetOwnerUUID = Foreign.foreign "CFFileSecuritySetOwnerUUID" ((ptr CFFileSecurity.t) @-> (ptr CFUUID.t) @-> returning bool) -let _CFGetAllocator = Foreign.foreign "CFGetAllocator" (id @-> returning (ptr CFAllocator.t)) -let _CFGetRetainCount = Foreign.foreign "CFGetRetainCount" (id @-> returning llong) -let _CFGetTypeID = Foreign.foreign "CFGetTypeID" (id @-> returning ullong) -let _CFGregorianDateGetAbsoluteTime = Foreign.foreign "CFGregorianDateGetAbsoluteTime" (CFGregorianDate.t @-> (ptr CFTimeZone.t) @-> returning double) -let _CFGregorianDateIsValid = Foreign.foreign "CFGregorianDateIsValid" (CFGregorianDate.t @-> ullong @-> returning bool) -let _CFHash = Foreign.foreign "CFHash" (id @-> returning ullong) -let _CFLocaleCopyAvailableLocaleIdentifiers = Foreign.foreign "CFLocaleCopyAvailableLocaleIdentifiers" (void @-> returning (ptr CFArray.t)) -let _CFLocaleCopyCommonISOCurrencyCodes = Foreign.foreign "CFLocaleCopyCommonISOCurrencyCodes" (void @-> returning (ptr CFArray.t)) -let _CFLocaleCopyCurrent = Foreign.foreign "CFLocaleCopyCurrent" (void @-> returning (ptr CFLocale.t)) -let _CFLocaleCopyDisplayNameForPropertyValue = Foreign.foreign "CFLocaleCopyDisplayNameForPropertyValue" ((ptr CFLocale.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFLocaleCopyISOCountryCodes = Foreign.foreign "CFLocaleCopyISOCountryCodes" (void @-> returning (ptr CFArray.t)) -let _CFLocaleCopyISOCurrencyCodes = Foreign.foreign "CFLocaleCopyISOCurrencyCodes" (void @-> returning (ptr CFArray.t)) -let _CFLocaleCopyISOLanguageCodes = Foreign.foreign "CFLocaleCopyISOLanguageCodes" (void @-> returning (ptr CFArray.t)) -let _CFLocaleCopyPreferredLanguages = Foreign.foreign "CFLocaleCopyPreferredLanguages" (void @-> returning (ptr CFArray.t)) -let _CFLocaleCreate = Foreign.foreign "CFLocaleCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFLocale.t)) -let _CFLocaleCreateCanonicalLanguageIdentifierFromString = Foreign.foreign "CFLocaleCreateCanonicalLanguageIdentifierFromString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFLocaleCreateCanonicalLocaleIdentifierFromScriptManagerCodes = Foreign.foreign "CFLocaleCreateCanonicalLocaleIdentifierFromScriptManagerCodes" ((ptr CFAllocator.t) @-> short @-> short @-> returning (ptr CFString.t)) -let _CFLocaleCreateCanonicalLocaleIdentifierFromString = Foreign.foreign "CFLocaleCreateCanonicalLocaleIdentifierFromString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFLocaleCreateComponentsFromLocaleIdentifier = Foreign.foreign "CFLocaleCreateComponentsFromLocaleIdentifier" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFDictionary.t)) -let _CFLocaleCreateCopy = Foreign.foreign "CFLocaleCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFLocale.t) @-> returning (ptr CFLocale.t)) -let _CFLocaleCreateLocaleIdentifierFromComponents = Foreign.foreign "CFLocaleCreateLocaleIdentifierFromComponents" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFString.t)) -let _CFLocaleCreateLocaleIdentifierFromWindowsLocaleCode = Foreign.foreign "CFLocaleCreateLocaleIdentifierFromWindowsLocaleCode" ((ptr CFAllocator.t) @-> uint @-> returning (ptr CFString.t)) -let _CFLocaleGetIdentifier = Foreign.foreign "CFLocaleGetIdentifier" ((ptr CFLocale.t) @-> returning (ptr CFString.t)) -let _CFLocaleGetLanguageCharacterDirection = Foreign.foreign "CFLocaleGetLanguageCharacterDirection" ((ptr CFString.t) @-> returning llong) -let _CFLocaleGetLanguageLineDirection = Foreign.foreign "CFLocaleGetLanguageLineDirection" ((ptr CFString.t) @-> returning llong) -let _CFLocaleGetSystem = Foreign.foreign "CFLocaleGetSystem" (void @-> returning (ptr CFLocale.t)) -let _CFLocaleGetTypeID = Foreign.foreign "CFLocaleGetTypeID" (void @-> returning ullong) -let _CFLocaleGetValue = Foreign.foreign "CFLocaleGetValue" ((ptr CFLocale.t) @-> (ptr CFString.t) @-> returning id) -let _CFLocaleGetWindowsLocaleCodeFromLocaleIdentifier = Foreign.foreign "CFLocaleGetWindowsLocaleCodeFromLocaleIdentifier" ((ptr CFString.t) @-> returning uint) -let _CFMachPortCreate = Foreign.foreign "CFMachPortCreate" ((ptr CFAllocator.t) @-> Foreign.funptr ((ptr CFMachPort.t) @-> (ptr void) @-> llong @-> (ptr void) @-> returning void) @-> (ptr CFMachPortContext.t) @-> (ptr bool) @-> returning (ptr CFMachPort.t)) -let _CFMachPortCreateRunLoopSource = Foreign.foreign "CFMachPortCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFMachPort.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) -let _CFMachPortCreateWithPort = Foreign.foreign "CFMachPortCreateWithPort" ((ptr CFAllocator.t) @-> uint @-> Foreign.funptr ((ptr CFMachPort.t) @-> (ptr void) @-> llong @-> (ptr void) @-> returning void) @-> (ptr CFMachPortContext.t) @-> (ptr bool) @-> returning (ptr CFMachPort.t)) -let _CFMachPortGetContext = Foreign.foreign "CFMachPortGetContext" ((ptr CFMachPort.t) @-> (ptr CFMachPortContext.t) @-> returning void) -let _CFMachPortGetInvalidationCallBack = Foreign.foreign "CFMachPortGetInvalidationCallBack" ((ptr CFMachPort.t) @-> returning (ptr (ptr void))) -let _CFMachPortGetPort = Foreign.foreign "CFMachPortGetPort" ((ptr CFMachPort.t) @-> returning uint) -let _CFMachPortGetTypeID = Foreign.foreign "CFMachPortGetTypeID" (void @-> returning ullong) -let _CFMachPortInvalidate = Foreign.foreign "CFMachPortInvalidate" ((ptr CFMachPort.t) @-> returning void) -let _CFMachPortIsValid = Foreign.foreign "CFMachPortIsValid" ((ptr CFMachPort.t) @-> returning bool) -let _CFMachPortSetInvalidationCallBack = Foreign.foreign "CFMachPortSetInvalidationCallBack" ((ptr CFMachPort.t) @-> Foreign.funptr ((ptr CFMachPort.t) @-> (ptr void) @-> returning void) @-> returning void) -let _CFMakeCollectable = Foreign.foreign "CFMakeCollectable" (id @-> returning id) -let _CFMessagePortCreateLocal = Foreign.foreign "CFMessagePortCreateLocal" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> Foreign.funptr ((ptr CFMessagePort.t) @-> int @-> (ptr CFData.t) @-> (ptr void) @-> returning (ptr CFData.t)) @-> (ptr CFMessagePortContext.t) @-> (ptr bool) @-> returning (ptr CFMessagePort.t)) -let _CFMessagePortCreateRemote = Foreign.foreign "CFMessagePortCreateRemote" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFMessagePort.t)) -let _CFMessagePortCreateRunLoopSource = Foreign.foreign "CFMessagePortCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFMessagePort.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) -let _CFMessagePortGetContext = Foreign.foreign "CFMessagePortGetContext" ((ptr CFMessagePort.t) @-> (ptr CFMessagePortContext.t) @-> returning void) -let _CFMessagePortGetInvalidationCallBack = Foreign.foreign "CFMessagePortGetInvalidationCallBack" ((ptr CFMessagePort.t) @-> returning (ptr (ptr void))) -let _CFMessagePortGetName = Foreign.foreign "CFMessagePortGetName" ((ptr CFMessagePort.t) @-> returning (ptr CFString.t)) -let _CFMessagePortGetTypeID = Foreign.foreign "CFMessagePortGetTypeID" (void @-> returning ullong) -let _CFMessagePortInvalidate = Foreign.foreign "CFMessagePortInvalidate" ((ptr CFMessagePort.t) @-> returning void) -let _CFMessagePortIsRemote = Foreign.foreign "CFMessagePortIsRemote" ((ptr CFMessagePort.t) @-> returning bool) -let _CFMessagePortIsValid = Foreign.foreign "CFMessagePortIsValid" ((ptr CFMessagePort.t) @-> returning bool) -let _CFMessagePortSendRequest = Foreign.foreign "CFMessagePortSendRequest" ((ptr CFMessagePort.t) @-> int @-> (ptr CFData.t) @-> double @-> double @-> (ptr CFString.t) @-> (ptr (ptr CFData.t)) @-> returning int) -let _CFMessagePortSetDispatchQueue = Foreign.foreign "CFMessagePortSetDispatchQueue" ((ptr CFMessagePort.t) @-> id @-> returning void) -let _CFMessagePortSetInvalidationCallBack = Foreign.foreign "CFMessagePortSetInvalidationCallBack" ((ptr CFMessagePort.t) @-> Foreign.funptr ((ptr CFMessagePort.t) @-> (ptr void) @-> returning void) @-> returning void) -let _CFMessagePortSetName = Foreign.foreign "CFMessagePortSetName" ((ptr CFMessagePort.t) @-> (ptr CFString.t) @-> returning bool) -let _CFNotificationCenterAddObserver = Foreign.foreign "CFNotificationCenterAddObserver" ((ptr CFNotificationCenter.t) @-> (ptr void) @-> Foreign.funptr ((ptr CFNotificationCenter.t) @-> (ptr void) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr CFDictionary.t) @-> returning void) @-> (ptr CFString.t) @-> (ptr void) @-> llong @-> returning void) -let _CFNotificationCenterGetDarwinNotifyCenter = Foreign.foreign "CFNotificationCenterGetDarwinNotifyCenter" (void @-> returning (ptr CFNotificationCenter.t)) -let _CFNotificationCenterGetDistributedCenter = Foreign.foreign "CFNotificationCenterGetDistributedCenter" (void @-> returning (ptr CFNotificationCenter.t)) -let _CFNotificationCenterGetLocalCenter = Foreign.foreign "CFNotificationCenterGetLocalCenter" (void @-> returning (ptr CFNotificationCenter.t)) -let _CFNotificationCenterGetTypeID = Foreign.foreign "CFNotificationCenterGetTypeID" (void @-> returning ullong) -let _CFNotificationCenterPostNotification = Foreign.foreign "CFNotificationCenterPostNotification" ((ptr CFNotificationCenter.t) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr CFDictionary.t) @-> bool @-> returning void) -let _CFNotificationCenterPostNotificationWithOptions = Foreign.foreign "CFNotificationCenterPostNotificationWithOptions" ((ptr CFNotificationCenter.t) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr CFDictionary.t) @-> ullong @-> returning void) -let _CFNotificationCenterRemoveEveryObserver = Foreign.foreign "CFNotificationCenterRemoveEveryObserver" ((ptr CFNotificationCenter.t) @-> (ptr void) @-> returning void) -let _CFNotificationCenterRemoveObserver = Foreign.foreign "CFNotificationCenterRemoveObserver" ((ptr CFNotificationCenter.t) @-> (ptr void) @-> (ptr CFString.t) @-> (ptr void) @-> returning void) -let _CFNullGetTypeID = Foreign.foreign "CFNullGetTypeID" (void @-> returning ullong) -let _CFNumberCompare = Foreign.foreign "CFNumberCompare" ((ptr CFNumber.t) @-> (ptr CFNumber.t) @-> (ptr void) @-> returning llong) -let _CFNumberCreate = Foreign.foreign "CFNumberCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr void) @-> returning (ptr CFNumber.t)) -let _CFNumberFormatterCopyProperty = Foreign.foreign "CFNumberFormatterCopyProperty" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> returning id) -let _CFNumberFormatterCreate = Foreign.foreign "CFNumberFormatterCreate" ((ptr CFAllocator.t) @-> (ptr CFLocale.t) @-> llong @-> returning (ptr CFNumberFormatter.t)) -let _CFNumberFormatterCreateNumberFromString = Foreign.foreign "CFNumberFormatterCreateNumberFromString" ((ptr CFAllocator.t) @-> (ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> ullong @-> returning (ptr CFNumber.t)) -let _CFNumberFormatterCreateStringWithNumber = Foreign.foreign "CFNumberFormatterCreateStringWithNumber" ((ptr CFAllocator.t) @-> (ptr CFNumberFormatter.t) @-> (ptr CFNumber.t) @-> returning (ptr CFString.t)) -let _CFNumberFormatterCreateStringWithValue = Foreign.foreign "CFNumberFormatterCreateStringWithValue" ((ptr CFAllocator.t) @-> (ptr CFNumberFormatter.t) @-> llong @-> (ptr void) @-> returning (ptr CFString.t)) -let _CFNumberFormatterGetDecimalInfoForCurrencyCode = Foreign.foreign "CFNumberFormatterGetDecimalInfoForCurrencyCode" ((ptr CFString.t) @-> (ptr int) @-> (ptr double) @-> returning bool) -let _CFNumberFormatterGetFormat = Foreign.foreign "CFNumberFormatterGetFormat" ((ptr CFNumberFormatter.t) @-> returning (ptr CFString.t)) -let _CFNumberFormatterGetLocale = Foreign.foreign "CFNumberFormatterGetLocale" ((ptr CFNumberFormatter.t) @-> returning (ptr CFLocale.t)) -let _CFNumberFormatterGetStyle = Foreign.foreign "CFNumberFormatterGetStyle" ((ptr CFNumberFormatter.t) @-> returning llong) -let _CFNumberFormatterGetTypeID = Foreign.foreign "CFNumberFormatterGetTypeID" (void @-> returning ullong) -let _CFNumberFormatterGetValueFromString = Foreign.foreign "CFNumberFormatterGetValueFromString" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> llong @-> (ptr void) @-> returning bool) -let _CFNumberFormatterSetFormat = Foreign.foreign "CFNumberFormatterSetFormat" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> returning void) -let _CFNumberFormatterSetProperty = Foreign.foreign "CFNumberFormatterSetProperty" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> id @-> returning void) -let _CFNumberGetByteSize = Foreign.foreign "CFNumberGetByteSize" ((ptr CFNumber.t) @-> returning llong) -let _CFNumberGetType = Foreign.foreign "CFNumberGetType" ((ptr CFNumber.t) @-> returning llong) -let _CFNumberGetTypeID = Foreign.foreign "CFNumberGetTypeID" (void @-> returning ullong) -let _CFNumberGetValue = Foreign.foreign "CFNumberGetValue" ((ptr CFNumber.t) @-> llong @-> (ptr void) @-> returning bool) -let _CFNumberIsFloatType = Foreign.foreign "CFNumberIsFloatType" ((ptr CFNumber.t) @-> returning bool) -let _CFPlugInAddInstanceForFactory = Foreign.foreign "CFPlugInAddInstanceForFactory" ((ptr CFUUID.t) @-> returning void) -let _CFPlugInCreate = Foreign.foreign "CFPlugInCreate" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFBundle.t)) -let _CFPlugInFindFactoriesForPlugInType = Foreign.foreign "CFPlugInFindFactoriesForPlugInType" ((ptr CFUUID.t) @-> returning (ptr CFArray.t)) -let _CFPlugInFindFactoriesForPlugInTypeInPlugIn = Foreign.foreign "CFPlugInFindFactoriesForPlugInTypeInPlugIn" ((ptr CFUUID.t) @-> (ptr CFBundle.t) @-> returning (ptr CFArray.t)) -let _CFPlugInGetBundle = Foreign.foreign "CFPlugInGetBundle" ((ptr CFBundle.t) @-> returning (ptr CFBundle.t)) -let _CFPlugInGetTypeID = Foreign.foreign "CFPlugInGetTypeID" (void @-> returning ullong) -let _CFPlugInInstanceCreate = Foreign.foreign "CFPlugInInstanceCreate" ((ptr CFAllocator.t) @-> (ptr CFUUID.t) @-> (ptr CFUUID.t) @-> returning (ptr void)) -let _CFPlugInInstanceCreateWithInstanceDataSize = Foreign.foreign "CFPlugInInstanceCreateWithInstanceDataSize" ((ptr CFAllocator.t) @-> llong @-> Foreign.funptr ((ptr void) @-> returning void) @-> (ptr CFString.t) @-> Foreign.funptr ((ptr CFPlugInInstance.t) @-> (ptr CFString.t) @-> (ptr (ptr void)) @-> returning bool) @-> returning (ptr CFPlugInInstance.t)) -let _CFPlugInInstanceGetFactoryName = Foreign.foreign "CFPlugInInstanceGetFactoryName" ((ptr CFPlugInInstance.t) @-> returning (ptr CFString.t)) -let _CFPlugInInstanceGetInstanceData = Foreign.foreign "CFPlugInInstanceGetInstanceData" ((ptr CFPlugInInstance.t) @-> returning (ptr void)) -let _CFPlugInInstanceGetInterfaceFunctionTable = Foreign.foreign "CFPlugInInstanceGetInterfaceFunctionTable" ((ptr CFPlugInInstance.t) @-> (ptr CFString.t) @-> (ptr (ptr void)) @-> returning bool) -let _CFPlugInInstanceGetTypeID = Foreign.foreign "CFPlugInInstanceGetTypeID" (void @-> returning ullong) -let _CFPlugInIsLoadOnDemand = Foreign.foreign "CFPlugInIsLoadOnDemand" ((ptr CFBundle.t) @-> returning bool) -let _CFPlugInRegisterFactoryFunction = Foreign.foreign "CFPlugInRegisterFactoryFunction" ((ptr CFUUID.t) @-> Foreign.funptr ((ptr CFAllocator.t) @-> (ptr CFUUID.t) @-> returning (ptr void)) @-> returning bool) -let _CFPlugInRegisterFactoryFunctionByName = Foreign.foreign "CFPlugInRegisterFactoryFunctionByName" ((ptr CFUUID.t) @-> (ptr CFBundle.t) @-> (ptr CFString.t) @-> returning bool) -let _CFPlugInRegisterPlugInType = Foreign.foreign "CFPlugInRegisterPlugInType" ((ptr CFUUID.t) @-> (ptr CFUUID.t) @-> returning bool) -let _CFPlugInRemoveInstanceForFactory = Foreign.foreign "CFPlugInRemoveInstanceForFactory" ((ptr CFUUID.t) @-> returning void) -let _CFPlugInSetLoadOnDemand = Foreign.foreign "CFPlugInSetLoadOnDemand" ((ptr CFBundle.t) @-> bool @-> returning void) -let _CFPlugInUnregisterFactory = Foreign.foreign "CFPlugInUnregisterFactory" ((ptr CFUUID.t) @-> returning bool) -let _CFPlugInUnregisterPlugInType = Foreign.foreign "CFPlugInUnregisterPlugInType" ((ptr CFUUID.t) @-> (ptr CFUUID.t) @-> returning bool) -let _CFPreferencesAddSuitePreferencesToApp = Foreign.foreign "CFPreferencesAddSuitePreferencesToApp" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) -let _CFPreferencesAppSynchronize = Foreign.foreign "CFPreferencesAppSynchronize" ((ptr CFString.t) @-> returning bool) -let _CFPreferencesAppValueIsForced = Foreign.foreign "CFPreferencesAppValueIsForced" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) -let _CFPreferencesCopyAppValue = Foreign.foreign "CFPreferencesCopyAppValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr void)) -let _CFPreferencesCopyApplicationList = Foreign.foreign "CFPreferencesCopyApplicationList" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) -let _CFPreferencesCopyKeyList = Foreign.foreign "CFPreferencesCopyKeyList" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) -let _CFPreferencesCopyMultiple = Foreign.foreign "CFPreferencesCopyMultiple" ((ptr CFArray.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFDictionary.t)) -let _CFPreferencesCopyValue = Foreign.foreign "CFPreferencesCopyValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr void)) -let _CFPreferencesGetAppBooleanValue = Foreign.foreign "CFPreferencesGetAppBooleanValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr bool) @-> returning bool) -let _CFPreferencesGetAppIntegerValue = Foreign.foreign "CFPreferencesGetAppIntegerValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr bool) @-> returning llong) -let _CFPreferencesRemoveSuitePreferencesFromApp = Foreign.foreign "CFPreferencesRemoveSuitePreferencesFromApp" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) -let _CFPreferencesSetAppValue = Foreign.foreign "CFPreferencesSetAppValue" ((ptr CFString.t) @-> (ptr void) @-> (ptr CFString.t) @-> returning void) -let _CFPreferencesSetMultiple = Foreign.foreign "CFPreferencesSetMultiple" ((ptr CFDictionary.t) @-> (ptr CFArray.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning void) -let _CFPreferencesSetValue = Foreign.foreign "CFPreferencesSetValue" ((ptr CFString.t) @-> (ptr void) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning void) -let _CFPreferencesSynchronize = Foreign.foreign "CFPreferencesSynchronize" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) -let _CFPropertyListCreateData = Foreign.foreign "CFPropertyListCreateData" ((ptr CFAllocator.t) @-> (ptr void) @-> llong @-> ullong @-> (ptr (ptr CFError.t)) @-> returning (ptr CFData.t)) -let _CFPropertyListCreateDeepCopy = Foreign.foreign "CFPropertyListCreateDeepCopy" ((ptr CFAllocator.t) @-> (ptr void) @-> ullong @-> returning (ptr void)) -let _CFPropertyListCreateFromStream = Foreign.foreign "CFPropertyListCreateFromStream" ((ptr CFAllocator.t) @-> (ptr CFReadStream.t) @-> llong @-> ullong @-> (ptr llong) @-> (ptr (ptr CFString.t)) @-> returning (ptr void)) -let _CFPropertyListCreateFromXMLData = Foreign.foreign "CFPropertyListCreateFromXMLData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> ullong @-> (ptr (ptr CFString.t)) @-> returning (ptr void)) -let _CFPropertyListCreateWithData = Foreign.foreign "CFPropertyListCreateWithData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> ullong @-> (ptr llong) @-> (ptr (ptr CFError.t)) @-> returning (ptr void)) -let _CFPropertyListCreateWithStream = Foreign.foreign "CFPropertyListCreateWithStream" ((ptr CFAllocator.t) @-> (ptr CFReadStream.t) @-> llong @-> ullong @-> (ptr llong) @-> (ptr (ptr CFError.t)) @-> returning (ptr void)) -let _CFPropertyListCreateXMLData = Foreign.foreign "CFPropertyListCreateXMLData" ((ptr CFAllocator.t) @-> (ptr void) @-> returning (ptr CFData.t)) -let _CFPropertyListIsValid = Foreign.foreign "CFPropertyListIsValid" ((ptr void) @-> llong @-> returning bool) -let _CFPropertyListWrite = Foreign.foreign "CFPropertyListWrite" ((ptr void) @-> (ptr CFWriteStream.t) @-> llong @-> ullong @-> (ptr (ptr CFError.t)) @-> returning llong) -let _CFPropertyListWriteToStream = Foreign.foreign "CFPropertyListWriteToStream" ((ptr void) @-> (ptr CFWriteStream.t) @-> llong @-> (ptr (ptr CFString.t)) @-> returning llong) +let _CFCopyDescription = Foreign.foreign ~stub:true "CFCopyDescription" (id @-> returning (ptr CFString.t)) +let _CFCopyHomeDirectoryURL = Foreign.foreign ~stub:true "CFCopyHomeDirectoryURL" (void @-> returning (ptr CFURL.t)) +let _CFCopyTypeIDDescription = Foreign.foreign ~stub:true "CFCopyTypeIDDescription" (ullong @-> returning (ptr CFString.t)) +let _CFDataAppendBytes = Foreign.foreign ~stub:true "CFDataAppendBytes" ((ptr CFData.t) @-> string @-> llong @-> returning void) +let _CFDataCreate = Foreign.foreign ~stub:true "CFDataCreate" ((ptr CFAllocator.t) @-> string @-> llong @-> returning (ptr CFData.t)) +let _CFDataCreateCopy = Foreign.foreign ~stub:true "CFDataCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CFData.t)) +let _CFDataCreateMutable = Foreign.foreign ~stub:true "CFDataCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFData.t)) +let _CFDataCreateMutableCopy = Foreign.foreign ~stub:true "CFDataCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFData.t) @-> returning (ptr CFData.t)) +let _CFDataCreateWithBytesNoCopy = Foreign.foreign ~stub:true "CFDataCreateWithBytesNoCopy" ((ptr CFAllocator.t) @-> string @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFData.t)) +let _CFDataDeleteBytes = Foreign.foreign ~stub:true "CFDataDeleteBytes" ((ptr CFData.t) @-> CFRange.t @-> returning void) +let _CFDataFind = Foreign.foreign ~stub:true "CFDataFind" ((ptr CFData.t) @-> (ptr CFData.t) @-> CFRange.t @-> ullong @-> returning CFRange.t) +let _CFDataGetBytePtr = Foreign.foreign ~stub:true "CFDataGetBytePtr" ((ptr CFData.t) @-> returning string) +let _CFDataGetBytes = Foreign.foreign ~stub:true "CFDataGetBytes" ((ptr CFData.t) @-> CFRange.t @-> string @-> returning void) +let _CFDataGetLength = Foreign.foreign ~stub:true "CFDataGetLength" ((ptr CFData.t) @-> returning llong) +let _CFDataGetMutableBytePtr = Foreign.foreign ~stub:true "CFDataGetMutableBytePtr" ((ptr CFData.t) @-> returning string) +let _CFDataGetTypeID = Foreign.foreign ~stub:true "CFDataGetTypeID" (void @-> returning ullong) +let _CFDataIncreaseLength = Foreign.foreign ~stub:true "CFDataIncreaseLength" ((ptr CFData.t) @-> llong @-> returning void) +let _CFDataReplaceBytes = Foreign.foreign ~stub:true "CFDataReplaceBytes" ((ptr CFData.t) @-> CFRange.t @-> string @-> llong @-> returning void) +let _CFDataSetLength = Foreign.foreign ~stub:true "CFDataSetLength" ((ptr CFData.t) @-> llong @-> returning void) +let _CFDateCompare = Foreign.foreign ~stub:true "CFDateCompare" ((ptr CFDate.t) @-> (ptr CFDate.t) @-> (ptr void) @-> returning llong) +let _CFDateCreate = Foreign.foreign ~stub:true "CFDateCreate" ((ptr CFAllocator.t) @-> double @-> returning (ptr CFDate.t)) +let _CFDateFormatterCopyProperty = Foreign.foreign ~stub:true "CFDateFormatterCopyProperty" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> returning id) +let _CFDateFormatterCreate = Foreign.foreign ~stub:true "CFDateFormatterCreate" ((ptr CFAllocator.t) @-> (ptr CFLocale.t) @-> llong @-> llong @-> returning (ptr CFDateFormatter.t)) +let _CFDateFormatterCreateDateFormatFromTemplate = Foreign.foreign ~stub:true "CFDateFormatterCreateDateFormatFromTemplate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> ullong @-> (ptr CFLocale.t) @-> returning (ptr CFString.t)) +let _CFDateFormatterCreateDateFromString = Foreign.foreign ~stub:true "CFDateFormatterCreateDateFromString" ((ptr CFAllocator.t) @-> (ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> returning (ptr CFDate.t)) +let _CFDateFormatterCreateISO8601Formatter = Foreign.foreign ~stub:true "CFDateFormatterCreateISO8601Formatter" ((ptr CFAllocator.t) @-> ullong @-> returning (ptr CFDateFormatter.t)) +let _CFDateFormatterCreateStringWithAbsoluteTime = Foreign.foreign ~stub:true "CFDateFormatterCreateStringWithAbsoluteTime" ((ptr CFAllocator.t) @-> (ptr CFDateFormatter.t) @-> double @-> returning (ptr CFString.t)) +let _CFDateFormatterCreateStringWithDate = Foreign.foreign ~stub:true "CFDateFormatterCreateStringWithDate" ((ptr CFAllocator.t) @-> (ptr CFDateFormatter.t) @-> (ptr CFDate.t) @-> returning (ptr CFString.t)) +let _CFDateFormatterGetAbsoluteTimeFromString = Foreign.foreign ~stub:true "CFDateFormatterGetAbsoluteTimeFromString" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> (ptr double) @-> returning bool) +let _CFDateFormatterGetDateStyle = Foreign.foreign ~stub:true "CFDateFormatterGetDateStyle" ((ptr CFDateFormatter.t) @-> returning llong) +let _CFDateFormatterGetFormat = Foreign.foreign ~stub:true "CFDateFormatterGetFormat" ((ptr CFDateFormatter.t) @-> returning (ptr CFString.t)) +let _CFDateFormatterGetLocale = Foreign.foreign ~stub:true "CFDateFormatterGetLocale" ((ptr CFDateFormatter.t) @-> returning (ptr CFLocale.t)) +let _CFDateFormatterGetTimeStyle = Foreign.foreign ~stub:true "CFDateFormatterGetTimeStyle" ((ptr CFDateFormatter.t) @-> returning llong) +let _CFDateFormatterGetTypeID = Foreign.foreign ~stub:true "CFDateFormatterGetTypeID" (void @-> returning ullong) +let _CFDateFormatterSetFormat = Foreign.foreign ~stub:true "CFDateFormatterSetFormat" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> returning void) +let _CFDateFormatterSetProperty = Foreign.foreign ~stub:true "CFDateFormatterSetProperty" ((ptr CFDateFormatter.t) @-> (ptr CFString.t) @-> id @-> returning void) +let _CFDateGetAbsoluteTime = Foreign.foreign ~stub:true "CFDateGetAbsoluteTime" ((ptr CFDate.t) @-> returning double) +let _CFDateGetTimeIntervalSinceDate = Foreign.foreign ~stub:true "CFDateGetTimeIntervalSinceDate" ((ptr CFDate.t) @-> (ptr CFDate.t) @-> returning double) +let _CFDateGetTypeID = Foreign.foreign ~stub:true "CFDateGetTypeID" (void @-> returning ullong) +let _CFDictionaryAddValue = Foreign.foreign ~stub:true "CFDictionaryAddValue" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr void) @-> returning void) +let _CFDictionaryApplyFunction = Foreign.foreign ~stub:true "CFDictionaryApplyFunction" ((ptr CFDictionary.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CFDictionaryContainsKey = Foreign.foreign ~stub:true "CFDictionaryContainsKey" ((ptr CFDictionary.t) @-> (ptr void) @-> returning bool) +let _CFDictionaryContainsValue = Foreign.foreign ~stub:true "CFDictionaryContainsValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning bool) +let _CFDictionaryCreate = Foreign.foreign ~stub:true "CFDictionaryCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> (ptr (ptr void)) @-> llong @-> (ptr CFDictionaryKeyCallBacks.t) @-> (ptr CFDictionaryValueCallBacks.t) @-> returning (ptr CFDictionary.t)) +let _CFDictionaryCreateCopy = Foreign.foreign ~stub:true "CFDictionaryCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFDictionary.t)) +let _CFDictionaryCreateMutable = Foreign.foreign ~stub:true "CFDictionaryCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFDictionaryKeyCallBacks.t) @-> (ptr CFDictionaryValueCallBacks.t) @-> returning (ptr CFDictionary.t)) +let _CFDictionaryCreateMutableCopy = Foreign.foreign ~stub:true "CFDictionaryCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFDictionary.t) @-> returning (ptr CFDictionary.t)) +let _CFDictionaryGetCount = Foreign.foreign ~stub:true "CFDictionaryGetCount" ((ptr CFDictionary.t) @-> returning llong) +let _CFDictionaryGetCountOfKey = Foreign.foreign ~stub:true "CFDictionaryGetCountOfKey" ((ptr CFDictionary.t) @-> (ptr void) @-> returning llong) +let _CFDictionaryGetCountOfValue = Foreign.foreign ~stub:true "CFDictionaryGetCountOfValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning llong) +let _CFDictionaryGetKeysAndValues = Foreign.foreign ~stub:true "CFDictionaryGetKeysAndValues" ((ptr CFDictionary.t) @-> (ptr (ptr void)) @-> (ptr (ptr void)) @-> returning void) +let _CFDictionaryGetTypeID = Foreign.foreign ~stub:true "CFDictionaryGetTypeID" (void @-> returning ullong) +let _CFDictionaryGetValue = Foreign.foreign ~stub:true "CFDictionaryGetValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning (ptr void)) +let _CFDictionaryGetValueIfPresent = Foreign.foreign ~stub:true "CFDictionaryGetValueIfPresent" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr (ptr void)) @-> returning bool) +let _CFDictionaryRemoveAllValues = Foreign.foreign ~stub:true "CFDictionaryRemoveAllValues" ((ptr CFDictionary.t) @-> returning void) +let _CFDictionaryRemoveValue = Foreign.foreign ~stub:true "CFDictionaryRemoveValue" ((ptr CFDictionary.t) @-> (ptr void) @-> returning void) +let _CFDictionaryReplaceValue = Foreign.foreign ~stub:true "CFDictionaryReplaceValue" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr void) @-> returning void) +let _CFDictionarySetValue = Foreign.foreign ~stub:true "CFDictionarySetValue" ((ptr CFDictionary.t) @-> (ptr void) @-> (ptr void) @-> returning void) +let _CFEqual = Foreign.foreign ~stub:true "CFEqual" (id @-> id @-> returning bool) +let _CFErrorCopyDescription = Foreign.foreign ~stub:true "CFErrorCopyDescription" ((ptr CFError.t) @-> returning (ptr CFString.t)) +let _CFErrorCopyFailureReason = Foreign.foreign ~stub:true "CFErrorCopyFailureReason" ((ptr CFError.t) @-> returning (ptr CFString.t)) +let _CFErrorCopyRecoverySuggestion = Foreign.foreign ~stub:true "CFErrorCopyRecoverySuggestion" ((ptr CFError.t) @-> returning (ptr CFString.t)) +let _CFErrorCopyUserInfo = Foreign.foreign ~stub:true "CFErrorCopyUserInfo" ((ptr CFError.t) @-> returning (ptr CFDictionary.t)) +let _CFErrorCreate = Foreign.foreign ~stub:true "CFErrorCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> (ptr CFDictionary.t) @-> returning (ptr CFError.t)) +let _CFErrorCreateWithUserInfoKeysAndValues = Foreign.foreign ~stub:true "CFErrorCreateWithUserInfoKeysAndValues" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> (ptr (ptr void)) @-> (ptr (ptr void)) @-> llong @-> returning (ptr CFError.t)) +let _CFErrorGetCode = Foreign.foreign ~stub:true "CFErrorGetCode" ((ptr CFError.t) @-> returning llong) +let _CFErrorGetDomain = Foreign.foreign ~stub:true "CFErrorGetDomain" ((ptr CFError.t) @-> returning (ptr CFString.t)) +let _CFErrorGetTypeID = Foreign.foreign ~stub:true "CFErrorGetTypeID" (void @-> returning ullong) +let _CFFileDescriptorCreate = Foreign.foreign ~stub:true "CFFileDescriptorCreate" ((ptr CFAllocator.t) @-> int @-> bool @-> Foreign.funptr ((ptr CFFileDescriptor.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFFileDescriptorContext.t) @-> returning (ptr CFFileDescriptor.t)) +let _CFFileDescriptorCreateRunLoopSource = Foreign.foreign ~stub:true "CFFileDescriptorCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFFileDescriptor.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) +let _CFFileDescriptorDisableCallBacks = Foreign.foreign ~stub:true "CFFileDescriptorDisableCallBacks" ((ptr CFFileDescriptor.t) @-> ullong @-> returning void) +let _CFFileDescriptorEnableCallBacks = Foreign.foreign ~stub:true "CFFileDescriptorEnableCallBacks" ((ptr CFFileDescriptor.t) @-> ullong @-> returning void) +let _CFFileDescriptorGetContext = Foreign.foreign ~stub:true "CFFileDescriptorGetContext" ((ptr CFFileDescriptor.t) @-> (ptr CFFileDescriptorContext.t) @-> returning void) +let _CFFileDescriptorGetNativeDescriptor = Foreign.foreign ~stub:true "CFFileDescriptorGetNativeDescriptor" ((ptr CFFileDescriptor.t) @-> returning int) +let _CFFileDescriptorGetTypeID = Foreign.foreign ~stub:true "CFFileDescriptorGetTypeID" (void @-> returning ullong) +let _CFFileDescriptorInvalidate = Foreign.foreign ~stub:true "CFFileDescriptorInvalidate" ((ptr CFFileDescriptor.t) @-> returning void) +let _CFFileDescriptorIsValid = Foreign.foreign ~stub:true "CFFileDescriptorIsValid" ((ptr CFFileDescriptor.t) @-> returning bool) +let _CFFileSecurityClearProperties = Foreign.foreign ~stub:true "CFFileSecurityClearProperties" ((ptr CFFileSecurity.t) @-> ullong @-> returning bool) +let _CFFileSecurityCopyAccessControlList = Foreign.foreign ~stub:true "CFFileSecurityCopyAccessControlList" ((ptr CFFileSecurity.t) @-> (ptr (ptr void)) @-> returning bool) +let _CFFileSecurityCopyGroupUUID = Foreign.foreign ~stub:true "CFFileSecurityCopyGroupUUID" ((ptr CFFileSecurity.t) @-> (ptr (ptr CFUUID.t)) @-> returning bool) +let _CFFileSecurityCopyOwnerUUID = Foreign.foreign ~stub:true "CFFileSecurityCopyOwnerUUID" ((ptr CFFileSecurity.t) @-> (ptr (ptr CFUUID.t)) @-> returning bool) +let _CFFileSecurityCreate = Foreign.foreign ~stub:true "CFFileSecurityCreate" ((ptr CFAllocator.t) @-> returning (ptr CFFileSecurity.t)) +let _CFFileSecurityCreateCopy = Foreign.foreign ~stub:true "CFFileSecurityCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFFileSecurity.t) @-> returning (ptr CFFileSecurity.t)) +let _CFFileSecurityGetGroup = Foreign.foreign ~stub:true "CFFileSecurityGetGroup" ((ptr CFFileSecurity.t) @-> (ptr uint) @-> returning bool) +let _CFFileSecurityGetMode = Foreign.foreign ~stub:true "CFFileSecurityGetMode" ((ptr CFFileSecurity.t) @-> (ptr ushort) @-> returning bool) +let _CFFileSecurityGetOwner = Foreign.foreign ~stub:true "CFFileSecurityGetOwner" ((ptr CFFileSecurity.t) @-> (ptr uint) @-> returning bool) +let _CFFileSecurityGetTypeID = Foreign.foreign ~stub:true "CFFileSecurityGetTypeID" (void @-> returning ullong) +let _CFFileSecuritySetAccessControlList = Foreign.foreign ~stub:true "CFFileSecuritySetAccessControlList" ((ptr CFFileSecurity.t) @-> (ptr void) @-> returning bool) +let _CFFileSecuritySetGroup = Foreign.foreign ~stub:true "CFFileSecuritySetGroup" ((ptr CFFileSecurity.t) @-> uint @-> returning bool) +let _CFFileSecuritySetGroupUUID = Foreign.foreign ~stub:true "CFFileSecuritySetGroupUUID" ((ptr CFFileSecurity.t) @-> (ptr CFUUID.t) @-> returning bool) +let _CFFileSecuritySetMode = Foreign.foreign ~stub:true "CFFileSecuritySetMode" ((ptr CFFileSecurity.t) @-> ushort @-> returning bool) +let _CFFileSecuritySetOwner = Foreign.foreign ~stub:true "CFFileSecuritySetOwner" ((ptr CFFileSecurity.t) @-> uint @-> returning bool) +let _CFFileSecuritySetOwnerUUID = Foreign.foreign ~stub:true "CFFileSecuritySetOwnerUUID" ((ptr CFFileSecurity.t) @-> (ptr CFUUID.t) @-> returning bool) +let _CFGetAllocator = Foreign.foreign ~stub:true "CFGetAllocator" (id @-> returning (ptr CFAllocator.t)) +let _CFGetRetainCount = Foreign.foreign ~stub:true "CFGetRetainCount" (id @-> returning llong) +let _CFGetTypeID = Foreign.foreign ~stub:true "CFGetTypeID" (id @-> returning ullong) +let _CFGregorianDateGetAbsoluteTime = Foreign.foreign ~stub:true "CFGregorianDateGetAbsoluteTime" (CFGregorianDate.t @-> (ptr CFTimeZone.t) @-> returning double) +let _CFGregorianDateIsValid = Foreign.foreign ~stub:true "CFGregorianDateIsValid" (CFGregorianDate.t @-> ullong @-> returning bool) +let _CFHash = Foreign.foreign ~stub:true "CFHash" (id @-> returning ullong) +let _CFLocaleCopyAvailableLocaleIdentifiers = Foreign.foreign ~stub:true "CFLocaleCopyAvailableLocaleIdentifiers" (void @-> returning (ptr CFArray.t)) +let _CFLocaleCopyCommonISOCurrencyCodes = Foreign.foreign ~stub:true "CFLocaleCopyCommonISOCurrencyCodes" (void @-> returning (ptr CFArray.t)) +let _CFLocaleCopyCurrent = Foreign.foreign ~stub:true "CFLocaleCopyCurrent" (void @-> returning (ptr CFLocale.t)) +let _CFLocaleCopyDisplayNameForPropertyValue = Foreign.foreign ~stub:true "CFLocaleCopyDisplayNameForPropertyValue" ((ptr CFLocale.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFLocaleCopyISOCountryCodes = Foreign.foreign ~stub:true "CFLocaleCopyISOCountryCodes" (void @-> returning (ptr CFArray.t)) +let _CFLocaleCopyISOCurrencyCodes = Foreign.foreign ~stub:true "CFLocaleCopyISOCurrencyCodes" (void @-> returning (ptr CFArray.t)) +let _CFLocaleCopyISOLanguageCodes = Foreign.foreign ~stub:true "CFLocaleCopyISOLanguageCodes" (void @-> returning (ptr CFArray.t)) +let _CFLocaleCopyPreferredLanguages = Foreign.foreign ~stub:true "CFLocaleCopyPreferredLanguages" (void @-> returning (ptr CFArray.t)) +let _CFLocaleCreate = Foreign.foreign ~stub:true "CFLocaleCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFLocale.t)) +let _CFLocaleCreateCanonicalLanguageIdentifierFromString = Foreign.foreign ~stub:true "CFLocaleCreateCanonicalLanguageIdentifierFromString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFLocaleCreateCanonicalLocaleIdentifierFromScriptManagerCodes = Foreign.foreign ~stub:true "CFLocaleCreateCanonicalLocaleIdentifierFromScriptManagerCodes" ((ptr CFAllocator.t) @-> short @-> short @-> returning (ptr CFString.t)) +let _CFLocaleCreateCanonicalLocaleIdentifierFromString = Foreign.foreign ~stub:true "CFLocaleCreateCanonicalLocaleIdentifierFromString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFLocaleCreateComponentsFromLocaleIdentifier = Foreign.foreign ~stub:true "CFLocaleCreateComponentsFromLocaleIdentifier" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFDictionary.t)) +let _CFLocaleCreateCopy = Foreign.foreign ~stub:true "CFLocaleCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFLocale.t) @-> returning (ptr CFLocale.t)) +let _CFLocaleCreateLocaleIdentifierFromComponents = Foreign.foreign ~stub:true "CFLocaleCreateLocaleIdentifierFromComponents" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFString.t)) +let _CFLocaleCreateLocaleIdentifierFromWindowsLocaleCode = Foreign.foreign ~stub:true "CFLocaleCreateLocaleIdentifierFromWindowsLocaleCode" ((ptr CFAllocator.t) @-> uint @-> returning (ptr CFString.t)) +let _CFLocaleGetIdentifier = Foreign.foreign ~stub:true "CFLocaleGetIdentifier" ((ptr CFLocale.t) @-> returning (ptr CFString.t)) +let _CFLocaleGetLanguageCharacterDirection = Foreign.foreign ~stub:true "CFLocaleGetLanguageCharacterDirection" ((ptr CFString.t) @-> returning llong) +let _CFLocaleGetLanguageLineDirection = Foreign.foreign ~stub:true "CFLocaleGetLanguageLineDirection" ((ptr CFString.t) @-> returning llong) +let _CFLocaleGetSystem = Foreign.foreign ~stub:true "CFLocaleGetSystem" (void @-> returning (ptr CFLocale.t)) +let _CFLocaleGetTypeID = Foreign.foreign ~stub:true "CFLocaleGetTypeID" (void @-> returning ullong) +let _CFLocaleGetValue = Foreign.foreign ~stub:true "CFLocaleGetValue" ((ptr CFLocale.t) @-> (ptr CFString.t) @-> returning id) +let _CFLocaleGetWindowsLocaleCodeFromLocaleIdentifier = Foreign.foreign ~stub:true "CFLocaleGetWindowsLocaleCodeFromLocaleIdentifier" ((ptr CFString.t) @-> returning uint) +let _CFMachPortCreate = Foreign.foreign ~stub:true "CFMachPortCreate" ((ptr CFAllocator.t) @-> Foreign.funptr ((ptr CFMachPort.t) @-> (ptr void) @-> llong @-> (ptr void) @-> returning void) @-> (ptr CFMachPortContext.t) @-> (ptr bool) @-> returning (ptr CFMachPort.t)) +let _CFMachPortCreateRunLoopSource = Foreign.foreign ~stub:true "CFMachPortCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFMachPort.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) +let _CFMachPortCreateWithPort = Foreign.foreign ~stub:true "CFMachPortCreateWithPort" ((ptr CFAllocator.t) @-> uint @-> Foreign.funptr ((ptr CFMachPort.t) @-> (ptr void) @-> llong @-> (ptr void) @-> returning void) @-> (ptr CFMachPortContext.t) @-> (ptr bool) @-> returning (ptr CFMachPort.t)) +let _CFMachPortGetContext = Foreign.foreign ~stub:true "CFMachPortGetContext" ((ptr CFMachPort.t) @-> (ptr CFMachPortContext.t) @-> returning void) +let _CFMachPortGetInvalidationCallBack = Foreign.foreign ~stub:true "CFMachPortGetInvalidationCallBack" ((ptr CFMachPort.t) @-> returning (ptr (ptr void))) +let _CFMachPortGetPort = Foreign.foreign ~stub:true "CFMachPortGetPort" ((ptr CFMachPort.t) @-> returning uint) +let _CFMachPortGetTypeID = Foreign.foreign ~stub:true "CFMachPortGetTypeID" (void @-> returning ullong) +let _CFMachPortInvalidate = Foreign.foreign ~stub:true "CFMachPortInvalidate" ((ptr CFMachPort.t) @-> returning void) +let _CFMachPortIsValid = Foreign.foreign ~stub:true "CFMachPortIsValid" ((ptr CFMachPort.t) @-> returning bool) +let _CFMachPortSetInvalidationCallBack = Foreign.foreign ~stub:true "CFMachPortSetInvalidationCallBack" ((ptr CFMachPort.t) @-> Foreign.funptr ((ptr CFMachPort.t) @-> (ptr void) @-> returning void) @-> returning void) +let _CFMakeCollectable = Foreign.foreign ~stub:true "CFMakeCollectable" (id @-> returning id) +let _CFMessagePortCreateLocal = Foreign.foreign ~stub:true "CFMessagePortCreateLocal" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> Foreign.funptr ((ptr CFMessagePort.t) @-> int @-> (ptr CFData.t) @-> (ptr void) @-> returning (ptr CFData.t)) @-> (ptr CFMessagePortContext.t) @-> (ptr bool) @-> returning (ptr CFMessagePort.t)) +let _CFMessagePortCreateRemote = Foreign.foreign ~stub:true "CFMessagePortCreateRemote" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFMessagePort.t)) +let _CFMessagePortCreateRunLoopSource = Foreign.foreign ~stub:true "CFMessagePortCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFMessagePort.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) +let _CFMessagePortGetContext = Foreign.foreign ~stub:true "CFMessagePortGetContext" ((ptr CFMessagePort.t) @-> (ptr CFMessagePortContext.t) @-> returning void) +let _CFMessagePortGetInvalidationCallBack = Foreign.foreign ~stub:true "CFMessagePortGetInvalidationCallBack" ((ptr CFMessagePort.t) @-> returning (ptr (ptr void))) +let _CFMessagePortGetName = Foreign.foreign ~stub:true "CFMessagePortGetName" ((ptr CFMessagePort.t) @-> returning (ptr CFString.t)) +let _CFMessagePortGetTypeID = Foreign.foreign ~stub:true "CFMessagePortGetTypeID" (void @-> returning ullong) +let _CFMessagePortInvalidate = Foreign.foreign ~stub:true "CFMessagePortInvalidate" ((ptr CFMessagePort.t) @-> returning void) +let _CFMessagePortIsRemote = Foreign.foreign ~stub:true "CFMessagePortIsRemote" ((ptr CFMessagePort.t) @-> returning bool) +let _CFMessagePortIsValid = Foreign.foreign ~stub:true "CFMessagePortIsValid" ((ptr CFMessagePort.t) @-> returning bool) +let _CFMessagePortSendRequest = Foreign.foreign ~stub:true "CFMessagePortSendRequest" ((ptr CFMessagePort.t) @-> int @-> (ptr CFData.t) @-> double @-> double @-> (ptr CFString.t) @-> (ptr (ptr CFData.t)) @-> returning int) +let _CFMessagePortSetDispatchQueue = Foreign.foreign ~stub:true "CFMessagePortSetDispatchQueue" ((ptr CFMessagePort.t) @-> id @-> returning void) +let _CFMessagePortSetInvalidationCallBack = Foreign.foreign ~stub:true "CFMessagePortSetInvalidationCallBack" ((ptr CFMessagePort.t) @-> Foreign.funptr ((ptr CFMessagePort.t) @-> (ptr void) @-> returning void) @-> returning void) +let _CFMessagePortSetName = Foreign.foreign ~stub:true "CFMessagePortSetName" ((ptr CFMessagePort.t) @-> (ptr CFString.t) @-> returning bool) +let _CFNotificationCenterAddObserver = Foreign.foreign ~stub:true "CFNotificationCenterAddObserver" ((ptr CFNotificationCenter.t) @-> (ptr void) @-> Foreign.funptr ((ptr CFNotificationCenter.t) @-> (ptr void) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr CFDictionary.t) @-> returning void) @-> (ptr CFString.t) @-> (ptr void) @-> llong @-> returning void) +let _CFNotificationCenterGetDarwinNotifyCenter = Foreign.foreign ~stub:true "CFNotificationCenterGetDarwinNotifyCenter" (void @-> returning (ptr CFNotificationCenter.t)) +let _CFNotificationCenterGetDistributedCenter = Foreign.foreign ~stub:true "CFNotificationCenterGetDistributedCenter" (void @-> returning (ptr CFNotificationCenter.t)) +let _CFNotificationCenterGetLocalCenter = Foreign.foreign ~stub:true "CFNotificationCenterGetLocalCenter" (void @-> returning (ptr CFNotificationCenter.t)) +let _CFNotificationCenterGetTypeID = Foreign.foreign ~stub:true "CFNotificationCenterGetTypeID" (void @-> returning ullong) +let _CFNotificationCenterPostNotification = Foreign.foreign ~stub:true "CFNotificationCenterPostNotification" ((ptr CFNotificationCenter.t) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr CFDictionary.t) @-> bool @-> returning void) +let _CFNotificationCenterPostNotificationWithOptions = Foreign.foreign ~stub:true "CFNotificationCenterPostNotificationWithOptions" ((ptr CFNotificationCenter.t) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr CFDictionary.t) @-> ullong @-> returning void) +let _CFNotificationCenterRemoveEveryObserver = Foreign.foreign ~stub:true "CFNotificationCenterRemoveEveryObserver" ((ptr CFNotificationCenter.t) @-> (ptr void) @-> returning void) +let _CFNotificationCenterRemoveObserver = Foreign.foreign ~stub:true "CFNotificationCenterRemoveObserver" ((ptr CFNotificationCenter.t) @-> (ptr void) @-> (ptr CFString.t) @-> (ptr void) @-> returning void) +let _CFNullGetTypeID = Foreign.foreign ~stub:true "CFNullGetTypeID" (void @-> returning ullong) +let _CFNumberCompare = Foreign.foreign ~stub:true "CFNumberCompare" ((ptr CFNumber.t) @-> (ptr CFNumber.t) @-> (ptr void) @-> returning llong) +let _CFNumberCreate = Foreign.foreign ~stub:true "CFNumberCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr void) @-> returning (ptr CFNumber.t)) +let _CFNumberFormatterCopyProperty = Foreign.foreign ~stub:true "CFNumberFormatterCopyProperty" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> returning id) +let _CFNumberFormatterCreate = Foreign.foreign ~stub:true "CFNumberFormatterCreate" ((ptr CFAllocator.t) @-> (ptr CFLocale.t) @-> llong @-> returning (ptr CFNumberFormatter.t)) +let _CFNumberFormatterCreateNumberFromString = Foreign.foreign ~stub:true "CFNumberFormatterCreateNumberFromString" ((ptr CFAllocator.t) @-> (ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> ullong @-> returning (ptr CFNumber.t)) +let _CFNumberFormatterCreateStringWithNumber = Foreign.foreign ~stub:true "CFNumberFormatterCreateStringWithNumber" ((ptr CFAllocator.t) @-> (ptr CFNumberFormatter.t) @-> (ptr CFNumber.t) @-> returning (ptr CFString.t)) +let _CFNumberFormatterCreateStringWithValue = Foreign.foreign ~stub:true "CFNumberFormatterCreateStringWithValue" ((ptr CFAllocator.t) @-> (ptr CFNumberFormatter.t) @-> llong @-> (ptr void) @-> returning (ptr CFString.t)) +let _CFNumberFormatterGetDecimalInfoForCurrencyCode = Foreign.foreign ~stub:true "CFNumberFormatterGetDecimalInfoForCurrencyCode" ((ptr CFString.t) @-> (ptr int) @-> (ptr double) @-> returning bool) +let _CFNumberFormatterGetFormat = Foreign.foreign ~stub:true "CFNumberFormatterGetFormat" ((ptr CFNumberFormatter.t) @-> returning (ptr CFString.t)) +let _CFNumberFormatterGetLocale = Foreign.foreign ~stub:true "CFNumberFormatterGetLocale" ((ptr CFNumberFormatter.t) @-> returning (ptr CFLocale.t)) +let _CFNumberFormatterGetStyle = Foreign.foreign ~stub:true "CFNumberFormatterGetStyle" ((ptr CFNumberFormatter.t) @-> returning llong) +let _CFNumberFormatterGetTypeID = Foreign.foreign ~stub:true "CFNumberFormatterGetTypeID" (void @-> returning ullong) +let _CFNumberFormatterGetValueFromString = Foreign.foreign ~stub:true "CFNumberFormatterGetValueFromString" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> (ptr CFRange.t) @-> llong @-> (ptr void) @-> returning bool) +let _CFNumberFormatterSetFormat = Foreign.foreign ~stub:true "CFNumberFormatterSetFormat" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> returning void) +let _CFNumberFormatterSetProperty = Foreign.foreign ~stub:true "CFNumberFormatterSetProperty" ((ptr CFNumberFormatter.t) @-> (ptr CFString.t) @-> id @-> returning void) +let _CFNumberGetByteSize = Foreign.foreign ~stub:true "CFNumberGetByteSize" ((ptr CFNumber.t) @-> returning llong) +let _CFNumberGetType = Foreign.foreign ~stub:true "CFNumberGetType" ((ptr CFNumber.t) @-> returning llong) +let _CFNumberGetTypeID = Foreign.foreign ~stub:true "CFNumberGetTypeID" (void @-> returning ullong) +let _CFNumberGetValue = Foreign.foreign ~stub:true "CFNumberGetValue" ((ptr CFNumber.t) @-> llong @-> (ptr void) @-> returning bool) +let _CFNumberIsFloatType = Foreign.foreign ~stub:true "CFNumberIsFloatType" ((ptr CFNumber.t) @-> returning bool) +let _CFPlugInAddInstanceForFactory = Foreign.foreign ~stub:true "CFPlugInAddInstanceForFactory" ((ptr CFUUID.t) @-> returning void) +let _CFPlugInCreate = Foreign.foreign ~stub:true "CFPlugInCreate" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFBundle.t)) +let _CFPlugInFindFactoriesForPlugInType = Foreign.foreign ~stub:true "CFPlugInFindFactoriesForPlugInType" ((ptr CFUUID.t) @-> returning (ptr CFArray.t)) +let _CFPlugInFindFactoriesForPlugInTypeInPlugIn = Foreign.foreign ~stub:true "CFPlugInFindFactoriesForPlugInTypeInPlugIn" ((ptr CFUUID.t) @-> (ptr CFBundle.t) @-> returning (ptr CFArray.t)) +let _CFPlugInGetBundle = Foreign.foreign ~stub:true "CFPlugInGetBundle" ((ptr CFBundle.t) @-> returning (ptr CFBundle.t)) +let _CFPlugInGetTypeID = Foreign.foreign ~stub:true "CFPlugInGetTypeID" (void @-> returning ullong) +let _CFPlugInInstanceCreate = Foreign.foreign ~stub:true "CFPlugInInstanceCreate" ((ptr CFAllocator.t) @-> (ptr CFUUID.t) @-> (ptr CFUUID.t) @-> returning (ptr void)) +let _CFPlugInInstanceCreateWithInstanceDataSize = Foreign.foreign ~stub:true "CFPlugInInstanceCreateWithInstanceDataSize" ((ptr CFAllocator.t) @-> llong @-> Foreign.funptr ((ptr void) @-> returning void) @-> (ptr CFString.t) @-> Foreign.funptr ((ptr CFPlugInInstance.t) @-> (ptr CFString.t) @-> (ptr (ptr void)) @-> returning bool) @-> returning (ptr CFPlugInInstance.t)) +let _CFPlugInInstanceGetFactoryName = Foreign.foreign ~stub:true "CFPlugInInstanceGetFactoryName" ((ptr CFPlugInInstance.t) @-> returning (ptr CFString.t)) +let _CFPlugInInstanceGetInstanceData = Foreign.foreign ~stub:true "CFPlugInInstanceGetInstanceData" ((ptr CFPlugInInstance.t) @-> returning (ptr void)) +let _CFPlugInInstanceGetInterfaceFunctionTable = Foreign.foreign ~stub:true "CFPlugInInstanceGetInterfaceFunctionTable" ((ptr CFPlugInInstance.t) @-> (ptr CFString.t) @-> (ptr (ptr void)) @-> returning bool) +let _CFPlugInInstanceGetTypeID = Foreign.foreign ~stub:true "CFPlugInInstanceGetTypeID" (void @-> returning ullong) +let _CFPlugInIsLoadOnDemand = Foreign.foreign ~stub:true "CFPlugInIsLoadOnDemand" ((ptr CFBundle.t) @-> returning bool) +let _CFPlugInRegisterFactoryFunction = Foreign.foreign ~stub:true "CFPlugInRegisterFactoryFunction" ((ptr CFUUID.t) @-> Foreign.funptr ((ptr CFAllocator.t) @-> (ptr CFUUID.t) @-> returning (ptr void)) @-> returning bool) +let _CFPlugInRegisterFactoryFunctionByName = Foreign.foreign ~stub:true "CFPlugInRegisterFactoryFunctionByName" ((ptr CFUUID.t) @-> (ptr CFBundle.t) @-> (ptr CFString.t) @-> returning bool) +let _CFPlugInRegisterPlugInType = Foreign.foreign ~stub:true "CFPlugInRegisterPlugInType" ((ptr CFUUID.t) @-> (ptr CFUUID.t) @-> returning bool) +let _CFPlugInRemoveInstanceForFactory = Foreign.foreign ~stub:true "CFPlugInRemoveInstanceForFactory" ((ptr CFUUID.t) @-> returning void) +let _CFPlugInSetLoadOnDemand = Foreign.foreign ~stub:true "CFPlugInSetLoadOnDemand" ((ptr CFBundle.t) @-> bool @-> returning void) +let _CFPlugInUnregisterFactory = Foreign.foreign ~stub:true "CFPlugInUnregisterFactory" ((ptr CFUUID.t) @-> returning bool) +let _CFPlugInUnregisterPlugInType = Foreign.foreign ~stub:true "CFPlugInUnregisterPlugInType" ((ptr CFUUID.t) @-> (ptr CFUUID.t) @-> returning bool) +let _CFPreferencesAddSuitePreferencesToApp = Foreign.foreign ~stub:true "CFPreferencesAddSuitePreferencesToApp" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) +let _CFPreferencesAppSynchronize = Foreign.foreign ~stub:true "CFPreferencesAppSynchronize" ((ptr CFString.t) @-> returning bool) +let _CFPreferencesAppValueIsForced = Foreign.foreign ~stub:true "CFPreferencesAppValueIsForced" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) +let _CFPreferencesCopyAppValue = Foreign.foreign ~stub:true "CFPreferencesCopyAppValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr void)) +let _CFPreferencesCopyApplicationList = Foreign.foreign ~stub:true "CFPreferencesCopyApplicationList" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) +let _CFPreferencesCopyKeyList = Foreign.foreign ~stub:true "CFPreferencesCopyKeyList" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) +let _CFPreferencesCopyMultiple = Foreign.foreign ~stub:true "CFPreferencesCopyMultiple" ((ptr CFArray.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFDictionary.t)) +let _CFPreferencesCopyValue = Foreign.foreign ~stub:true "CFPreferencesCopyValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr void)) +let _CFPreferencesGetAppBooleanValue = Foreign.foreign ~stub:true "CFPreferencesGetAppBooleanValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr bool) @-> returning bool) +let _CFPreferencesGetAppIntegerValue = Foreign.foreign ~stub:true "CFPreferencesGetAppIntegerValue" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr bool) @-> returning llong) +let _CFPreferencesRemoveSuitePreferencesFromApp = Foreign.foreign ~stub:true "CFPreferencesRemoveSuitePreferencesFromApp" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) +let _CFPreferencesSetAppValue = Foreign.foreign ~stub:true "CFPreferencesSetAppValue" ((ptr CFString.t) @-> (ptr void) @-> (ptr CFString.t) @-> returning void) +let _CFPreferencesSetMultiple = Foreign.foreign ~stub:true "CFPreferencesSetMultiple" ((ptr CFDictionary.t) @-> (ptr CFArray.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning void) +let _CFPreferencesSetValue = Foreign.foreign ~stub:true "CFPreferencesSetValue" ((ptr CFString.t) @-> (ptr void) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning void) +let _CFPreferencesSynchronize = Foreign.foreign ~stub:true "CFPreferencesSynchronize" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) +let _CFPropertyListCreateData = Foreign.foreign ~stub:true "CFPropertyListCreateData" ((ptr CFAllocator.t) @-> (ptr void) @-> llong @-> ullong @-> (ptr (ptr CFError.t)) @-> returning (ptr CFData.t)) +let _CFPropertyListCreateDeepCopy = Foreign.foreign ~stub:true "CFPropertyListCreateDeepCopy" ((ptr CFAllocator.t) @-> (ptr void) @-> ullong @-> returning (ptr void)) +let _CFPropertyListCreateFromStream = Foreign.foreign ~stub:true "CFPropertyListCreateFromStream" ((ptr CFAllocator.t) @-> (ptr CFReadStream.t) @-> llong @-> ullong @-> (ptr llong) @-> (ptr (ptr CFString.t)) @-> returning (ptr void)) +let _CFPropertyListCreateFromXMLData = Foreign.foreign ~stub:true "CFPropertyListCreateFromXMLData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> ullong @-> (ptr (ptr CFString.t)) @-> returning (ptr void)) +let _CFPropertyListCreateWithData = Foreign.foreign ~stub:true "CFPropertyListCreateWithData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> ullong @-> (ptr llong) @-> (ptr (ptr CFError.t)) @-> returning (ptr void)) +let _CFPropertyListCreateWithStream = Foreign.foreign ~stub:true "CFPropertyListCreateWithStream" ((ptr CFAllocator.t) @-> (ptr CFReadStream.t) @-> llong @-> ullong @-> (ptr llong) @-> (ptr (ptr CFError.t)) @-> returning (ptr void)) +let _CFPropertyListCreateXMLData = Foreign.foreign ~stub:true "CFPropertyListCreateXMLData" ((ptr CFAllocator.t) @-> (ptr void) @-> returning (ptr CFData.t)) +let _CFPropertyListIsValid = Foreign.foreign ~stub:true "CFPropertyListIsValid" ((ptr void) @-> llong @-> returning bool) +let _CFPropertyListWrite = Foreign.foreign ~stub:true "CFPropertyListWrite" ((ptr void) @-> (ptr CFWriteStream.t) @-> llong @-> ullong @-> (ptr (ptr CFError.t)) @-> returning llong) +let _CFPropertyListWriteToStream = Foreign.foreign ~stub:true "CFPropertyListWriteToStream" ((ptr void) @-> (ptr CFWriteStream.t) @-> llong @-> (ptr (ptr CFString.t)) @-> returning llong) (* let _CFRangeMake = Foreign.foreign "Camlkit_CFRangeMake" (llong @-> llong @-> returning CFRange.t) *) -let _CFReadStreamClose = Foreign.foreign "CFReadStreamClose" ((ptr CFReadStream.t) @-> returning void) -let _CFReadStreamCopyDispatchQueue = Foreign.foreign "CFReadStreamCopyDispatchQueue" ((ptr CFReadStream.t) @-> returning id) -let _CFReadStreamCopyError = Foreign.foreign "CFReadStreamCopyError" ((ptr CFReadStream.t) @-> returning (ptr CFError.t)) -let _CFReadStreamCopyProperty = Foreign.foreign "CFReadStreamCopyProperty" ((ptr CFReadStream.t) @-> (ptr CFString.t) @-> returning id) -let _CFReadStreamCreateWithBytesNoCopy = Foreign.foreign "CFReadStreamCreateWithBytesNoCopy" ((ptr CFAllocator.t) @-> string @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFReadStream.t)) -let _CFReadStreamCreateWithFile = Foreign.foreign "CFReadStreamCreateWithFile" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFReadStream.t)) -let _CFReadStreamGetBuffer = Foreign.foreign "CFReadStreamGetBuffer" ((ptr CFReadStream.t) @-> llong @-> (ptr llong) @-> returning string) -let _CFReadStreamGetError = Foreign.foreign "CFReadStreamGetError" ((ptr CFReadStream.t) @-> returning CFStreamError.t) -let _CFReadStreamGetStatus = Foreign.foreign "CFReadStreamGetStatus" ((ptr CFReadStream.t) @-> returning llong) -let _CFReadStreamGetTypeID = Foreign.foreign "CFReadStreamGetTypeID" (void @-> returning ullong) -let _CFReadStreamHasBytesAvailable = Foreign.foreign "CFReadStreamHasBytesAvailable" ((ptr CFReadStream.t) @-> returning bool) -let _CFReadStreamOpen = Foreign.foreign "CFReadStreamOpen" ((ptr CFReadStream.t) @-> returning bool) -let _CFReadStreamRead = Foreign.foreign "CFReadStreamRead" ((ptr CFReadStream.t) @-> string @-> llong @-> returning llong) -let _CFReadStreamScheduleWithRunLoop = Foreign.foreign "CFReadStreamScheduleWithRunLoop" ((ptr CFReadStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) -let _CFReadStreamSetClient = Foreign.foreign "CFReadStreamSetClient" ((ptr CFReadStream.t) @-> ullong @-> Foreign.funptr ((ptr CFReadStream.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFStreamClientContext.t) @-> returning bool) -let _CFReadStreamSetDispatchQueue = Foreign.foreign "CFReadStreamSetDispatchQueue" ((ptr CFReadStream.t) @-> id @-> returning void) -let _CFReadStreamSetProperty = Foreign.foreign "CFReadStreamSetProperty" ((ptr CFReadStream.t) @-> (ptr CFString.t) @-> id @-> returning bool) -let _CFReadStreamUnscheduleFromRunLoop = Foreign.foreign "CFReadStreamUnscheduleFromRunLoop" ((ptr CFReadStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) -let _CFRelease = Foreign.foreign "CFRelease" (id @-> returning void) -let _CFRetain = Foreign.foreign "CFRetain" (id @-> returning id) -let _CFRunLoopAddCommonMode = Foreign.foreign "CFRunLoopAddCommonMode" ((ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) -let _CFRunLoopAddObserver = Foreign.foreign "CFRunLoopAddObserver" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopObserver.t) @-> (ptr CFString.t) @-> returning void) -let _CFRunLoopAddSource = Foreign.foreign "CFRunLoopAddSource" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopSource.t) @-> (ptr CFString.t) @-> returning void) -let _CFRunLoopAddTimer = Foreign.foreign "CFRunLoopAddTimer" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopTimer.t) @-> (ptr CFString.t) @-> returning void) -let _CFRunLoopContainsObserver = Foreign.foreign "CFRunLoopContainsObserver" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopObserver.t) @-> (ptr CFString.t) @-> returning bool) -let _CFRunLoopContainsSource = Foreign.foreign "CFRunLoopContainsSource" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopSource.t) @-> (ptr CFString.t) @-> returning bool) -let _CFRunLoopContainsTimer = Foreign.foreign "CFRunLoopContainsTimer" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopTimer.t) @-> (ptr CFString.t) @-> returning bool) -let _CFRunLoopCopyAllModes = Foreign.foreign "CFRunLoopCopyAllModes" ((ptr CFRunLoop.t) @-> returning (ptr CFArray.t)) -let _CFRunLoopCopyCurrentMode = Foreign.foreign "CFRunLoopCopyCurrentMode" ((ptr CFRunLoop.t) @-> returning (ptr CFString.t)) -let _CFRunLoopGetCurrent = Foreign.foreign "CFRunLoopGetCurrent" (void @-> returning (ptr CFRunLoop.t)) -let _CFRunLoopGetMain = Foreign.foreign "CFRunLoopGetMain" (void @-> returning (ptr CFRunLoop.t)) -let _CFRunLoopGetNextTimerFireDate = Foreign.foreign "CFRunLoopGetNextTimerFireDate" ((ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning double) -let _CFRunLoopGetTypeID = Foreign.foreign "CFRunLoopGetTypeID" (void @-> returning ullong) -let _CFRunLoopIsWaiting = Foreign.foreign "CFRunLoopIsWaiting" ((ptr CFRunLoop.t) @-> returning bool) -let _CFRunLoopObserverCreate = Foreign.foreign "CFRunLoopObserverCreate" ((ptr CFAllocator.t) @-> ullong @-> bool @-> llong @-> Foreign.funptr ((ptr CFRunLoopObserver.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFRunLoopObserverContext.t) @-> returning (ptr CFRunLoopObserver.t)) -let _CFRunLoopObserverCreateWithHandler = Foreign.foreign "CFRunLoopObserverCreateWithHandler" ((ptr CFAllocator.t) @-> ullong @-> bool @-> llong @-> Foreign.funptr ((ptr CFRunLoopObserver.t) @-> ullong @-> returning void) @-> returning (ptr CFRunLoopObserver.t)) -let _CFRunLoopObserverDoesRepeat = Foreign.foreign "CFRunLoopObserverDoesRepeat" ((ptr CFRunLoopObserver.t) @-> returning bool) -let _CFRunLoopObserverGetActivities = Foreign.foreign "CFRunLoopObserverGetActivities" ((ptr CFRunLoopObserver.t) @-> returning ullong) -let _CFRunLoopObserverGetContext = Foreign.foreign "CFRunLoopObserverGetContext" ((ptr CFRunLoopObserver.t) @-> (ptr CFRunLoopObserverContext.t) @-> returning void) -let _CFRunLoopObserverGetOrder = Foreign.foreign "CFRunLoopObserverGetOrder" ((ptr CFRunLoopObserver.t) @-> returning llong) -let _CFRunLoopObserverGetTypeID = Foreign.foreign "CFRunLoopObserverGetTypeID" (void @-> returning ullong) -let _CFRunLoopObserverInvalidate = Foreign.foreign "CFRunLoopObserverInvalidate" ((ptr CFRunLoopObserver.t) @-> returning void) -let _CFRunLoopObserverIsValid = Foreign.foreign "CFRunLoopObserverIsValid" ((ptr CFRunLoopObserver.t) @-> returning bool) -let _CFRunLoopPerformBlock = Foreign.foreign "CFRunLoopPerformBlock" ((ptr CFRunLoop.t) @-> id @-> Foreign.funptr (void @-> returning void) @-> returning void) -let _CFRunLoopRemoveObserver = Foreign.foreign "CFRunLoopRemoveObserver" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopObserver.t) @-> (ptr CFString.t) @-> returning void) -let _CFRunLoopRemoveSource = Foreign.foreign "CFRunLoopRemoveSource" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopSource.t) @-> (ptr CFString.t) @-> returning void) -let _CFRunLoopRemoveTimer = Foreign.foreign "CFRunLoopRemoveTimer" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopTimer.t) @-> (ptr CFString.t) @-> returning void) -let _CFRunLoopRun = Foreign.foreign "CFRunLoopRun" (void @-> returning void) -let _CFRunLoopRunInMode = Foreign.foreign "CFRunLoopRunInMode" ((ptr CFString.t) @-> double @-> bool @-> returning int) -let _CFRunLoopSourceCreate = Foreign.foreign "CFRunLoopSourceCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr CFRunLoopSourceContext.t) @-> returning (ptr CFRunLoopSource.t)) -let _CFRunLoopSourceGetContext = Foreign.foreign "CFRunLoopSourceGetContext" ((ptr CFRunLoopSource.t) @-> (ptr CFRunLoopSourceContext.t) @-> returning void) -let _CFRunLoopSourceGetOrder = Foreign.foreign "CFRunLoopSourceGetOrder" ((ptr CFRunLoopSource.t) @-> returning llong) -let _CFRunLoopSourceGetTypeID = Foreign.foreign "CFRunLoopSourceGetTypeID" (void @-> returning ullong) -let _CFRunLoopSourceInvalidate = Foreign.foreign "CFRunLoopSourceInvalidate" ((ptr CFRunLoopSource.t) @-> returning void) -let _CFRunLoopSourceIsValid = Foreign.foreign "CFRunLoopSourceIsValid" ((ptr CFRunLoopSource.t) @-> returning bool) -let _CFRunLoopSourceSignal = Foreign.foreign "CFRunLoopSourceSignal" ((ptr CFRunLoopSource.t) @-> returning void) -let _CFRunLoopStop = Foreign.foreign "CFRunLoopStop" ((ptr CFRunLoop.t) @-> returning void) -let _CFRunLoopTimerCreate = Foreign.foreign "CFRunLoopTimerCreate" ((ptr CFAllocator.t) @-> double @-> double @-> ullong @-> llong @-> Foreign.funptr ((ptr CFRunLoopTimer.t) @-> (ptr void) @-> returning void) @-> (ptr CFRunLoopTimerContext.t) @-> returning (ptr CFRunLoopTimer.t)) -let _CFRunLoopTimerCreateWithHandler = Foreign.foreign "CFRunLoopTimerCreateWithHandler" ((ptr CFAllocator.t) @-> double @-> double @-> ullong @-> llong @-> Foreign.funptr ((ptr CFRunLoopTimer.t) @-> returning void) @-> returning (ptr CFRunLoopTimer.t)) -let _CFRunLoopTimerDoesRepeat = Foreign.foreign "CFRunLoopTimerDoesRepeat" ((ptr CFRunLoopTimer.t) @-> returning bool) -let _CFRunLoopTimerGetContext = Foreign.foreign "CFRunLoopTimerGetContext" ((ptr CFRunLoopTimer.t) @-> (ptr CFRunLoopTimerContext.t) @-> returning void) -let _CFRunLoopTimerGetInterval = Foreign.foreign "CFRunLoopTimerGetInterval" ((ptr CFRunLoopTimer.t) @-> returning double) -let _CFRunLoopTimerGetNextFireDate = Foreign.foreign "CFRunLoopTimerGetNextFireDate" ((ptr CFRunLoopTimer.t) @-> returning double) -let _CFRunLoopTimerGetOrder = Foreign.foreign "CFRunLoopTimerGetOrder" ((ptr CFRunLoopTimer.t) @-> returning llong) -let _CFRunLoopTimerGetTolerance = Foreign.foreign "CFRunLoopTimerGetTolerance" ((ptr CFRunLoopTimer.t) @-> returning double) -let _CFRunLoopTimerGetTypeID = Foreign.foreign "CFRunLoopTimerGetTypeID" (void @-> returning ullong) -let _CFRunLoopTimerInvalidate = Foreign.foreign "CFRunLoopTimerInvalidate" ((ptr CFRunLoopTimer.t) @-> returning void) -let _CFRunLoopTimerIsValid = Foreign.foreign "CFRunLoopTimerIsValid" ((ptr CFRunLoopTimer.t) @-> returning bool) -let _CFRunLoopTimerSetNextFireDate = Foreign.foreign "CFRunLoopTimerSetNextFireDate" ((ptr CFRunLoopTimer.t) @-> double @-> returning void) -let _CFRunLoopTimerSetTolerance = Foreign.foreign "CFRunLoopTimerSetTolerance" ((ptr CFRunLoopTimer.t) @-> double @-> returning void) -let _CFRunLoopWakeUp = Foreign.foreign "CFRunLoopWakeUp" ((ptr CFRunLoop.t) @-> returning void) -let _CFSetAddValue = Foreign.foreign "CFSetAddValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) -let _CFSetApplyFunction = Foreign.foreign "CFSetApplyFunction" ((ptr CFSet.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CFSetContainsValue = Foreign.foreign "CFSetContainsValue" ((ptr CFSet.t) @-> (ptr void) @-> returning bool) -let _CFSetCreate = Foreign.foreign "CFSetCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> llong @-> (ptr CFSetCallBacks.t) @-> returning (ptr CFSet.t)) -let _CFSetCreateCopy = Foreign.foreign "CFSetCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFSet.t) @-> returning (ptr CFSet.t)) -let _CFSetCreateMutable = Foreign.foreign "CFSetCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFSetCallBacks.t) @-> returning (ptr CFSet.t)) -let _CFSetCreateMutableCopy = Foreign.foreign "CFSetCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFSet.t) @-> returning (ptr CFSet.t)) -let _CFSetGetCount = Foreign.foreign "CFSetGetCount" ((ptr CFSet.t) @-> returning llong) -let _CFSetGetCountOfValue = Foreign.foreign "CFSetGetCountOfValue" ((ptr CFSet.t) @-> (ptr void) @-> returning llong) -let _CFSetGetTypeID = Foreign.foreign "CFSetGetTypeID" (void @-> returning ullong) -let _CFSetGetValue = Foreign.foreign "CFSetGetValue" ((ptr CFSet.t) @-> (ptr void) @-> returning (ptr void)) -let _CFSetGetValueIfPresent = Foreign.foreign "CFSetGetValueIfPresent" ((ptr CFSet.t) @-> (ptr void) @-> (ptr (ptr void)) @-> returning bool) -let _CFSetGetValues = Foreign.foreign "CFSetGetValues" ((ptr CFSet.t) @-> (ptr (ptr void)) @-> returning void) -let _CFSetRemoveAllValues = Foreign.foreign "CFSetRemoveAllValues" ((ptr CFSet.t) @-> returning void) -let _CFSetRemoveValue = Foreign.foreign "CFSetRemoveValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) -let _CFSetReplaceValue = Foreign.foreign "CFSetReplaceValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) -let _CFSetSetValue = Foreign.foreign "CFSetSetValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) -let _CFShow = Foreign.foreign "CFShow" (id @-> returning void) -let _CFShowStr = Foreign.foreign "CFShowStr" ((ptr CFString.t) @-> returning void) -let _CFSocketConnectToAddress = Foreign.foreign "CFSocketConnectToAddress" ((ptr CFSocket.t) @-> (ptr CFData.t) @-> double @-> returning llong) -let _CFSocketCopyAddress = Foreign.foreign "CFSocketCopyAddress" ((ptr CFSocket.t) @-> returning (ptr CFData.t)) -let _CFSocketCopyPeerAddress = Foreign.foreign "CFSocketCopyPeerAddress" ((ptr CFSocket.t) @-> returning (ptr CFData.t)) -let _CFSocketCopyRegisteredSocketSignature = Foreign.foreign "CFSocketCopyRegisteredSocketSignature" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr CFSocketSignature.t) @-> (ptr (ptr CFData.t)) @-> returning llong) -let _CFSocketCopyRegisteredValue = Foreign.foreign "CFSocketCopyRegisteredValue" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr (ptr void)) @-> (ptr (ptr CFData.t)) @-> returning llong) -let _CFSocketCreate = Foreign.foreign "CFSocketCreate" ((ptr CFAllocator.t) @-> int @-> int @-> int @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> returning (ptr CFSocket.t)) -let _CFSocketCreateConnectedToSocketSignature = Foreign.foreign "CFSocketCreateConnectedToSocketSignature" ((ptr CFAllocator.t) @-> (ptr CFSocketSignature.t) @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> double @-> returning (ptr CFSocket.t)) -let _CFSocketCreateRunLoopSource = Foreign.foreign "CFSocketCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFSocket.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) -let _CFSocketCreateWithNative = Foreign.foreign "CFSocketCreateWithNative" ((ptr CFAllocator.t) @-> int @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> returning (ptr CFSocket.t)) -let _CFSocketCreateWithSocketSignature = Foreign.foreign "CFSocketCreateWithSocketSignature" ((ptr CFAllocator.t) @-> (ptr CFSocketSignature.t) @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> returning (ptr CFSocket.t)) -let _CFSocketDisableCallBacks = Foreign.foreign "CFSocketDisableCallBacks" ((ptr CFSocket.t) @-> ullong @-> returning void) -let _CFSocketEnableCallBacks = Foreign.foreign "CFSocketEnableCallBacks" ((ptr CFSocket.t) @-> ullong @-> returning void) -let _CFSocketGetContext = Foreign.foreign "CFSocketGetContext" ((ptr CFSocket.t) @-> (ptr CFSocketContext.t) @-> returning void) -let _CFSocketGetDefaultNameRegistryPortNumber = Foreign.foreign "CFSocketGetDefaultNameRegistryPortNumber" (void @-> returning ushort) -let _CFSocketGetNative = Foreign.foreign "CFSocketGetNative" ((ptr CFSocket.t) @-> returning int) -let _CFSocketGetSocketFlags = Foreign.foreign "CFSocketGetSocketFlags" ((ptr CFSocket.t) @-> returning ullong) -let _CFSocketGetTypeID = Foreign.foreign "CFSocketGetTypeID" (void @-> returning ullong) -let _CFSocketInvalidate = Foreign.foreign "CFSocketInvalidate" ((ptr CFSocket.t) @-> returning void) -let _CFSocketIsValid = Foreign.foreign "CFSocketIsValid" ((ptr CFSocket.t) @-> returning bool) -let _CFSocketRegisterSocketSignature = Foreign.foreign "CFSocketRegisterSocketSignature" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr CFSocketSignature.t) @-> returning llong) -let _CFSocketRegisterValue = Foreign.foreign "CFSocketRegisterValue" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr void) @-> returning llong) -let _CFSocketSendData = Foreign.foreign "CFSocketSendData" ((ptr CFSocket.t) @-> (ptr CFData.t) @-> (ptr CFData.t) @-> double @-> returning llong) -let _CFSocketSetAddress = Foreign.foreign "CFSocketSetAddress" ((ptr CFSocket.t) @-> (ptr CFData.t) @-> returning llong) -let _CFSocketSetDefaultNameRegistryPortNumber = Foreign.foreign "CFSocketSetDefaultNameRegistryPortNumber" (ushort @-> returning void) -let _CFSocketSetSocketFlags = Foreign.foreign "CFSocketSetSocketFlags" ((ptr CFSocket.t) @-> ullong @-> returning void) -let _CFSocketUnregister = Foreign.foreign "CFSocketUnregister" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> returning llong) -let _CFStreamCreateBoundPair = Foreign.foreign "CFStreamCreateBoundPair" ((ptr CFAllocator.t) @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> llong @-> returning void) -let _CFStreamCreatePairWithPeerSocketSignature = Foreign.foreign "CFStreamCreatePairWithPeerSocketSignature" ((ptr CFAllocator.t) @-> (ptr CFSocketSignature.t) @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> returning void) -let _CFStreamCreatePairWithSocket = Foreign.foreign "CFStreamCreatePairWithSocket" ((ptr CFAllocator.t) @-> int @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> returning void) -let _CFStreamCreatePairWithSocketToHost = Foreign.foreign "CFStreamCreatePairWithSocketToHost" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> uint @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> returning void) -let _CFStringAppend = Foreign.foreign "CFStringAppend" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) -let _CFStringAppendCString = Foreign.foreign "CFStringAppendCString" ((ptr CFString.t) @-> string @-> uint @-> returning void) -let _CFStringAppendCharacters = Foreign.foreign "CFStringAppendCharacters" ((ptr CFString.t) @-> (ptr ushort) @-> llong @-> returning void) -let _CFStringAppendFormat = Foreign.foreign "CFStringAppendFormat" ((ptr CFString.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> returning void) -let _CFStringAppendFormatAndArguments = Foreign.foreign "CFStringAppendFormatAndArguments" ((ptr CFString.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> (ptr void) @-> returning void) -let _CFStringAppendPascalString = Foreign.foreign "CFStringAppendPascalString" ((ptr CFString.t) @-> string @-> uint @-> returning void) -let _CFStringCapitalize = Foreign.foreign "CFStringCapitalize" ((ptr CFString.t) @-> (ptr CFLocale.t) @-> returning void) -let _CFStringCompare = Foreign.foreign "CFStringCompare" ((ptr CFString.t) @-> (ptr CFString.t) @-> ullong @-> returning llong) -let _CFStringCompareWithOptions = Foreign.foreign "CFStringCompareWithOptions" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> returning llong) -let _CFStringCompareWithOptionsAndLocale = Foreign.foreign "CFStringCompareWithOptionsAndLocale" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> returning llong) -let _CFStringConvertEncodingToIANACharSetName = Foreign.foreign "CFStringConvertEncodingToIANACharSetName" (uint @-> returning (ptr CFString.t)) -let _CFStringConvertEncodingToNSStringEncoding = Foreign.foreign "CFStringConvertEncodingToNSStringEncoding" (uint @-> returning ullong) -let _CFStringConvertEncodingToWindowsCodepage = Foreign.foreign "CFStringConvertEncodingToWindowsCodepage" (uint @-> returning uint) -let _CFStringConvertIANACharSetNameToEncoding = Foreign.foreign "CFStringConvertIANACharSetNameToEncoding" ((ptr CFString.t) @-> returning uint) -let _CFStringConvertNSStringEncodingToEncoding = Foreign.foreign "CFStringConvertNSStringEncodingToEncoding" (ullong @-> returning uint) -let _CFStringConvertWindowsCodepageToEncoding = Foreign.foreign "CFStringConvertWindowsCodepageToEncoding" (uint @-> returning uint) -let _CFStringCreateArrayBySeparatingStrings = Foreign.foreign "CFStringCreateArrayBySeparatingStrings" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) -let _CFStringCreateArrayWithFindResults = Foreign.foreign "CFStringCreateArrayWithFindResults" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> returning (ptr CFArray.t)) -let _CFStringCreateByCombiningStrings = Foreign.foreign "CFStringCreateByCombiningStrings" ((ptr CFAllocator.t) @-> (ptr CFArray.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFStringCreateCopy = Foreign.foreign "CFStringCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFStringCreateExternalRepresentation = Foreign.foreign "CFStringCreateExternalRepresentation" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> uint @-> uchar @-> returning (ptr CFData.t)) -let _CFStringCreateFromExternalRepresentation = Foreign.foreign "CFStringCreateFromExternalRepresentation" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> uint @-> returning (ptr CFString.t)) -let _CFStringCreateMutable = Foreign.foreign "CFStringCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFString.t)) -let _CFStringCreateMutableCopy = Foreign.foreign "CFStringCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFStringCreateMutableWithExternalCharactersNoCopy = Foreign.foreign "CFStringCreateMutableWithExternalCharactersNoCopy" ((ptr CFAllocator.t) @-> (ptr ushort) @-> llong @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) -let _CFStringCreateWithBytes = Foreign.foreign "CFStringCreateWithBytes" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> bool @-> returning (ptr CFString.t)) -let _CFStringCreateWithBytesNoCopy = Foreign.foreign "CFStringCreateWithBytesNoCopy" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> bool @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) -let _CFStringCreateWithCString = Foreign.foreign "CFStringCreateWithCString" ((ptr CFAllocator.t) @-> string @-> uint @-> returning (ptr CFString.t)) -let _CFStringCreateWithCStringNoCopy = Foreign.foreign "CFStringCreateWithCStringNoCopy" ((ptr CFAllocator.t) @-> string @-> uint @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) -let _CFStringCreateWithCharacters = Foreign.foreign "CFStringCreateWithCharacters" ((ptr CFAllocator.t) @-> (ptr ushort) @-> llong @-> returning (ptr CFString.t)) -let _CFStringCreateWithCharactersNoCopy = Foreign.foreign "CFStringCreateWithCharactersNoCopy" ((ptr CFAllocator.t) @-> (ptr ushort) @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) -let _CFStringCreateWithFileSystemRepresentation = Foreign.foreign "CFStringCreateWithFileSystemRepresentation" ((ptr CFAllocator.t) @-> string @-> returning (ptr CFString.t)) -let _CFStringCreateWithFormat = Foreign.foreign "CFStringCreateWithFormat" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFStringCreateWithFormatAndArguments = Foreign.foreign "CFStringCreateWithFormatAndArguments" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> (ptr void) @-> returning (ptr CFString.t)) -let _CFStringCreateWithPascalString = Foreign.foreign "CFStringCreateWithPascalString" ((ptr CFAllocator.t) @-> string @-> uint @-> returning (ptr CFString.t)) -let _CFStringCreateWithPascalStringNoCopy = Foreign.foreign "CFStringCreateWithPascalStringNoCopy" ((ptr CFAllocator.t) @-> string @-> uint @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) -let _CFStringCreateWithSubstring = Foreign.foreign "CFStringCreateWithSubstring" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> CFRange.t @-> returning (ptr CFString.t)) -let _CFStringDelete = Foreign.foreign "CFStringDelete" ((ptr CFString.t) @-> CFRange.t @-> returning void) -let _CFStringFind = Foreign.foreign "CFStringFind" ((ptr CFString.t) @-> (ptr CFString.t) @-> ullong @-> returning CFRange.t) -let _CFStringFindAndReplace = Foreign.foreign "CFStringFindAndReplace" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> returning llong) -let _CFStringFindCharacterFromSet = Foreign.foreign "CFStringFindCharacterFromSet" ((ptr CFString.t) @-> (ptr CFCharacterSet.t) @-> CFRange.t @-> ullong @-> (ptr CFRange.t) @-> returning bool) -let _CFStringFindWithOptions = Foreign.foreign "CFStringFindWithOptions" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFRange.t) @-> returning bool) -let _CFStringFindWithOptionsAndLocale = Foreign.foreign "CFStringFindWithOptionsAndLocale" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> (ptr CFRange.t) @-> returning bool) -let _CFStringFold = Foreign.foreign "CFStringFold" ((ptr CFString.t) @-> ullong @-> (ptr CFLocale.t) @-> returning void) -let _CFStringGetBytes = Foreign.foreign "CFStringGetBytes" ((ptr CFString.t) @-> CFRange.t @-> uint @-> uchar @-> bool @-> string @-> llong @-> (ptr llong) @-> returning llong) -let _CFStringGetCString = Foreign.foreign "CFStringGetCString" ((ptr CFString.t) @-> string @-> llong @-> uint @-> returning bool) -let _CFStringGetCStringPtr = Foreign.foreign "CFStringGetCStringPtr" ((ptr CFString.t) @-> uint @-> returning string) -let _CFStringGetCharacterAtIndex = Foreign.foreign "CFStringGetCharacterAtIndex" ((ptr CFString.t) @-> llong @-> returning ushort) +let _CFReadStreamClose = Foreign.foreign ~stub:true "CFReadStreamClose" ((ptr CFReadStream.t) @-> returning void) +let _CFReadStreamCopyDispatchQueue = Foreign.foreign ~stub:true "CFReadStreamCopyDispatchQueue" ((ptr CFReadStream.t) @-> returning id) +let _CFReadStreamCopyError = Foreign.foreign ~stub:true "CFReadStreamCopyError" ((ptr CFReadStream.t) @-> returning (ptr CFError.t)) +let _CFReadStreamCopyProperty = Foreign.foreign ~stub:true "CFReadStreamCopyProperty" ((ptr CFReadStream.t) @-> (ptr CFString.t) @-> returning id) +let _CFReadStreamCreateWithBytesNoCopy = Foreign.foreign ~stub:true "CFReadStreamCreateWithBytesNoCopy" ((ptr CFAllocator.t) @-> string @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFReadStream.t)) +let _CFReadStreamCreateWithFile = Foreign.foreign ~stub:true "CFReadStreamCreateWithFile" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFReadStream.t)) +let _CFReadStreamGetBuffer = Foreign.foreign ~stub:true "CFReadStreamGetBuffer" ((ptr CFReadStream.t) @-> llong @-> (ptr llong) @-> returning string) +let _CFReadStreamGetError = Foreign.foreign ~stub:true "CFReadStreamGetError" ((ptr CFReadStream.t) @-> returning CFStreamError.t) +let _CFReadStreamGetStatus = Foreign.foreign ~stub:true "CFReadStreamGetStatus" ((ptr CFReadStream.t) @-> returning llong) +let _CFReadStreamGetTypeID = Foreign.foreign ~stub:true "CFReadStreamGetTypeID" (void @-> returning ullong) +let _CFReadStreamHasBytesAvailable = Foreign.foreign ~stub:true "CFReadStreamHasBytesAvailable" ((ptr CFReadStream.t) @-> returning bool) +let _CFReadStreamOpen = Foreign.foreign ~stub:true "CFReadStreamOpen" ((ptr CFReadStream.t) @-> returning bool) +let _CFReadStreamRead = Foreign.foreign ~stub:true "CFReadStreamRead" ((ptr CFReadStream.t) @-> string @-> llong @-> returning llong) +let _CFReadStreamScheduleWithRunLoop = Foreign.foreign ~stub:true "CFReadStreamScheduleWithRunLoop" ((ptr CFReadStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) +let _CFReadStreamSetClient = Foreign.foreign ~stub:true "CFReadStreamSetClient" ((ptr CFReadStream.t) @-> ullong @-> Foreign.funptr ((ptr CFReadStream.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFStreamClientContext.t) @-> returning bool) +let _CFReadStreamSetDispatchQueue = Foreign.foreign ~stub:true "CFReadStreamSetDispatchQueue" ((ptr CFReadStream.t) @-> id @-> returning void) +let _CFReadStreamSetProperty = Foreign.foreign ~stub:true "CFReadStreamSetProperty" ((ptr CFReadStream.t) @-> (ptr CFString.t) @-> id @-> returning bool) +let _CFReadStreamUnscheduleFromRunLoop = Foreign.foreign ~stub:true "CFReadStreamUnscheduleFromRunLoop" ((ptr CFReadStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) +let _CFRelease = Foreign.foreign ~stub:true "CFRelease" (id @-> returning void) +let _CFRetain = Foreign.foreign ~stub:true "CFRetain" (id @-> returning id) +let _CFRunLoopAddCommonMode = Foreign.foreign ~stub:true "CFRunLoopAddCommonMode" ((ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) +let _CFRunLoopAddObserver = Foreign.foreign ~stub:true "CFRunLoopAddObserver" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopObserver.t) @-> (ptr CFString.t) @-> returning void) +let _CFRunLoopAddSource = Foreign.foreign ~stub:true "CFRunLoopAddSource" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopSource.t) @-> (ptr CFString.t) @-> returning void) +let _CFRunLoopAddTimer = Foreign.foreign ~stub:true "CFRunLoopAddTimer" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopTimer.t) @-> (ptr CFString.t) @-> returning void) +let _CFRunLoopContainsObserver = Foreign.foreign ~stub:true "CFRunLoopContainsObserver" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopObserver.t) @-> (ptr CFString.t) @-> returning bool) +let _CFRunLoopContainsSource = Foreign.foreign ~stub:true "CFRunLoopContainsSource" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopSource.t) @-> (ptr CFString.t) @-> returning bool) +let _CFRunLoopContainsTimer = Foreign.foreign ~stub:true "CFRunLoopContainsTimer" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopTimer.t) @-> (ptr CFString.t) @-> returning bool) +let _CFRunLoopCopyAllModes = Foreign.foreign ~stub:true "CFRunLoopCopyAllModes" ((ptr CFRunLoop.t) @-> returning (ptr CFArray.t)) +let _CFRunLoopCopyCurrentMode = Foreign.foreign ~stub:true "CFRunLoopCopyCurrentMode" ((ptr CFRunLoop.t) @-> returning (ptr CFString.t)) +let _CFRunLoopGetCurrent = Foreign.foreign ~stub:true "CFRunLoopGetCurrent" (void @-> returning (ptr CFRunLoop.t)) +let _CFRunLoopGetMain = Foreign.foreign ~stub:true "CFRunLoopGetMain" (void @-> returning (ptr CFRunLoop.t)) +let _CFRunLoopGetNextTimerFireDate = Foreign.foreign ~stub:true "CFRunLoopGetNextTimerFireDate" ((ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning double) +let _CFRunLoopGetTypeID = Foreign.foreign ~stub:true "CFRunLoopGetTypeID" (void @-> returning ullong) +let _CFRunLoopIsWaiting = Foreign.foreign ~stub:true "CFRunLoopIsWaiting" ((ptr CFRunLoop.t) @-> returning bool) +let _CFRunLoopObserverCreate = Foreign.foreign ~stub:true "CFRunLoopObserverCreate" ((ptr CFAllocator.t) @-> ullong @-> bool @-> llong @-> Foreign.funptr ((ptr CFRunLoopObserver.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFRunLoopObserverContext.t) @-> returning (ptr CFRunLoopObserver.t)) +let _CFRunLoopObserverCreateWithHandler = Foreign.foreign ~stub:true "CFRunLoopObserverCreateWithHandler" ((ptr CFAllocator.t) @-> ullong @-> bool @-> llong @-> Foreign.funptr ((ptr CFRunLoopObserver.t) @-> ullong @-> returning void) @-> returning (ptr CFRunLoopObserver.t)) +let _CFRunLoopObserverDoesRepeat = Foreign.foreign ~stub:true "CFRunLoopObserverDoesRepeat" ((ptr CFRunLoopObserver.t) @-> returning bool) +let _CFRunLoopObserverGetActivities = Foreign.foreign ~stub:true "CFRunLoopObserverGetActivities" ((ptr CFRunLoopObserver.t) @-> returning ullong) +let _CFRunLoopObserverGetContext = Foreign.foreign ~stub:true "CFRunLoopObserverGetContext" ((ptr CFRunLoopObserver.t) @-> (ptr CFRunLoopObserverContext.t) @-> returning void) +let _CFRunLoopObserverGetOrder = Foreign.foreign ~stub:true "CFRunLoopObserverGetOrder" ((ptr CFRunLoopObserver.t) @-> returning llong) +let _CFRunLoopObserverGetTypeID = Foreign.foreign ~stub:true "CFRunLoopObserverGetTypeID" (void @-> returning ullong) +let _CFRunLoopObserverInvalidate = Foreign.foreign ~stub:true "CFRunLoopObserverInvalidate" ((ptr CFRunLoopObserver.t) @-> returning void) +let _CFRunLoopObserverIsValid = Foreign.foreign ~stub:true "CFRunLoopObserverIsValid" ((ptr CFRunLoopObserver.t) @-> returning bool) +let _CFRunLoopPerformBlock = Foreign.foreign ~stub:true "CFRunLoopPerformBlock" ((ptr CFRunLoop.t) @-> id @-> Foreign.funptr (void @-> returning void) @-> returning void) +let _CFRunLoopRemoveObserver = Foreign.foreign ~stub:true "CFRunLoopRemoveObserver" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopObserver.t) @-> (ptr CFString.t) @-> returning void) +let _CFRunLoopRemoveSource = Foreign.foreign ~stub:true "CFRunLoopRemoveSource" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopSource.t) @-> (ptr CFString.t) @-> returning void) +let _CFRunLoopRemoveTimer = Foreign.foreign ~stub:true "CFRunLoopRemoveTimer" ((ptr CFRunLoop.t) @-> (ptr CFRunLoopTimer.t) @-> (ptr CFString.t) @-> returning void) +let _CFRunLoopRun = Foreign.foreign ~stub:true "CFRunLoopRun" (void @-> returning void) +let _CFRunLoopRunInMode = Foreign.foreign ~stub:true "CFRunLoopRunInMode" ((ptr CFString.t) @-> double @-> bool @-> returning int) +let _CFRunLoopSourceCreate = Foreign.foreign ~stub:true "CFRunLoopSourceCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr CFRunLoopSourceContext.t) @-> returning (ptr CFRunLoopSource.t)) +let _CFRunLoopSourceGetContext = Foreign.foreign ~stub:true "CFRunLoopSourceGetContext" ((ptr CFRunLoopSource.t) @-> (ptr CFRunLoopSourceContext.t) @-> returning void) +let _CFRunLoopSourceGetOrder = Foreign.foreign ~stub:true "CFRunLoopSourceGetOrder" ((ptr CFRunLoopSource.t) @-> returning llong) +let _CFRunLoopSourceGetTypeID = Foreign.foreign ~stub:true "CFRunLoopSourceGetTypeID" (void @-> returning ullong) +let _CFRunLoopSourceInvalidate = Foreign.foreign ~stub:true "CFRunLoopSourceInvalidate" ((ptr CFRunLoopSource.t) @-> returning void) +let _CFRunLoopSourceIsValid = Foreign.foreign ~stub:true "CFRunLoopSourceIsValid" ((ptr CFRunLoopSource.t) @-> returning bool) +let _CFRunLoopSourceSignal = Foreign.foreign ~stub:true "CFRunLoopSourceSignal" ((ptr CFRunLoopSource.t) @-> returning void) +let _CFRunLoopStop = Foreign.foreign ~stub:true "CFRunLoopStop" ((ptr CFRunLoop.t) @-> returning void) +let _CFRunLoopTimerCreate = Foreign.foreign ~stub:true "CFRunLoopTimerCreate" ((ptr CFAllocator.t) @-> double @-> double @-> ullong @-> llong @-> Foreign.funptr ((ptr CFRunLoopTimer.t) @-> (ptr void) @-> returning void) @-> (ptr CFRunLoopTimerContext.t) @-> returning (ptr CFRunLoopTimer.t)) +let _CFRunLoopTimerCreateWithHandler = Foreign.foreign ~stub:true "CFRunLoopTimerCreateWithHandler" ((ptr CFAllocator.t) @-> double @-> double @-> ullong @-> llong @-> Foreign.funptr ((ptr CFRunLoopTimer.t) @-> returning void) @-> returning (ptr CFRunLoopTimer.t)) +let _CFRunLoopTimerDoesRepeat = Foreign.foreign ~stub:true "CFRunLoopTimerDoesRepeat" ((ptr CFRunLoopTimer.t) @-> returning bool) +let _CFRunLoopTimerGetContext = Foreign.foreign ~stub:true "CFRunLoopTimerGetContext" ((ptr CFRunLoopTimer.t) @-> (ptr CFRunLoopTimerContext.t) @-> returning void) +let _CFRunLoopTimerGetInterval = Foreign.foreign ~stub:true "CFRunLoopTimerGetInterval" ((ptr CFRunLoopTimer.t) @-> returning double) +let _CFRunLoopTimerGetNextFireDate = Foreign.foreign ~stub:true "CFRunLoopTimerGetNextFireDate" ((ptr CFRunLoopTimer.t) @-> returning double) +let _CFRunLoopTimerGetOrder = Foreign.foreign ~stub:true "CFRunLoopTimerGetOrder" ((ptr CFRunLoopTimer.t) @-> returning llong) +let _CFRunLoopTimerGetTolerance = Foreign.foreign ~stub:true "CFRunLoopTimerGetTolerance" ((ptr CFRunLoopTimer.t) @-> returning double) +let _CFRunLoopTimerGetTypeID = Foreign.foreign ~stub:true "CFRunLoopTimerGetTypeID" (void @-> returning ullong) +let _CFRunLoopTimerInvalidate = Foreign.foreign ~stub:true "CFRunLoopTimerInvalidate" ((ptr CFRunLoopTimer.t) @-> returning void) +let _CFRunLoopTimerIsValid = Foreign.foreign ~stub:true "CFRunLoopTimerIsValid" ((ptr CFRunLoopTimer.t) @-> returning bool) +let _CFRunLoopTimerSetNextFireDate = Foreign.foreign ~stub:true "CFRunLoopTimerSetNextFireDate" ((ptr CFRunLoopTimer.t) @-> double @-> returning void) +let _CFRunLoopTimerSetTolerance = Foreign.foreign ~stub:true "CFRunLoopTimerSetTolerance" ((ptr CFRunLoopTimer.t) @-> double @-> returning void) +let _CFRunLoopWakeUp = Foreign.foreign ~stub:true "CFRunLoopWakeUp" ((ptr CFRunLoop.t) @-> returning void) +let _CFSetAddValue = Foreign.foreign ~stub:true "CFSetAddValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) +let _CFSetApplyFunction = Foreign.foreign ~stub:true "CFSetApplyFunction" ((ptr CFSet.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CFSetContainsValue = Foreign.foreign ~stub:true "CFSetContainsValue" ((ptr CFSet.t) @-> (ptr void) @-> returning bool) +let _CFSetCreate = Foreign.foreign ~stub:true "CFSetCreate" ((ptr CFAllocator.t) @-> (ptr (ptr void)) @-> llong @-> (ptr CFSetCallBacks.t) @-> returning (ptr CFSet.t)) +let _CFSetCreateCopy = Foreign.foreign ~stub:true "CFSetCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFSet.t) @-> returning (ptr CFSet.t)) +let _CFSetCreateMutable = Foreign.foreign ~stub:true "CFSetCreateMutable" ((ptr CFAllocator.t) @-> llong @-> (ptr CFSetCallBacks.t) @-> returning (ptr CFSet.t)) +let _CFSetCreateMutableCopy = Foreign.foreign ~stub:true "CFSetCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFSet.t) @-> returning (ptr CFSet.t)) +let _CFSetGetCount = Foreign.foreign ~stub:true "CFSetGetCount" ((ptr CFSet.t) @-> returning llong) +let _CFSetGetCountOfValue = Foreign.foreign ~stub:true "CFSetGetCountOfValue" ((ptr CFSet.t) @-> (ptr void) @-> returning llong) +let _CFSetGetTypeID = Foreign.foreign ~stub:true "CFSetGetTypeID" (void @-> returning ullong) +let _CFSetGetValue = Foreign.foreign ~stub:true "CFSetGetValue" ((ptr CFSet.t) @-> (ptr void) @-> returning (ptr void)) +let _CFSetGetValueIfPresent = Foreign.foreign ~stub:true "CFSetGetValueIfPresent" ((ptr CFSet.t) @-> (ptr void) @-> (ptr (ptr void)) @-> returning bool) +let _CFSetGetValues = Foreign.foreign ~stub:true "CFSetGetValues" ((ptr CFSet.t) @-> (ptr (ptr void)) @-> returning void) +let _CFSetRemoveAllValues = Foreign.foreign ~stub:true "CFSetRemoveAllValues" ((ptr CFSet.t) @-> returning void) +let _CFSetRemoveValue = Foreign.foreign ~stub:true "CFSetRemoveValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) +let _CFSetReplaceValue = Foreign.foreign ~stub:true "CFSetReplaceValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) +let _CFSetSetValue = Foreign.foreign ~stub:true "CFSetSetValue" ((ptr CFSet.t) @-> (ptr void) @-> returning void) +let _CFShow = Foreign.foreign ~stub:true "CFShow" (id @-> returning void) +let _CFShowStr = Foreign.foreign ~stub:true "CFShowStr" ((ptr CFString.t) @-> returning void) +let _CFSocketConnectToAddress = Foreign.foreign ~stub:true "CFSocketConnectToAddress" ((ptr CFSocket.t) @-> (ptr CFData.t) @-> double @-> returning llong) +let _CFSocketCopyAddress = Foreign.foreign ~stub:true "CFSocketCopyAddress" ((ptr CFSocket.t) @-> returning (ptr CFData.t)) +let _CFSocketCopyPeerAddress = Foreign.foreign ~stub:true "CFSocketCopyPeerAddress" ((ptr CFSocket.t) @-> returning (ptr CFData.t)) +let _CFSocketCopyRegisteredSocketSignature = Foreign.foreign ~stub:true "CFSocketCopyRegisteredSocketSignature" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr CFSocketSignature.t) @-> (ptr (ptr CFData.t)) @-> returning llong) +let _CFSocketCopyRegisteredValue = Foreign.foreign ~stub:true "CFSocketCopyRegisteredValue" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr (ptr void)) @-> (ptr (ptr CFData.t)) @-> returning llong) +let _CFSocketCreate = Foreign.foreign ~stub:true "CFSocketCreate" ((ptr CFAllocator.t) @-> int @-> int @-> int @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> returning (ptr CFSocket.t)) +let _CFSocketCreateConnectedToSocketSignature = Foreign.foreign ~stub:true "CFSocketCreateConnectedToSocketSignature" ((ptr CFAllocator.t) @-> (ptr CFSocketSignature.t) @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> double @-> returning (ptr CFSocket.t)) +let _CFSocketCreateRunLoopSource = Foreign.foreign ~stub:true "CFSocketCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFSocket.t) @-> llong @-> returning (ptr CFRunLoopSource.t)) +let _CFSocketCreateWithNative = Foreign.foreign ~stub:true "CFSocketCreateWithNative" ((ptr CFAllocator.t) @-> int @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> returning (ptr CFSocket.t)) +let _CFSocketCreateWithSocketSignature = Foreign.foreign ~stub:true "CFSocketCreateWithSocketSignature" ((ptr CFAllocator.t) @-> (ptr CFSocketSignature.t) @-> ullong @-> Foreign.funptr ((ptr CFSocket.t) @-> ullong @-> (ptr CFData.t) @-> (ptr void) @-> (ptr void) @-> returning void) @-> (ptr CFSocketContext.t) @-> returning (ptr CFSocket.t)) +let _CFSocketDisableCallBacks = Foreign.foreign ~stub:true "CFSocketDisableCallBacks" ((ptr CFSocket.t) @-> ullong @-> returning void) +let _CFSocketEnableCallBacks = Foreign.foreign ~stub:true "CFSocketEnableCallBacks" ((ptr CFSocket.t) @-> ullong @-> returning void) +let _CFSocketGetContext = Foreign.foreign ~stub:true "CFSocketGetContext" ((ptr CFSocket.t) @-> (ptr CFSocketContext.t) @-> returning void) +let _CFSocketGetDefaultNameRegistryPortNumber = Foreign.foreign ~stub:true "CFSocketGetDefaultNameRegistryPortNumber" (void @-> returning ushort) +let _CFSocketGetNative = Foreign.foreign ~stub:true "CFSocketGetNative" ((ptr CFSocket.t) @-> returning int) +let _CFSocketGetSocketFlags = Foreign.foreign ~stub:true "CFSocketGetSocketFlags" ((ptr CFSocket.t) @-> returning ullong) +let _CFSocketGetTypeID = Foreign.foreign ~stub:true "CFSocketGetTypeID" (void @-> returning ullong) +let _CFSocketInvalidate = Foreign.foreign ~stub:true "CFSocketInvalidate" ((ptr CFSocket.t) @-> returning void) +let _CFSocketIsValid = Foreign.foreign ~stub:true "CFSocketIsValid" ((ptr CFSocket.t) @-> returning bool) +let _CFSocketRegisterSocketSignature = Foreign.foreign ~stub:true "CFSocketRegisterSocketSignature" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr CFSocketSignature.t) @-> returning llong) +let _CFSocketRegisterValue = Foreign.foreign ~stub:true "CFSocketRegisterValue" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> (ptr void) @-> returning llong) +let _CFSocketSendData = Foreign.foreign ~stub:true "CFSocketSendData" ((ptr CFSocket.t) @-> (ptr CFData.t) @-> (ptr CFData.t) @-> double @-> returning llong) +let _CFSocketSetAddress = Foreign.foreign ~stub:true "CFSocketSetAddress" ((ptr CFSocket.t) @-> (ptr CFData.t) @-> returning llong) +let _CFSocketSetDefaultNameRegistryPortNumber = Foreign.foreign ~stub:true "CFSocketSetDefaultNameRegistryPortNumber" (ushort @-> returning void) +let _CFSocketSetSocketFlags = Foreign.foreign ~stub:true "CFSocketSetSocketFlags" ((ptr CFSocket.t) @-> ullong @-> returning void) +let _CFSocketUnregister = Foreign.foreign ~stub:true "CFSocketUnregister" ((ptr CFSocketSignature.t) @-> double @-> (ptr CFString.t) @-> returning llong) +let _CFStreamCreateBoundPair = Foreign.foreign ~stub:true "CFStreamCreateBoundPair" ((ptr CFAllocator.t) @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> llong @-> returning void) +let _CFStreamCreatePairWithPeerSocketSignature = Foreign.foreign ~stub:true "CFStreamCreatePairWithPeerSocketSignature" ((ptr CFAllocator.t) @-> (ptr CFSocketSignature.t) @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> returning void) +let _CFStreamCreatePairWithSocket = Foreign.foreign ~stub:true "CFStreamCreatePairWithSocket" ((ptr CFAllocator.t) @-> int @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> returning void) +let _CFStreamCreatePairWithSocketToHost = Foreign.foreign ~stub:true "CFStreamCreatePairWithSocketToHost" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> uint @-> (ptr (ptr CFReadStream.t)) @-> (ptr (ptr CFWriteStream.t)) @-> returning void) +let _CFStringAppend = Foreign.foreign ~stub:true "CFStringAppend" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) +let _CFStringAppendCString = Foreign.foreign ~stub:true "CFStringAppendCString" ((ptr CFString.t) @-> string @-> uint @-> returning void) +let _CFStringAppendCharacters = Foreign.foreign ~stub:true "CFStringAppendCharacters" ((ptr CFString.t) @-> (ptr ushort) @-> llong @-> returning void) +let _CFStringAppendFormat = Foreign.foreign ~stub:true "CFStringAppendFormat" ((ptr CFString.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> returning void) +let _CFStringAppendFormatAndArguments = Foreign.foreign ~stub:true "CFStringAppendFormatAndArguments" ((ptr CFString.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> (ptr void) @-> returning void) +let _CFStringAppendPascalString = Foreign.foreign ~stub:true "CFStringAppendPascalString" ((ptr CFString.t) @-> string @-> uint @-> returning void) +let _CFStringCapitalize = Foreign.foreign ~stub:true "CFStringCapitalize" ((ptr CFString.t) @-> (ptr CFLocale.t) @-> returning void) +let _CFStringCompare = Foreign.foreign ~stub:true "CFStringCompare" ((ptr CFString.t) @-> (ptr CFString.t) @-> ullong @-> returning llong) +let _CFStringCompareWithOptions = Foreign.foreign ~stub:true "CFStringCompareWithOptions" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> returning llong) +let _CFStringCompareWithOptionsAndLocale = Foreign.foreign ~stub:true "CFStringCompareWithOptionsAndLocale" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> returning llong) +let _CFStringConvertEncodingToIANACharSetName = Foreign.foreign ~stub:true "CFStringConvertEncodingToIANACharSetName" (uint @-> returning (ptr CFString.t)) +let _CFStringConvertEncodingToNSStringEncoding = Foreign.foreign ~stub:true "CFStringConvertEncodingToNSStringEncoding" (uint @-> returning ullong) +let _CFStringConvertEncodingToWindowsCodepage = Foreign.foreign ~stub:true "CFStringConvertEncodingToWindowsCodepage" (uint @-> returning uint) +let _CFStringConvertIANACharSetNameToEncoding = Foreign.foreign ~stub:true "CFStringConvertIANACharSetNameToEncoding" ((ptr CFString.t) @-> returning uint) +let _CFStringConvertNSStringEncodingToEncoding = Foreign.foreign ~stub:true "CFStringConvertNSStringEncodingToEncoding" (ullong @-> returning uint) +let _CFStringConvertWindowsCodepageToEncoding = Foreign.foreign ~stub:true "CFStringConvertWindowsCodepageToEncoding" (uint @-> returning uint) +let _CFStringCreateArrayBySeparatingStrings = Foreign.foreign ~stub:true "CFStringCreateArrayBySeparatingStrings" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFArray.t)) +let _CFStringCreateArrayWithFindResults = Foreign.foreign ~stub:true "CFStringCreateArrayWithFindResults" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> returning (ptr CFArray.t)) +let _CFStringCreateByCombiningStrings = Foreign.foreign ~stub:true "CFStringCreateByCombiningStrings" ((ptr CFAllocator.t) @-> (ptr CFArray.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFStringCreateCopy = Foreign.foreign ~stub:true "CFStringCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFStringCreateExternalRepresentation = Foreign.foreign ~stub:true "CFStringCreateExternalRepresentation" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> uint @-> uchar @-> returning (ptr CFData.t)) +let _CFStringCreateFromExternalRepresentation = Foreign.foreign ~stub:true "CFStringCreateFromExternalRepresentation" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> uint @-> returning (ptr CFString.t)) +let _CFStringCreateMutable = Foreign.foreign ~stub:true "CFStringCreateMutable" ((ptr CFAllocator.t) @-> llong @-> returning (ptr CFString.t)) +let _CFStringCreateMutableCopy = Foreign.foreign ~stub:true "CFStringCreateMutableCopy" ((ptr CFAllocator.t) @-> llong @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFStringCreateMutableWithExternalCharactersNoCopy = Foreign.foreign ~stub:true "CFStringCreateMutableWithExternalCharactersNoCopy" ((ptr CFAllocator.t) @-> (ptr ushort) @-> llong @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) +let _CFStringCreateWithBytes = Foreign.foreign ~stub:true "CFStringCreateWithBytes" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> bool @-> returning (ptr CFString.t)) +let _CFStringCreateWithBytesNoCopy = Foreign.foreign ~stub:true "CFStringCreateWithBytesNoCopy" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> bool @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) +let _CFStringCreateWithCString = Foreign.foreign ~stub:true "CFStringCreateWithCString" ((ptr CFAllocator.t) @-> string @-> uint @-> returning (ptr CFString.t)) +let _CFStringCreateWithCStringNoCopy = Foreign.foreign ~stub:true "CFStringCreateWithCStringNoCopy" ((ptr CFAllocator.t) @-> string @-> uint @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) +let _CFStringCreateWithCharacters = Foreign.foreign ~stub:true "CFStringCreateWithCharacters" ((ptr CFAllocator.t) @-> (ptr ushort) @-> llong @-> returning (ptr CFString.t)) +let _CFStringCreateWithCharactersNoCopy = Foreign.foreign ~stub:true "CFStringCreateWithCharactersNoCopy" ((ptr CFAllocator.t) @-> (ptr ushort) @-> llong @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) +let _CFStringCreateWithFileSystemRepresentation = Foreign.foreign ~stub:true "CFStringCreateWithFileSystemRepresentation" ((ptr CFAllocator.t) @-> string @-> returning (ptr CFString.t)) +let _CFStringCreateWithFormat = Foreign.foreign ~stub:true "CFStringCreateWithFormat" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFStringCreateWithFormatAndArguments = Foreign.foreign ~stub:true "CFStringCreateWithFormatAndArguments" ((ptr CFAllocator.t) @-> (ptr CFDictionary.t) @-> (ptr CFString.t) @-> (ptr void) @-> returning (ptr CFString.t)) +let _CFStringCreateWithPascalString = Foreign.foreign ~stub:true "CFStringCreateWithPascalString" ((ptr CFAllocator.t) @-> string @-> uint @-> returning (ptr CFString.t)) +let _CFStringCreateWithPascalStringNoCopy = Foreign.foreign ~stub:true "CFStringCreateWithPascalStringNoCopy" ((ptr CFAllocator.t) @-> string @-> uint @-> (ptr CFAllocator.t) @-> returning (ptr CFString.t)) +let _CFStringCreateWithSubstring = Foreign.foreign ~stub:true "CFStringCreateWithSubstring" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> CFRange.t @-> returning (ptr CFString.t)) +let _CFStringDelete = Foreign.foreign ~stub:true "CFStringDelete" ((ptr CFString.t) @-> CFRange.t @-> returning void) +let _CFStringFind = Foreign.foreign ~stub:true "CFStringFind" ((ptr CFString.t) @-> (ptr CFString.t) @-> ullong @-> returning CFRange.t) +let _CFStringFindAndReplace = Foreign.foreign ~stub:true "CFStringFindAndReplace" ((ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> returning llong) +let _CFStringFindCharacterFromSet = Foreign.foreign ~stub:true "CFStringFindCharacterFromSet" ((ptr CFString.t) @-> (ptr CFCharacterSet.t) @-> CFRange.t @-> ullong @-> (ptr CFRange.t) @-> returning bool) +let _CFStringFindWithOptions = Foreign.foreign ~stub:true "CFStringFindWithOptions" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFRange.t) @-> returning bool) +let _CFStringFindWithOptionsAndLocale = Foreign.foreign ~stub:true "CFStringFindWithOptionsAndLocale" ((ptr CFString.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> (ptr CFRange.t) @-> returning bool) +let _CFStringFold = Foreign.foreign ~stub:true "CFStringFold" ((ptr CFString.t) @-> ullong @-> (ptr CFLocale.t) @-> returning void) +let _CFStringGetBytes = Foreign.foreign ~stub:true "CFStringGetBytes" ((ptr CFString.t) @-> CFRange.t @-> uint @-> uchar @-> bool @-> string @-> llong @-> (ptr llong) @-> returning llong) +let _CFStringGetCString = Foreign.foreign ~stub:true "CFStringGetCString" ((ptr CFString.t) @-> string @-> llong @-> uint @-> returning bool) +let _CFStringGetCStringPtr = Foreign.foreign ~stub:true "CFStringGetCStringPtr" ((ptr CFString.t) @-> uint @-> returning string) +let _CFStringGetCharacterAtIndex = Foreign.foreign ~stub:true "CFStringGetCharacterAtIndex" ((ptr CFString.t) @-> llong @-> returning ushort) (* let _CFStringGetCharacterFromInlineBuffer = Foreign.foreign "Camlkit_CFStringGetCharacterFromInlineBuffer" ((ptr CFStringInlineBuffer.t) @-> llong @-> returning ushort) *) -let _CFStringGetCharacters = Foreign.foreign "CFStringGetCharacters" ((ptr CFString.t) @-> CFRange.t @-> (ptr ushort) @-> returning void) -let _CFStringGetCharactersPtr = Foreign.foreign "CFStringGetCharactersPtr" ((ptr CFString.t) @-> returning (ptr ushort)) -let _CFStringGetDoubleValue = Foreign.foreign "CFStringGetDoubleValue" ((ptr CFString.t) @-> returning double) -let _CFStringGetFastestEncoding = Foreign.foreign "CFStringGetFastestEncoding" ((ptr CFString.t) @-> returning uint) -let _CFStringGetFileSystemRepresentation = Foreign.foreign "CFStringGetFileSystemRepresentation" ((ptr CFString.t) @-> string @-> llong @-> returning bool) -let _CFStringGetHyphenationLocationBeforeIndex = Foreign.foreign "CFStringGetHyphenationLocationBeforeIndex" ((ptr CFString.t) @-> llong @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> (ptr uint) @-> returning llong) -let _CFStringGetIntValue = Foreign.foreign "CFStringGetIntValue" ((ptr CFString.t) @-> returning int) -let _CFStringGetLength = Foreign.foreign "CFStringGetLength" ((ptr CFString.t) @-> returning llong) -let _CFStringGetLineBounds = Foreign.foreign "CFStringGetLineBounds" ((ptr CFString.t) @-> CFRange.t @-> (ptr llong) @-> (ptr llong) @-> (ptr llong) @-> returning void) -let _CFStringGetListOfAvailableEncodings = Foreign.foreign "CFStringGetListOfAvailableEncodings" (void @-> returning (ptr uint)) +let _CFStringGetCharacters = Foreign.foreign ~stub:true "CFStringGetCharacters" ((ptr CFString.t) @-> CFRange.t @-> (ptr ushort) @-> returning void) +let _CFStringGetCharactersPtr = Foreign.foreign ~stub:true "CFStringGetCharactersPtr" ((ptr CFString.t) @-> returning (ptr ushort)) +let _CFStringGetDoubleValue = Foreign.foreign ~stub:true "CFStringGetDoubleValue" ((ptr CFString.t) @-> returning double) +let _CFStringGetFastestEncoding = Foreign.foreign ~stub:true "CFStringGetFastestEncoding" ((ptr CFString.t) @-> returning uint) +let _CFStringGetFileSystemRepresentation = Foreign.foreign ~stub:true "CFStringGetFileSystemRepresentation" ((ptr CFString.t) @-> string @-> llong @-> returning bool) +let _CFStringGetHyphenationLocationBeforeIndex = Foreign.foreign ~stub:true "CFStringGetHyphenationLocationBeforeIndex" ((ptr CFString.t) @-> llong @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> (ptr uint) @-> returning llong) +let _CFStringGetIntValue = Foreign.foreign ~stub:true "CFStringGetIntValue" ((ptr CFString.t) @-> returning int) +let _CFStringGetLength = Foreign.foreign ~stub:true "CFStringGetLength" ((ptr CFString.t) @-> returning llong) +let _CFStringGetLineBounds = Foreign.foreign ~stub:true "CFStringGetLineBounds" ((ptr CFString.t) @-> CFRange.t @-> (ptr llong) @-> (ptr llong) @-> (ptr llong) @-> returning void) +let _CFStringGetListOfAvailableEncodings = Foreign.foreign ~stub:true "CFStringGetListOfAvailableEncodings" (void @-> returning (ptr uint)) (* let _CFStringGetLongCharacterForSurrogatePair = Foreign.foreign "Camlkit_CFStringGetLongCharacterForSurrogatePair" (ushort @-> ushort @-> returning uint) *) -let _CFStringGetMaximumSizeForEncoding = Foreign.foreign "CFStringGetMaximumSizeForEncoding" (llong @-> uint @-> returning llong) -let _CFStringGetMaximumSizeOfFileSystemRepresentation = Foreign.foreign "CFStringGetMaximumSizeOfFileSystemRepresentation" ((ptr CFString.t) @-> returning llong) -let _CFStringGetMostCompatibleMacStringEncoding = Foreign.foreign "CFStringGetMostCompatibleMacStringEncoding" (uint @-> returning uint) -let _CFStringGetNameOfEncoding = Foreign.foreign "CFStringGetNameOfEncoding" (uint @-> returning (ptr CFString.t)) -let _CFStringGetParagraphBounds = Foreign.foreign "CFStringGetParagraphBounds" ((ptr CFString.t) @-> CFRange.t @-> (ptr llong) @-> (ptr llong) @-> (ptr llong) @-> returning void) -let _CFStringGetPascalString = Foreign.foreign "CFStringGetPascalString" ((ptr CFString.t) @-> string @-> llong @-> uint @-> returning bool) -let _CFStringGetPascalStringPtr = Foreign.foreign "CFStringGetPascalStringPtr" ((ptr CFString.t) @-> uint @-> returning string) -let _CFStringGetRangeOfComposedCharactersAtIndex = Foreign.foreign "CFStringGetRangeOfComposedCharactersAtIndex" ((ptr CFString.t) @-> llong @-> returning CFRange.t) -let _CFStringGetSmallestEncoding = Foreign.foreign "CFStringGetSmallestEncoding" ((ptr CFString.t) @-> returning uint) +let _CFStringGetMaximumSizeForEncoding = Foreign.foreign ~stub:true "CFStringGetMaximumSizeForEncoding" (llong @-> uint @-> returning llong) +let _CFStringGetMaximumSizeOfFileSystemRepresentation = Foreign.foreign ~stub:true "CFStringGetMaximumSizeOfFileSystemRepresentation" ((ptr CFString.t) @-> returning llong) +let _CFStringGetMostCompatibleMacStringEncoding = Foreign.foreign ~stub:true "CFStringGetMostCompatibleMacStringEncoding" (uint @-> returning uint) +let _CFStringGetNameOfEncoding = Foreign.foreign ~stub:true "CFStringGetNameOfEncoding" (uint @-> returning (ptr CFString.t)) +let _CFStringGetParagraphBounds = Foreign.foreign ~stub:true "CFStringGetParagraphBounds" ((ptr CFString.t) @-> CFRange.t @-> (ptr llong) @-> (ptr llong) @-> (ptr llong) @-> returning void) +let _CFStringGetPascalString = Foreign.foreign ~stub:true "CFStringGetPascalString" ((ptr CFString.t) @-> string @-> llong @-> uint @-> returning bool) +let _CFStringGetPascalStringPtr = Foreign.foreign ~stub:true "CFStringGetPascalStringPtr" ((ptr CFString.t) @-> uint @-> returning string) +let _CFStringGetRangeOfComposedCharactersAtIndex = Foreign.foreign ~stub:true "CFStringGetRangeOfComposedCharactersAtIndex" ((ptr CFString.t) @-> llong @-> returning CFRange.t) +let _CFStringGetSmallestEncoding = Foreign.foreign ~stub:true "CFStringGetSmallestEncoding" ((ptr CFString.t) @-> returning uint) (* let _CFStringGetSurrogatePairForLongCharacter = Foreign.foreign "Camlkit_CFStringGetSurrogatePairForLongCharacter" (uint @-> (ptr ushort) @-> returning bool) *) -let _CFStringGetSystemEncoding = Foreign.foreign "CFStringGetSystemEncoding" (void @-> returning uint) -let _CFStringGetTypeID = Foreign.foreign "CFStringGetTypeID" (void @-> returning ullong) -let _CFStringHasPrefix = Foreign.foreign "CFStringHasPrefix" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) -let _CFStringHasSuffix = Foreign.foreign "CFStringHasSuffix" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) +let _CFStringGetSystemEncoding = Foreign.foreign ~stub:true "CFStringGetSystemEncoding" (void @-> returning uint) +let _CFStringGetTypeID = Foreign.foreign ~stub:true "CFStringGetTypeID" (void @-> returning ullong) +let _CFStringHasPrefix = Foreign.foreign ~stub:true "CFStringHasPrefix" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) +let _CFStringHasSuffix = Foreign.foreign ~stub:true "CFStringHasSuffix" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning bool) (* let _CFStringInitInlineBuffer = Foreign.foreign "Camlkit_CFStringInitInlineBuffer" ((ptr CFString.t) @-> (ptr CFStringInlineBuffer.t) @-> CFRange.t @-> returning void) *) -let _CFStringInsert = Foreign.foreign "CFStringInsert" ((ptr CFString.t) @-> llong @-> (ptr CFString.t) @-> returning void) -let _CFStringIsEncodingAvailable = Foreign.foreign "CFStringIsEncodingAvailable" (uint @-> returning bool) -let _CFStringIsHyphenationAvailableForLocale = Foreign.foreign "CFStringIsHyphenationAvailableForLocale" ((ptr CFLocale.t) @-> returning bool) +let _CFStringInsert = Foreign.foreign ~stub:true "CFStringInsert" ((ptr CFString.t) @-> llong @-> (ptr CFString.t) @-> returning void) +let _CFStringIsEncodingAvailable = Foreign.foreign ~stub:true "CFStringIsEncodingAvailable" (uint @-> returning bool) +let _CFStringIsHyphenationAvailableForLocale = Foreign.foreign ~stub:true "CFStringIsHyphenationAvailableForLocale" ((ptr CFLocale.t) @-> returning bool) (* let _CFStringIsSurrogateHighCharacter = Foreign.foreign "Camlkit_CFStringIsSurrogateHighCharacter" (ushort @-> returning bool) *) (* let _CFStringIsSurrogateLowCharacter = Foreign.foreign "Camlkit_CFStringIsSurrogateLowCharacter" (ushort @-> returning bool) *) -let _CFStringLowercase = Foreign.foreign "CFStringLowercase" ((ptr CFString.t) @-> (ptr CFLocale.t) @-> returning void) -let _CFStringNormalize = Foreign.foreign "CFStringNormalize" ((ptr CFString.t) @-> llong @-> returning void) -let _CFStringPad = Foreign.foreign "CFStringPad" ((ptr CFString.t) @-> (ptr CFString.t) @-> llong @-> llong @-> returning void) -let _CFStringReplace = Foreign.foreign "CFStringReplace" ((ptr CFString.t) @-> CFRange.t @-> (ptr CFString.t) @-> returning void) -let _CFStringReplaceAll = Foreign.foreign "CFStringReplaceAll" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) -let _CFStringSetExternalCharactersNoCopy = Foreign.foreign "CFStringSetExternalCharactersNoCopy" ((ptr CFString.t) @-> (ptr ushort) @-> llong @-> llong @-> returning void) -let _CFStringTokenizerAdvanceToNextToken = Foreign.foreign "CFStringTokenizerAdvanceToNextToken" ((ptr CFStringTokenizer.t) @-> returning ullong) -let _CFStringTokenizerCopyBestStringLanguage = Foreign.foreign "CFStringTokenizerCopyBestStringLanguage" ((ptr CFString.t) @-> CFRange.t @-> returning (ptr CFString.t)) -let _CFStringTokenizerCopyCurrentTokenAttribute = Foreign.foreign "CFStringTokenizerCopyCurrentTokenAttribute" ((ptr CFStringTokenizer.t) @-> ullong @-> returning id) -let _CFStringTokenizerCreate = Foreign.foreign "CFStringTokenizerCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> returning (ptr CFStringTokenizer.t)) -let _CFStringTokenizerGetCurrentSubTokens = Foreign.foreign "CFStringTokenizerGetCurrentSubTokens" ((ptr CFStringTokenizer.t) @-> (ptr CFRange.t) @-> llong @-> (ptr CFArray.t) @-> returning llong) -let _CFStringTokenizerGetCurrentTokenRange = Foreign.foreign "CFStringTokenizerGetCurrentTokenRange" ((ptr CFStringTokenizer.t) @-> returning CFRange.t) -let _CFStringTokenizerGetTypeID = Foreign.foreign "CFStringTokenizerGetTypeID" (void @-> returning ullong) -let _CFStringTokenizerGoToTokenAtIndex = Foreign.foreign "CFStringTokenizerGoToTokenAtIndex" ((ptr CFStringTokenizer.t) @-> llong @-> returning ullong) -let _CFStringTokenizerSetString = Foreign.foreign "CFStringTokenizerSetString" ((ptr CFStringTokenizer.t) @-> (ptr CFString.t) @-> CFRange.t @-> returning void) -let _CFStringTransform = Foreign.foreign "CFStringTransform" ((ptr CFString.t) @-> (ptr CFRange.t) @-> (ptr CFString.t) @-> bool @-> returning bool) -let _CFStringTrim = Foreign.foreign "CFStringTrim" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) -let _CFStringTrimWhitespace = Foreign.foreign "CFStringTrimWhitespace" ((ptr CFString.t) @-> returning void) -let _CFStringUppercase = Foreign.foreign "CFStringUppercase" ((ptr CFString.t) @-> (ptr CFLocale.t) @-> returning void) +let _CFStringLowercase = Foreign.foreign ~stub:true "CFStringLowercase" ((ptr CFString.t) @-> (ptr CFLocale.t) @-> returning void) +let _CFStringNormalize = Foreign.foreign ~stub:true "CFStringNormalize" ((ptr CFString.t) @-> llong @-> returning void) +let _CFStringPad = Foreign.foreign ~stub:true "CFStringPad" ((ptr CFString.t) @-> (ptr CFString.t) @-> llong @-> llong @-> returning void) +let _CFStringReplace = Foreign.foreign ~stub:true "CFStringReplace" ((ptr CFString.t) @-> CFRange.t @-> (ptr CFString.t) @-> returning void) +let _CFStringReplaceAll = Foreign.foreign ~stub:true "CFStringReplaceAll" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) +let _CFStringSetExternalCharactersNoCopy = Foreign.foreign ~stub:true "CFStringSetExternalCharactersNoCopy" ((ptr CFString.t) @-> (ptr ushort) @-> llong @-> llong @-> returning void) +let _CFStringTokenizerAdvanceToNextToken = Foreign.foreign ~stub:true "CFStringTokenizerAdvanceToNextToken" ((ptr CFStringTokenizer.t) @-> returning ullong) +let _CFStringTokenizerCopyBestStringLanguage = Foreign.foreign ~stub:true "CFStringTokenizerCopyBestStringLanguage" ((ptr CFString.t) @-> CFRange.t @-> returning (ptr CFString.t)) +let _CFStringTokenizerCopyCurrentTokenAttribute = Foreign.foreign ~stub:true "CFStringTokenizerCopyCurrentTokenAttribute" ((ptr CFStringTokenizer.t) @-> ullong @-> returning id) +let _CFStringTokenizerCreate = Foreign.foreign ~stub:true "CFStringTokenizerCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> CFRange.t @-> ullong @-> (ptr CFLocale.t) @-> returning (ptr CFStringTokenizer.t)) +let _CFStringTokenizerGetCurrentSubTokens = Foreign.foreign ~stub:true "CFStringTokenizerGetCurrentSubTokens" ((ptr CFStringTokenizer.t) @-> (ptr CFRange.t) @-> llong @-> (ptr CFArray.t) @-> returning llong) +let _CFStringTokenizerGetCurrentTokenRange = Foreign.foreign ~stub:true "CFStringTokenizerGetCurrentTokenRange" ((ptr CFStringTokenizer.t) @-> returning CFRange.t) +let _CFStringTokenizerGetTypeID = Foreign.foreign ~stub:true "CFStringTokenizerGetTypeID" (void @-> returning ullong) +let _CFStringTokenizerGoToTokenAtIndex = Foreign.foreign ~stub:true "CFStringTokenizerGoToTokenAtIndex" ((ptr CFStringTokenizer.t) @-> llong @-> returning ullong) +let _CFStringTokenizerSetString = Foreign.foreign ~stub:true "CFStringTokenizerSetString" ((ptr CFStringTokenizer.t) @-> (ptr CFString.t) @-> CFRange.t @-> returning void) +let _CFStringTransform = Foreign.foreign ~stub:true "CFStringTransform" ((ptr CFString.t) @-> (ptr CFRange.t) @-> (ptr CFString.t) @-> bool @-> returning bool) +let _CFStringTrim = Foreign.foreign ~stub:true "CFStringTrim" ((ptr CFString.t) @-> (ptr CFString.t) @-> returning void) +let _CFStringTrimWhitespace = Foreign.foreign ~stub:true "CFStringTrimWhitespace" ((ptr CFString.t) @-> returning void) +let _CFStringUppercase = Foreign.foreign ~stub:true "CFStringUppercase" ((ptr CFString.t) @-> (ptr CFLocale.t) @-> returning void) (* let _CFSwapInt16 = Foreign.foreign "Camlkit_CFSwapInt16" (ushort @-> returning ushort) *) (* let _CFSwapInt16BigToHost = Foreign.foreign "Camlkit_CFSwapInt16BigToHost" (ushort @-> returning ushort) *) (* let _CFSwapInt16HostToBig = Foreign.foreign "Camlkit_CFSwapInt16HostToBig" (ushort @-> returning ushort) *) @@ -675,179 +678,179 @@ let _CFStringUppercase = Foreign.foreign "CFStringUppercase" ((ptr CFString.t) @ (* let _CFSwapInt64HostToBig = Foreign.foreign "Camlkit_CFSwapInt64HostToBig" (ullong @-> returning ullong) *) (* let _CFSwapInt64HostToLittle = Foreign.foreign "Camlkit_CFSwapInt64HostToLittle" (ullong @-> returning ullong) *) (* let _CFSwapInt64LittleToHost = Foreign.foreign "Camlkit_CFSwapInt64LittleToHost" (ullong @-> returning ullong) *) -let _CFTimeZoneCopyAbbreviation = Foreign.foreign "CFTimeZoneCopyAbbreviation" ((ptr CFTimeZone.t) @-> double @-> returning (ptr CFString.t)) -let _CFTimeZoneCopyAbbreviationDictionary = Foreign.foreign "CFTimeZoneCopyAbbreviationDictionary" (void @-> returning (ptr CFDictionary.t)) -let _CFTimeZoneCopyDefault = Foreign.foreign "CFTimeZoneCopyDefault" (void @-> returning (ptr CFTimeZone.t)) -let _CFTimeZoneCopyKnownNames = Foreign.foreign "CFTimeZoneCopyKnownNames" (void @-> returning (ptr CFArray.t)) -let _CFTimeZoneCopyLocalizedName = Foreign.foreign "CFTimeZoneCopyLocalizedName" ((ptr CFTimeZone.t) @-> llong @-> (ptr CFLocale.t) @-> returning (ptr CFString.t)) -let _CFTimeZoneCopySystem = Foreign.foreign "CFTimeZoneCopySystem" (void @-> returning (ptr CFTimeZone.t)) -let _CFTimeZoneCreate = Foreign.foreign "CFTimeZoneCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFData.t) @-> returning (ptr CFTimeZone.t)) -let _CFTimeZoneCreateWithName = Foreign.foreign "CFTimeZoneCreateWithName" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> bool @-> returning (ptr CFTimeZone.t)) -let _CFTimeZoneCreateWithTimeIntervalFromGMT = Foreign.foreign "CFTimeZoneCreateWithTimeIntervalFromGMT" ((ptr CFAllocator.t) @-> double @-> returning (ptr CFTimeZone.t)) -let _CFTimeZoneGetData = Foreign.foreign "CFTimeZoneGetData" ((ptr CFTimeZone.t) @-> returning (ptr CFData.t)) -let _CFTimeZoneGetDaylightSavingTimeOffset = Foreign.foreign "CFTimeZoneGetDaylightSavingTimeOffset" ((ptr CFTimeZone.t) @-> double @-> returning double) -let _CFTimeZoneGetName = Foreign.foreign "CFTimeZoneGetName" ((ptr CFTimeZone.t) @-> returning (ptr CFString.t)) -let _CFTimeZoneGetNextDaylightSavingTimeTransition = Foreign.foreign "CFTimeZoneGetNextDaylightSavingTimeTransition" ((ptr CFTimeZone.t) @-> double @-> returning double) -let _CFTimeZoneGetSecondsFromGMT = Foreign.foreign "CFTimeZoneGetSecondsFromGMT" ((ptr CFTimeZone.t) @-> double @-> returning double) -let _CFTimeZoneGetTypeID = Foreign.foreign "CFTimeZoneGetTypeID" (void @-> returning ullong) -let _CFTimeZoneIsDaylightSavingTime = Foreign.foreign "CFTimeZoneIsDaylightSavingTime" ((ptr CFTimeZone.t) @-> double @-> returning bool) -let _CFTimeZoneResetSystem = Foreign.foreign "CFTimeZoneResetSystem" (void @-> returning void) -let _CFTimeZoneSetAbbreviationDictionary = Foreign.foreign "CFTimeZoneSetAbbreviationDictionary" ((ptr CFDictionary.t) @-> returning void) -let _CFTimeZoneSetDefault = Foreign.foreign "CFTimeZoneSetDefault" ((ptr CFTimeZone.t) @-> returning void) -let _CFTreeAppendChild = Foreign.foreign "CFTreeAppendChild" ((ptr CFTree.t) @-> (ptr CFTree.t) @-> returning void) -let _CFTreeApplyFunctionToChildren = Foreign.foreign "CFTreeApplyFunctionToChildren" ((ptr CFTree.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CFTreeCreate = Foreign.foreign "CFTreeCreate" ((ptr CFAllocator.t) @-> (ptr CFTreeContext.t) @-> returning (ptr CFTree.t)) -let _CFTreeFindRoot = Foreign.foreign "CFTreeFindRoot" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) -let _CFTreeGetChildAtIndex = Foreign.foreign "CFTreeGetChildAtIndex" ((ptr CFTree.t) @-> llong @-> returning (ptr CFTree.t)) -let _CFTreeGetChildCount = Foreign.foreign "CFTreeGetChildCount" ((ptr CFTree.t) @-> returning llong) -let _CFTreeGetChildren = Foreign.foreign "CFTreeGetChildren" ((ptr CFTree.t) @-> (ptr (ptr CFTree.t)) @-> returning void) -let _CFTreeGetContext = Foreign.foreign "CFTreeGetContext" ((ptr CFTree.t) @-> (ptr CFTreeContext.t) @-> returning void) -let _CFTreeGetFirstChild = Foreign.foreign "CFTreeGetFirstChild" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) -let _CFTreeGetNextSibling = Foreign.foreign "CFTreeGetNextSibling" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) -let _CFTreeGetParent = Foreign.foreign "CFTreeGetParent" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) -let _CFTreeGetTypeID = Foreign.foreign "CFTreeGetTypeID" (void @-> returning ullong) -let _CFTreeInsertSibling = Foreign.foreign "CFTreeInsertSibling" ((ptr CFTree.t) @-> (ptr CFTree.t) @-> returning void) -let _CFTreePrependChild = Foreign.foreign "CFTreePrependChild" ((ptr CFTree.t) @-> (ptr CFTree.t) @-> returning void) -let _CFTreeRemove = Foreign.foreign "CFTreeRemove" ((ptr CFTree.t) @-> returning void) -let _CFTreeRemoveAllChildren = Foreign.foreign "CFTreeRemoveAllChildren" ((ptr CFTree.t) @-> returning void) -let _CFTreeSetContext = Foreign.foreign "CFTreeSetContext" ((ptr CFTree.t) @-> (ptr CFTreeContext.t) @-> returning void) -let _CFTreeSortChildren = Foreign.foreign "CFTreeSortChildren" ((ptr CFTree.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning llong) @-> (ptr void) @-> returning void) -let _CFURLCanBeDecomposed = Foreign.foreign "CFURLCanBeDecomposed" ((ptr CFURL.t) @-> returning bool) -let _CFURLClearResourcePropertyCache = Foreign.foreign "CFURLClearResourcePropertyCache" ((ptr CFURL.t) @-> returning void) -let _CFURLClearResourcePropertyCacheForKey = Foreign.foreign "CFURLClearResourcePropertyCacheForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning void) -let _CFURLCopyAbsoluteURL = Foreign.foreign "CFURLCopyAbsoluteURL" ((ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLCopyFileSystemPath = Foreign.foreign "CFURLCopyFileSystemPath" ((ptr CFURL.t) @-> llong @-> returning (ptr CFString.t)) -let _CFURLCopyFragment = Foreign.foreign "CFURLCopyFragment" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFURLCopyHostName = Foreign.foreign "CFURLCopyHostName" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyLastPathComponent = Foreign.foreign "CFURLCopyLastPathComponent" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyNetLocation = Foreign.foreign "CFURLCopyNetLocation" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyParameterString = Foreign.foreign "CFURLCopyParameterString" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFURLCopyPassword = Foreign.foreign "CFURLCopyPassword" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyPath = Foreign.foreign "CFURLCopyPath" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyPathExtension = Foreign.foreign "CFURLCopyPathExtension" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyQueryString = Foreign.foreign "CFURLCopyQueryString" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFURLCopyResourcePropertiesForKeys = Foreign.foreign "CFURLCopyResourcePropertiesForKeys" ((ptr CFURL.t) @-> (ptr CFArray.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFDictionary.t)) -let _CFURLCopyResourcePropertyForKey = Foreign.foreign "CFURLCopyResourcePropertyForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr (ptr CFError.t)) @-> returning bool) -let _CFURLCopyResourceSpecifier = Foreign.foreign "CFURLCopyResourceSpecifier" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyScheme = Foreign.foreign "CFURLCopyScheme" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCopyStrictPath = Foreign.foreign "CFURLCopyStrictPath" ((ptr CFURL.t) @-> (ptr bool) @-> returning (ptr CFString.t)) -let _CFURLCopyUserName = Foreign.foreign "CFURLCopyUserName" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLCreateAbsoluteURLWithBytes = Foreign.foreign "CFURLCreateAbsoluteURLWithBytes" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> (ptr CFURL.t) @-> bool @-> returning (ptr CFURL.t)) -let _CFURLCreateBookmarkData = Foreign.foreign "CFURLCreateBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> (ptr CFArray.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFData.t)) -let _CFURLCreateBookmarkDataFromAliasRecord = Foreign.foreign "CFURLCreateBookmarkDataFromAliasRecord" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CFData.t)) -let _CFURLCreateBookmarkDataFromFile = Foreign.foreign "CFURLCreateBookmarkDataFromFile" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFData.t)) -let _CFURLCreateByResolvingBookmarkData = Foreign.foreign "CFURLCreateByResolvingBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> ullong @-> (ptr CFURL.t) @-> (ptr CFArray.t) @-> (ptr bool) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFURL.t)) -let _CFURLCreateCopyAppendingPathComponent = Foreign.foreign "CFURLCreateCopyAppendingPathComponent" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> bool @-> returning (ptr CFURL.t)) -let _CFURLCreateCopyAppendingPathExtension = Foreign.foreign "CFURLCreateCopyAppendingPathExtension" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) -let _CFURLCreateCopyDeletingLastPathComponent = Foreign.foreign "CFURLCreateCopyDeletingLastPathComponent" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLCreateCopyDeletingPathExtension = Foreign.foreign "CFURLCreateCopyDeletingPathExtension" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLCreateData = Foreign.foreign "CFURLCreateData" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> uint @-> bool @-> returning (ptr CFData.t)) -let _CFURLCreateDataAndPropertiesFromResource = Foreign.foreign "CFURLCreateDataAndPropertiesFromResource" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFData.t)) @-> (ptr (ptr CFDictionary.t)) @-> (ptr CFArray.t) @-> (ptr int) @-> returning bool) -let _CFURLCreateFilePathURL = Foreign.foreign "CFURLCreateFilePathURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFURL.t)) -let _CFURLCreateFileReferenceURL = Foreign.foreign "CFURLCreateFileReferenceURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFURL.t)) -let _CFURLCreateFromFSRef = Foreign.foreign "CFURLCreateFromFSRef" ((ptr CFAllocator.t) @-> (ptr void) @-> returning (ptr CFURL.t)) -let _CFURLCreateFromFileSystemRepresentation = Foreign.foreign "CFURLCreateFromFileSystemRepresentation" ((ptr CFAllocator.t) @-> string @-> llong @-> bool @-> returning (ptr CFURL.t)) -let _CFURLCreateFromFileSystemRepresentationRelativeToBase = Foreign.foreign "CFURLCreateFromFileSystemRepresentationRelativeToBase" ((ptr CFAllocator.t) @-> string @-> llong @-> bool @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLCreatePropertyFromResource = Foreign.foreign "CFURLCreatePropertyFromResource" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr int) @-> returning id) -let _CFURLCreateResourcePropertiesForKeysFromBookmarkData = Foreign.foreign "CFURLCreateResourcePropertiesForKeysFromBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFArray.t) @-> (ptr CFData.t) @-> returning (ptr CFDictionary.t)) -let _CFURLCreateResourcePropertyForKeyFromBookmarkData = Foreign.foreign "CFURLCreateResourcePropertyForKeyFromBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFData.t) @-> returning id) -let _CFURLCreateStringByAddingPercentEscapes = Foreign.foreign "CFURLCreateStringByAddingPercentEscapes" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> uint @-> returning (ptr CFString.t)) -let _CFURLCreateStringByReplacingPercentEscapes = Foreign.foreign "CFURLCreateStringByReplacingPercentEscapes" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) -let _CFURLCreateStringByReplacingPercentEscapesUsingEncoding = Foreign.foreign "CFURLCreateStringByReplacingPercentEscapesUsingEncoding" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> uint @-> returning (ptr CFString.t)) -let _CFURLCreateWithBytes = Foreign.foreign "CFURLCreateWithBytes" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLCreateWithFileSystemPath = Foreign.foreign "CFURLCreateWithFileSystemPath" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> bool @-> returning (ptr CFURL.t)) -let _CFURLCreateWithFileSystemPathRelativeToBase = Foreign.foreign "CFURLCreateWithFileSystemPathRelativeToBase" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> bool @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLCreateWithString = Foreign.foreign "CFURLCreateWithString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLDestroyResource = Foreign.foreign "CFURLDestroyResource" ((ptr CFURL.t) @-> (ptr int) @-> returning bool) -let _CFURLEnumeratorCreateForDirectoryURL = Foreign.foreign "CFURLEnumeratorCreateForDirectoryURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> (ptr CFArray.t) @-> returning (ptr CFURLEnumerator.t)) -let _CFURLEnumeratorCreateForMountedVolumes = Foreign.foreign "CFURLEnumeratorCreateForMountedVolumes" ((ptr CFAllocator.t) @-> ullong @-> (ptr CFArray.t) @-> returning (ptr CFURLEnumerator.t)) -let _CFURLEnumeratorGetDescendentLevel = Foreign.foreign "CFURLEnumeratorGetDescendentLevel" ((ptr CFURLEnumerator.t) @-> returning llong) -let _CFURLEnumeratorGetNextURL = Foreign.foreign "CFURLEnumeratorGetNextURL" ((ptr CFURLEnumerator.t) @-> (ptr (ptr CFURL.t)) @-> (ptr (ptr CFError.t)) @-> returning llong) -let _CFURLEnumeratorGetSourceDidChange = Foreign.foreign "CFURLEnumeratorGetSourceDidChange" ((ptr CFURLEnumerator.t) @-> returning bool) -let _CFURLEnumeratorGetTypeID = Foreign.foreign "CFURLEnumeratorGetTypeID" (void @-> returning ullong) -let _CFURLEnumeratorSkipDescendents = Foreign.foreign "CFURLEnumeratorSkipDescendents" ((ptr CFURLEnumerator.t) @-> returning void) -let _CFURLGetBaseURL = Foreign.foreign "CFURLGetBaseURL" ((ptr CFURL.t) @-> returning (ptr CFURL.t)) -let _CFURLGetByteRangeForComponent = Foreign.foreign "CFURLGetByteRangeForComponent" ((ptr CFURL.t) @-> llong @-> (ptr CFRange.t) @-> returning CFRange.t) -let _CFURLGetBytes = Foreign.foreign "CFURLGetBytes" ((ptr CFURL.t) @-> string @-> llong @-> returning llong) -let _CFURLGetFSRef = Foreign.foreign "CFURLGetFSRef" ((ptr CFURL.t) @-> (ptr void) @-> returning bool) -let _CFURLGetFileSystemRepresentation = Foreign.foreign "CFURLGetFileSystemRepresentation" ((ptr CFURL.t) @-> bool @-> string @-> llong @-> returning bool) -let _CFURLGetPortNumber = Foreign.foreign "CFURLGetPortNumber" ((ptr CFURL.t) @-> returning int) -let _CFURLGetString = Foreign.foreign "CFURLGetString" ((ptr CFURL.t) @-> returning (ptr CFString.t)) -let _CFURLGetTypeID = Foreign.foreign "CFURLGetTypeID" (void @-> returning ullong) -let _CFURLHasDirectoryPath = Foreign.foreign "CFURLHasDirectoryPath" ((ptr CFURL.t) @-> returning bool) -let _CFURLIsFileReferenceURL = Foreign.foreign "CFURLIsFileReferenceURL" ((ptr CFURL.t) @-> returning bool) -let _CFURLResourceIsReachable = Foreign.foreign "CFURLResourceIsReachable" ((ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning bool) -let _CFURLSetResourcePropertiesForKeys = Foreign.foreign "CFURLSetResourcePropertiesForKeys" ((ptr CFURL.t) @-> (ptr CFDictionary.t) @-> (ptr (ptr CFError.t)) @-> returning bool) -let _CFURLSetResourcePropertyForKey = Foreign.foreign "CFURLSetResourcePropertyForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> id @-> (ptr (ptr CFError.t)) @-> returning bool) -let _CFURLSetTemporaryResourcePropertyForKey = Foreign.foreign "CFURLSetTemporaryResourcePropertyForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> id @-> returning void) -let _CFURLStartAccessingSecurityScopedResource = Foreign.foreign "CFURLStartAccessingSecurityScopedResource" ((ptr CFURL.t) @-> returning bool) -let _CFURLStopAccessingSecurityScopedResource = Foreign.foreign "CFURLStopAccessingSecurityScopedResource" ((ptr CFURL.t) @-> returning void) -let _CFURLWriteBookmarkDataToFile = Foreign.foreign "CFURLWriteBookmarkDataToFile" ((ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> (ptr (ptr CFError.t)) @-> returning bool) -let _CFURLWriteDataAndPropertiesToResource = Foreign.foreign "CFURLWriteDataAndPropertiesToResource" ((ptr CFURL.t) @-> (ptr CFData.t) @-> (ptr CFDictionary.t) @-> (ptr int) @-> returning bool) -let _CFUUIDCreate = Foreign.foreign "CFUUIDCreate" ((ptr CFAllocator.t) @-> returning (ptr CFUUID.t)) -let _CFUUIDCreateFromString = Foreign.foreign "CFUUIDCreateFromString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFUUID.t)) -let _CFUUIDCreateFromUUIDBytes = Foreign.foreign "CFUUIDCreateFromUUIDBytes" ((ptr CFAllocator.t) @-> CFUUIDBytes.t @-> returning (ptr CFUUID.t)) -let _CFUUIDCreateString = Foreign.foreign "CFUUIDCreateString" ((ptr CFAllocator.t) @-> (ptr CFUUID.t) @-> returning (ptr CFString.t)) -let _CFUUIDCreateWithBytes = Foreign.foreign "CFUUIDCreateWithBytes" ((ptr CFAllocator.t) @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> returning (ptr CFUUID.t)) -let _CFUUIDGetConstantUUIDWithBytes = Foreign.foreign "CFUUIDGetConstantUUIDWithBytes" ((ptr CFAllocator.t) @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> returning (ptr CFUUID.t)) -let _CFUUIDGetTypeID = Foreign.foreign "CFUUIDGetTypeID" (void @-> returning ullong) -let _CFUUIDGetUUIDBytes = Foreign.foreign "CFUUIDGetUUIDBytes" ((ptr CFUUID.t) @-> returning CFUUIDBytes.t) -let _CFUserNotificationCancel = Foreign.foreign "CFUserNotificationCancel" ((ptr CFUserNotification.t) @-> returning int) +let _CFTimeZoneCopyAbbreviation = Foreign.foreign ~stub:true "CFTimeZoneCopyAbbreviation" ((ptr CFTimeZone.t) @-> double @-> returning (ptr CFString.t)) +let _CFTimeZoneCopyAbbreviationDictionary = Foreign.foreign ~stub:true "CFTimeZoneCopyAbbreviationDictionary" (void @-> returning (ptr CFDictionary.t)) +let _CFTimeZoneCopyDefault = Foreign.foreign ~stub:true "CFTimeZoneCopyDefault" (void @-> returning (ptr CFTimeZone.t)) +let _CFTimeZoneCopyKnownNames = Foreign.foreign ~stub:true "CFTimeZoneCopyKnownNames" (void @-> returning (ptr CFArray.t)) +let _CFTimeZoneCopyLocalizedName = Foreign.foreign ~stub:true "CFTimeZoneCopyLocalizedName" ((ptr CFTimeZone.t) @-> llong @-> (ptr CFLocale.t) @-> returning (ptr CFString.t)) +let _CFTimeZoneCopySystem = Foreign.foreign ~stub:true "CFTimeZoneCopySystem" (void @-> returning (ptr CFTimeZone.t)) +let _CFTimeZoneCreate = Foreign.foreign ~stub:true "CFTimeZoneCreate" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFData.t) @-> returning (ptr CFTimeZone.t)) +let _CFTimeZoneCreateWithName = Foreign.foreign ~stub:true "CFTimeZoneCreateWithName" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> bool @-> returning (ptr CFTimeZone.t)) +let _CFTimeZoneCreateWithTimeIntervalFromGMT = Foreign.foreign ~stub:true "CFTimeZoneCreateWithTimeIntervalFromGMT" ((ptr CFAllocator.t) @-> double @-> returning (ptr CFTimeZone.t)) +let _CFTimeZoneGetData = Foreign.foreign ~stub:true "CFTimeZoneGetData" ((ptr CFTimeZone.t) @-> returning (ptr CFData.t)) +let _CFTimeZoneGetDaylightSavingTimeOffset = Foreign.foreign ~stub:true "CFTimeZoneGetDaylightSavingTimeOffset" ((ptr CFTimeZone.t) @-> double @-> returning double) +let _CFTimeZoneGetName = Foreign.foreign ~stub:true "CFTimeZoneGetName" ((ptr CFTimeZone.t) @-> returning (ptr CFString.t)) +let _CFTimeZoneGetNextDaylightSavingTimeTransition = Foreign.foreign ~stub:true "CFTimeZoneGetNextDaylightSavingTimeTransition" ((ptr CFTimeZone.t) @-> double @-> returning double) +let _CFTimeZoneGetSecondsFromGMT = Foreign.foreign ~stub:true "CFTimeZoneGetSecondsFromGMT" ((ptr CFTimeZone.t) @-> double @-> returning double) +let _CFTimeZoneGetTypeID = Foreign.foreign ~stub:true "CFTimeZoneGetTypeID" (void @-> returning ullong) +let _CFTimeZoneIsDaylightSavingTime = Foreign.foreign ~stub:true "CFTimeZoneIsDaylightSavingTime" ((ptr CFTimeZone.t) @-> double @-> returning bool) +let _CFTimeZoneResetSystem = Foreign.foreign ~stub:true "CFTimeZoneResetSystem" (void @-> returning void) +let _CFTimeZoneSetAbbreviationDictionary = Foreign.foreign ~stub:true "CFTimeZoneSetAbbreviationDictionary" ((ptr CFDictionary.t) @-> returning void) +let _CFTimeZoneSetDefault = Foreign.foreign ~stub:true "CFTimeZoneSetDefault" ((ptr CFTimeZone.t) @-> returning void) +let _CFTreeAppendChild = Foreign.foreign ~stub:true "CFTreeAppendChild" ((ptr CFTree.t) @-> (ptr CFTree.t) @-> returning void) +let _CFTreeApplyFunctionToChildren = Foreign.foreign ~stub:true "CFTreeApplyFunctionToChildren" ((ptr CFTree.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CFTreeCreate = Foreign.foreign ~stub:true "CFTreeCreate" ((ptr CFAllocator.t) @-> (ptr CFTreeContext.t) @-> returning (ptr CFTree.t)) +let _CFTreeFindRoot = Foreign.foreign ~stub:true "CFTreeFindRoot" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) +let _CFTreeGetChildAtIndex = Foreign.foreign ~stub:true "CFTreeGetChildAtIndex" ((ptr CFTree.t) @-> llong @-> returning (ptr CFTree.t)) +let _CFTreeGetChildCount = Foreign.foreign ~stub:true "CFTreeGetChildCount" ((ptr CFTree.t) @-> returning llong) +let _CFTreeGetChildren = Foreign.foreign ~stub:true "CFTreeGetChildren" ((ptr CFTree.t) @-> (ptr (ptr CFTree.t)) @-> returning void) +let _CFTreeGetContext = Foreign.foreign ~stub:true "CFTreeGetContext" ((ptr CFTree.t) @-> (ptr CFTreeContext.t) @-> returning void) +let _CFTreeGetFirstChild = Foreign.foreign ~stub:true "CFTreeGetFirstChild" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) +let _CFTreeGetNextSibling = Foreign.foreign ~stub:true "CFTreeGetNextSibling" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) +let _CFTreeGetParent = Foreign.foreign ~stub:true "CFTreeGetParent" ((ptr CFTree.t) @-> returning (ptr CFTree.t)) +let _CFTreeGetTypeID = Foreign.foreign ~stub:true "CFTreeGetTypeID" (void @-> returning ullong) +let _CFTreeInsertSibling = Foreign.foreign ~stub:true "CFTreeInsertSibling" ((ptr CFTree.t) @-> (ptr CFTree.t) @-> returning void) +let _CFTreePrependChild = Foreign.foreign ~stub:true "CFTreePrependChild" ((ptr CFTree.t) @-> (ptr CFTree.t) @-> returning void) +let _CFTreeRemove = Foreign.foreign ~stub:true "CFTreeRemove" ((ptr CFTree.t) @-> returning void) +let _CFTreeRemoveAllChildren = Foreign.foreign ~stub:true "CFTreeRemoveAllChildren" ((ptr CFTree.t) @-> returning void) +let _CFTreeSetContext = Foreign.foreign ~stub:true "CFTreeSetContext" ((ptr CFTree.t) @-> (ptr CFTreeContext.t) @-> returning void) +let _CFTreeSortChildren = Foreign.foreign ~stub:true "CFTreeSortChildren" ((ptr CFTree.t) @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> (ptr void) @-> returning llong) @-> (ptr void) @-> returning void) +let _CFURLCanBeDecomposed = Foreign.foreign ~stub:true "CFURLCanBeDecomposed" ((ptr CFURL.t) @-> returning bool) +let _CFURLClearResourcePropertyCache = Foreign.foreign ~stub:true "CFURLClearResourcePropertyCache" ((ptr CFURL.t) @-> returning void) +let _CFURLClearResourcePropertyCacheForKey = Foreign.foreign ~stub:true "CFURLClearResourcePropertyCacheForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning void) +let _CFURLCopyAbsoluteURL = Foreign.foreign ~stub:true "CFURLCopyAbsoluteURL" ((ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLCopyFileSystemPath = Foreign.foreign ~stub:true "CFURLCopyFileSystemPath" ((ptr CFURL.t) @-> llong @-> returning (ptr CFString.t)) +let _CFURLCopyFragment = Foreign.foreign ~stub:true "CFURLCopyFragment" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFURLCopyHostName = Foreign.foreign ~stub:true "CFURLCopyHostName" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyLastPathComponent = Foreign.foreign ~stub:true "CFURLCopyLastPathComponent" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyNetLocation = Foreign.foreign ~stub:true "CFURLCopyNetLocation" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyParameterString = Foreign.foreign ~stub:true "CFURLCopyParameterString" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFURLCopyPassword = Foreign.foreign ~stub:true "CFURLCopyPassword" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyPath = Foreign.foreign ~stub:true "CFURLCopyPath" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyPathExtension = Foreign.foreign ~stub:true "CFURLCopyPathExtension" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyQueryString = Foreign.foreign ~stub:true "CFURLCopyQueryString" ((ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFURLCopyResourcePropertiesForKeys = Foreign.foreign ~stub:true "CFURLCopyResourcePropertiesForKeys" ((ptr CFURL.t) @-> (ptr CFArray.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFDictionary.t)) +let _CFURLCopyResourcePropertyForKey = Foreign.foreign ~stub:true "CFURLCopyResourcePropertyForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr void) @-> (ptr (ptr CFError.t)) @-> returning bool) +let _CFURLCopyResourceSpecifier = Foreign.foreign ~stub:true "CFURLCopyResourceSpecifier" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyScheme = Foreign.foreign ~stub:true "CFURLCopyScheme" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCopyStrictPath = Foreign.foreign ~stub:true "CFURLCopyStrictPath" ((ptr CFURL.t) @-> (ptr bool) @-> returning (ptr CFString.t)) +let _CFURLCopyUserName = Foreign.foreign ~stub:true "CFURLCopyUserName" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLCreateAbsoluteURLWithBytes = Foreign.foreign ~stub:true "CFURLCreateAbsoluteURLWithBytes" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> (ptr CFURL.t) @-> bool @-> returning (ptr CFURL.t)) +let _CFURLCreateBookmarkData = Foreign.foreign ~stub:true "CFURLCreateBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> (ptr CFArray.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFData.t)) +let _CFURLCreateBookmarkDataFromAliasRecord = Foreign.foreign ~stub:true "CFURLCreateBookmarkDataFromAliasRecord" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CFData.t)) +let _CFURLCreateBookmarkDataFromFile = Foreign.foreign ~stub:true "CFURLCreateBookmarkDataFromFile" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFData.t)) +let _CFURLCreateByResolvingBookmarkData = Foreign.foreign ~stub:true "CFURLCreateByResolvingBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> ullong @-> (ptr CFURL.t) @-> (ptr CFArray.t) @-> (ptr bool) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFURL.t)) +let _CFURLCreateCopyAppendingPathComponent = Foreign.foreign ~stub:true "CFURLCreateCopyAppendingPathComponent" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> bool @-> returning (ptr CFURL.t)) +let _CFURLCreateCopyAppendingPathExtension = Foreign.foreign ~stub:true "CFURLCreateCopyAppendingPathExtension" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> returning (ptr CFURL.t)) +let _CFURLCreateCopyDeletingLastPathComponent = Foreign.foreign ~stub:true "CFURLCreateCopyDeletingLastPathComponent" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLCreateCopyDeletingPathExtension = Foreign.foreign ~stub:true "CFURLCreateCopyDeletingPathExtension" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLCreateData = Foreign.foreign ~stub:true "CFURLCreateData" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> uint @-> bool @-> returning (ptr CFData.t)) +let _CFURLCreateDataAndPropertiesFromResource = Foreign.foreign ~stub:true "CFURLCreateDataAndPropertiesFromResource" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFData.t)) @-> (ptr (ptr CFDictionary.t)) @-> (ptr CFArray.t) @-> (ptr int) @-> returning bool) +let _CFURLCreateFilePathURL = Foreign.foreign ~stub:true "CFURLCreateFilePathURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFURL.t)) +let _CFURLCreateFileReferenceURL = Foreign.foreign ~stub:true "CFURLCreateFileReferenceURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning (ptr CFURL.t)) +let _CFURLCreateFromFSRef = Foreign.foreign ~stub:true "CFURLCreateFromFSRef" ((ptr CFAllocator.t) @-> (ptr void) @-> returning (ptr CFURL.t)) +let _CFURLCreateFromFileSystemRepresentation = Foreign.foreign ~stub:true "CFURLCreateFromFileSystemRepresentation" ((ptr CFAllocator.t) @-> string @-> llong @-> bool @-> returning (ptr CFURL.t)) +let _CFURLCreateFromFileSystemRepresentationRelativeToBase = Foreign.foreign ~stub:true "CFURLCreateFromFileSystemRepresentationRelativeToBase" ((ptr CFAllocator.t) @-> string @-> llong @-> bool @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLCreatePropertyFromResource = Foreign.foreign ~stub:true "CFURLCreatePropertyFromResource" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr int) @-> returning id) +let _CFURLCreateResourcePropertiesForKeysFromBookmarkData = Foreign.foreign ~stub:true "CFURLCreateResourcePropertiesForKeysFromBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFArray.t) @-> (ptr CFData.t) @-> returning (ptr CFDictionary.t)) +let _CFURLCreateResourcePropertyForKeyFromBookmarkData = Foreign.foreign ~stub:true "CFURLCreateResourcePropertyForKeyFromBookmarkData" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFData.t) @-> returning id) +let _CFURLCreateStringByAddingPercentEscapes = Foreign.foreign ~stub:true "CFURLCreateStringByAddingPercentEscapes" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> uint @-> returning (ptr CFString.t)) +let _CFURLCreateStringByReplacingPercentEscapes = Foreign.foreign ~stub:true "CFURLCreateStringByReplacingPercentEscapes" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning (ptr CFString.t)) +let _CFURLCreateStringByReplacingPercentEscapesUsingEncoding = Foreign.foreign ~stub:true "CFURLCreateStringByReplacingPercentEscapesUsingEncoding" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> uint @-> returning (ptr CFString.t)) +let _CFURLCreateWithBytes = Foreign.foreign ~stub:true "CFURLCreateWithBytes" ((ptr CFAllocator.t) @-> string @-> llong @-> uint @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLCreateWithFileSystemPath = Foreign.foreign ~stub:true "CFURLCreateWithFileSystemPath" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> bool @-> returning (ptr CFURL.t)) +let _CFURLCreateWithFileSystemPathRelativeToBase = Foreign.foreign ~stub:true "CFURLCreateWithFileSystemPathRelativeToBase" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> llong @-> bool @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLCreateWithString = Foreign.foreign ~stub:true "CFURLCreateWithString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLDestroyResource = Foreign.foreign ~stub:true "CFURLDestroyResource" ((ptr CFURL.t) @-> (ptr int) @-> returning bool) +let _CFURLEnumeratorCreateForDirectoryURL = Foreign.foreign ~stub:true "CFURLEnumeratorCreateForDirectoryURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> (ptr CFArray.t) @-> returning (ptr CFURLEnumerator.t)) +let _CFURLEnumeratorCreateForMountedVolumes = Foreign.foreign ~stub:true "CFURLEnumeratorCreateForMountedVolumes" ((ptr CFAllocator.t) @-> ullong @-> (ptr CFArray.t) @-> returning (ptr CFURLEnumerator.t)) +let _CFURLEnumeratorGetDescendentLevel = Foreign.foreign ~stub:true "CFURLEnumeratorGetDescendentLevel" ((ptr CFURLEnumerator.t) @-> returning llong) +let _CFURLEnumeratorGetNextURL = Foreign.foreign ~stub:true "CFURLEnumeratorGetNextURL" ((ptr CFURLEnumerator.t) @-> (ptr (ptr CFURL.t)) @-> (ptr (ptr CFError.t)) @-> returning llong) +let _CFURLEnumeratorGetSourceDidChange = Foreign.foreign ~stub:true "CFURLEnumeratorGetSourceDidChange" ((ptr CFURLEnumerator.t) @-> returning bool) +let _CFURLEnumeratorGetTypeID = Foreign.foreign ~stub:true "CFURLEnumeratorGetTypeID" (void @-> returning ullong) +let _CFURLEnumeratorSkipDescendents = Foreign.foreign ~stub:true "CFURLEnumeratorSkipDescendents" ((ptr CFURLEnumerator.t) @-> returning void) +let _CFURLGetBaseURL = Foreign.foreign ~stub:true "CFURLGetBaseURL" ((ptr CFURL.t) @-> returning (ptr CFURL.t)) +let _CFURLGetByteRangeForComponent = Foreign.foreign ~stub:true "CFURLGetByteRangeForComponent" ((ptr CFURL.t) @-> llong @-> (ptr CFRange.t) @-> returning CFRange.t) +let _CFURLGetBytes = Foreign.foreign ~stub:true "CFURLGetBytes" ((ptr CFURL.t) @-> string @-> llong @-> returning llong) +let _CFURLGetFSRef = Foreign.foreign ~stub:true "CFURLGetFSRef" ((ptr CFURL.t) @-> (ptr void) @-> returning bool) +let _CFURLGetFileSystemRepresentation = Foreign.foreign ~stub:true "CFURLGetFileSystemRepresentation" ((ptr CFURL.t) @-> bool @-> string @-> llong @-> returning bool) +let _CFURLGetPortNumber = Foreign.foreign ~stub:true "CFURLGetPortNumber" ((ptr CFURL.t) @-> returning int) +let _CFURLGetString = Foreign.foreign ~stub:true "CFURLGetString" ((ptr CFURL.t) @-> returning (ptr CFString.t)) +let _CFURLGetTypeID = Foreign.foreign ~stub:true "CFURLGetTypeID" (void @-> returning ullong) +let _CFURLHasDirectoryPath = Foreign.foreign ~stub:true "CFURLHasDirectoryPath" ((ptr CFURL.t) @-> returning bool) +let _CFURLIsFileReferenceURL = Foreign.foreign ~stub:true "CFURLIsFileReferenceURL" ((ptr CFURL.t) @-> returning bool) +let _CFURLResourceIsReachable = Foreign.foreign ~stub:true "CFURLResourceIsReachable" ((ptr CFURL.t) @-> (ptr (ptr CFError.t)) @-> returning bool) +let _CFURLSetResourcePropertiesForKeys = Foreign.foreign ~stub:true "CFURLSetResourcePropertiesForKeys" ((ptr CFURL.t) @-> (ptr CFDictionary.t) @-> (ptr (ptr CFError.t)) @-> returning bool) +let _CFURLSetResourcePropertyForKey = Foreign.foreign ~stub:true "CFURLSetResourcePropertyForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> id @-> (ptr (ptr CFError.t)) @-> returning bool) +let _CFURLSetTemporaryResourcePropertyForKey = Foreign.foreign ~stub:true "CFURLSetTemporaryResourcePropertyForKey" ((ptr CFURL.t) @-> (ptr CFString.t) @-> id @-> returning void) +let _CFURLStartAccessingSecurityScopedResource = Foreign.foreign ~stub:true "CFURLStartAccessingSecurityScopedResource" ((ptr CFURL.t) @-> returning bool) +let _CFURLStopAccessingSecurityScopedResource = Foreign.foreign ~stub:true "CFURLStopAccessingSecurityScopedResource" ((ptr CFURL.t) @-> returning void) +let _CFURLWriteBookmarkDataToFile = Foreign.foreign ~stub:true "CFURLWriteBookmarkDataToFile" ((ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> (ptr (ptr CFError.t)) @-> returning bool) +let _CFURLWriteDataAndPropertiesToResource = Foreign.foreign ~stub:true "CFURLWriteDataAndPropertiesToResource" ((ptr CFURL.t) @-> (ptr CFData.t) @-> (ptr CFDictionary.t) @-> (ptr int) @-> returning bool) +let _CFUUIDCreate = Foreign.foreign ~stub:true "CFUUIDCreate" ((ptr CFAllocator.t) @-> returning (ptr CFUUID.t)) +let _CFUUIDCreateFromString = Foreign.foreign ~stub:true "CFUUIDCreateFromString" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> returning (ptr CFUUID.t)) +let _CFUUIDCreateFromUUIDBytes = Foreign.foreign ~stub:true "CFUUIDCreateFromUUIDBytes" ((ptr CFAllocator.t) @-> CFUUIDBytes.t @-> returning (ptr CFUUID.t)) +let _CFUUIDCreateString = Foreign.foreign ~stub:true "CFUUIDCreateString" ((ptr CFAllocator.t) @-> (ptr CFUUID.t) @-> returning (ptr CFString.t)) +let _CFUUIDCreateWithBytes = Foreign.foreign ~stub:true "CFUUIDCreateWithBytes" ((ptr CFAllocator.t) @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> returning (ptr CFUUID.t)) +let _CFUUIDGetConstantUUIDWithBytes = Foreign.foreign ~stub:true "CFUUIDGetConstantUUIDWithBytes" ((ptr CFAllocator.t) @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> uchar @-> returning (ptr CFUUID.t)) +let _CFUUIDGetTypeID = Foreign.foreign ~stub:true "CFUUIDGetTypeID" (void @-> returning ullong) +let _CFUUIDGetUUIDBytes = Foreign.foreign ~stub:true "CFUUIDGetUUIDBytes" ((ptr CFUUID.t) @-> returning CFUUIDBytes.t) +let _CFUserNotificationCancel = Foreign.foreign ~stub:true "CFUserNotificationCancel" ((ptr CFUserNotification.t) @-> returning int) (* let _CFUserNotificationCheckBoxChecked = Foreign.foreign "Camlkit_CFUserNotificationCheckBoxChecked" (llong @-> returning ullong) *) -let _CFUserNotificationCreate = Foreign.foreign "CFUserNotificationCreate" ((ptr CFAllocator.t) @-> double @-> ullong @-> (ptr int) @-> (ptr CFDictionary.t) @-> returning (ptr CFUserNotification.t)) -let _CFUserNotificationCreateRunLoopSource = Foreign.foreign "CFUserNotificationCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFUserNotification.t) @-> Foreign.funptr ((ptr CFUserNotification.t) @-> ullong @-> returning void) @-> llong @-> returning (ptr CFRunLoopSource.t)) -let _CFUserNotificationDisplayAlert = Foreign.foreign "CFUserNotificationDisplayAlert" (double @-> ullong @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr ullong) @-> returning int) -let _CFUserNotificationDisplayNotice = Foreign.foreign "CFUserNotificationDisplayNotice" (double @-> ullong @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning int) -let _CFUserNotificationGetResponseDictionary = Foreign.foreign "CFUserNotificationGetResponseDictionary" ((ptr CFUserNotification.t) @-> returning (ptr CFDictionary.t)) -let _CFUserNotificationGetResponseValue = Foreign.foreign "CFUserNotificationGetResponseValue" ((ptr CFUserNotification.t) @-> (ptr CFString.t) @-> llong @-> returning (ptr CFString.t)) -let _CFUserNotificationGetTypeID = Foreign.foreign "CFUserNotificationGetTypeID" (void @-> returning ullong) +let _CFUserNotificationCreate = Foreign.foreign ~stub:true "CFUserNotificationCreate" ((ptr CFAllocator.t) @-> double @-> ullong @-> (ptr int) @-> (ptr CFDictionary.t) @-> returning (ptr CFUserNotification.t)) +let _CFUserNotificationCreateRunLoopSource = Foreign.foreign ~stub:true "CFUserNotificationCreateRunLoopSource" ((ptr CFAllocator.t) @-> (ptr CFUserNotification.t) @-> Foreign.funptr ((ptr CFUserNotification.t) @-> ullong @-> returning void) @-> llong @-> returning (ptr CFRunLoopSource.t)) +let _CFUserNotificationDisplayAlert = Foreign.foreign ~stub:true "CFUserNotificationDisplayAlert" (double @-> ullong @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr ullong) @-> returning int) +let _CFUserNotificationDisplayNotice = Foreign.foreign ~stub:true "CFUserNotificationDisplayNotice" (double @-> ullong @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFURL.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> (ptr CFString.t) @-> returning int) +let _CFUserNotificationGetResponseDictionary = Foreign.foreign ~stub:true "CFUserNotificationGetResponseDictionary" ((ptr CFUserNotification.t) @-> returning (ptr CFDictionary.t)) +let _CFUserNotificationGetResponseValue = Foreign.foreign ~stub:true "CFUserNotificationGetResponseValue" ((ptr CFUserNotification.t) @-> (ptr CFString.t) @-> llong @-> returning (ptr CFString.t)) +let _CFUserNotificationGetTypeID = Foreign.foreign ~stub:true "CFUserNotificationGetTypeID" (void @-> returning ullong) (* let _CFUserNotificationPopUpSelection = Foreign.foreign "Camlkit_CFUserNotificationPopUpSelection" (llong @-> returning ullong) *) -let _CFUserNotificationReceiveResponse = Foreign.foreign "CFUserNotificationReceiveResponse" ((ptr CFUserNotification.t) @-> double @-> (ptr ullong) @-> returning int) +let _CFUserNotificationReceiveResponse = Foreign.foreign ~stub:true "CFUserNotificationReceiveResponse" ((ptr CFUserNotification.t) @-> double @-> (ptr ullong) @-> returning int) (* let _CFUserNotificationSecureTextField = Foreign.foreign "Camlkit_CFUserNotificationSecureTextField" (llong @-> returning ullong) *) -let _CFUserNotificationUpdate = Foreign.foreign "CFUserNotificationUpdate" ((ptr CFUserNotification.t) @-> double @-> ullong @-> (ptr CFDictionary.t) @-> returning int) -let _CFWriteStreamCanAcceptBytes = Foreign.foreign "CFWriteStreamCanAcceptBytes" ((ptr CFWriteStream.t) @-> returning bool) -let _CFWriteStreamClose = Foreign.foreign "CFWriteStreamClose" ((ptr CFWriteStream.t) @-> returning void) -let _CFWriteStreamCopyDispatchQueue = Foreign.foreign "CFWriteStreamCopyDispatchQueue" ((ptr CFWriteStream.t) @-> returning id) -let _CFWriteStreamCopyError = Foreign.foreign "CFWriteStreamCopyError" ((ptr CFWriteStream.t) @-> returning (ptr CFError.t)) -let _CFWriteStreamCopyProperty = Foreign.foreign "CFWriteStreamCopyProperty" ((ptr CFWriteStream.t) @-> (ptr CFString.t) @-> returning id) -let _CFWriteStreamCreateWithAllocatedBuffers = Foreign.foreign "CFWriteStreamCreateWithAllocatedBuffers" ((ptr CFAllocator.t) @-> (ptr CFAllocator.t) @-> returning (ptr CFWriteStream.t)) -let _CFWriteStreamCreateWithBuffer = Foreign.foreign "CFWriteStreamCreateWithBuffer" ((ptr CFAllocator.t) @-> string @-> llong @-> returning (ptr CFWriteStream.t)) -let _CFWriteStreamCreateWithFile = Foreign.foreign "CFWriteStreamCreateWithFile" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFWriteStream.t)) -let _CFWriteStreamGetError = Foreign.foreign "CFWriteStreamGetError" ((ptr CFWriteStream.t) @-> returning CFStreamError.t) -let _CFWriteStreamGetStatus = Foreign.foreign "CFWriteStreamGetStatus" ((ptr CFWriteStream.t) @-> returning llong) -let _CFWriteStreamGetTypeID = Foreign.foreign "CFWriteStreamGetTypeID" (void @-> returning ullong) -let _CFWriteStreamOpen = Foreign.foreign "CFWriteStreamOpen" ((ptr CFWriteStream.t) @-> returning bool) -let _CFWriteStreamScheduleWithRunLoop = Foreign.foreign "CFWriteStreamScheduleWithRunLoop" ((ptr CFWriteStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) -let _CFWriteStreamSetClient = Foreign.foreign "CFWriteStreamSetClient" ((ptr CFWriteStream.t) @-> ullong @-> Foreign.funptr ((ptr CFWriteStream.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFStreamClientContext.t) @-> returning bool) -let _CFWriteStreamSetDispatchQueue = Foreign.foreign "CFWriteStreamSetDispatchQueue" ((ptr CFWriteStream.t) @-> id @-> returning void) -let _CFWriteStreamSetProperty = Foreign.foreign "CFWriteStreamSetProperty" ((ptr CFWriteStream.t) @-> (ptr CFString.t) @-> id @-> returning bool) -let _CFWriteStreamUnscheduleFromRunLoop = Foreign.foreign "CFWriteStreamUnscheduleFromRunLoop" ((ptr CFWriteStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) -let _CFWriteStreamWrite = Foreign.foreign "CFWriteStreamWrite" ((ptr CFWriteStream.t) @-> string @-> llong @-> returning llong) -let _CFXMLCreateStringByEscapingEntities = Foreign.foreign "CFXMLCreateStringByEscapingEntities" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFString.t)) -let _CFXMLCreateStringByUnescapingEntities = Foreign.foreign "CFXMLCreateStringByUnescapingEntities" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFString.t)) -let _CFXMLNodeCreate = Foreign.foreign "CFXMLNodeCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr CFString.t) @-> (ptr void) @-> llong @-> returning (ptr CFXMLNode.t)) -let _CFXMLNodeCreateCopy = Foreign.foreign "CFXMLNodeCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFXMLNode.t) @-> returning (ptr CFXMLNode.t)) -let _CFXMLNodeGetInfoPtr = Foreign.foreign "CFXMLNodeGetInfoPtr" ((ptr CFXMLNode.t) @-> returning (ptr void)) -let _CFXMLNodeGetString = Foreign.foreign "CFXMLNodeGetString" ((ptr CFXMLNode.t) @-> returning (ptr CFString.t)) -let _CFXMLNodeGetTypeCode = Foreign.foreign "CFXMLNodeGetTypeCode" ((ptr CFXMLNode.t) @-> returning llong) -let _CFXMLNodeGetTypeID = Foreign.foreign "CFXMLNodeGetTypeID" (void @-> returning ullong) -let _CFXMLNodeGetVersion = Foreign.foreign "CFXMLNodeGetVersion" ((ptr CFXMLNode.t) @-> returning llong) -let _CFXMLParserAbort = Foreign.foreign "CFXMLParserAbort" ((ptr CFXMLParser.t) @-> llong @-> (ptr CFString.t) @-> returning void) -let _CFXMLParserCopyErrorDescription = Foreign.foreign "CFXMLParserCopyErrorDescription" ((ptr CFXMLParser.t) @-> returning (ptr CFString.t)) -let _CFXMLParserCreate = Foreign.foreign "CFXMLParserCreate" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> (ptr CFXMLParserCallBacks.t) @-> (ptr CFXMLParserContext.t) @-> returning (ptr CFXMLParser.t)) -let _CFXMLParserCreateWithDataFromURL = Foreign.foreign "CFXMLParserCreateWithDataFromURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> (ptr CFXMLParserCallBacks.t) @-> (ptr CFXMLParserContext.t) @-> returning (ptr CFXMLParser.t)) -let _CFXMLParserGetCallBacks = Foreign.foreign "CFXMLParserGetCallBacks" ((ptr CFXMLParser.t) @-> (ptr CFXMLParserCallBacks.t) @-> returning void) -let _CFXMLParserGetContext = Foreign.foreign "CFXMLParserGetContext" ((ptr CFXMLParser.t) @-> (ptr CFXMLParserContext.t) @-> returning void) -let _CFXMLParserGetDocument = Foreign.foreign "CFXMLParserGetDocument" ((ptr CFXMLParser.t) @-> returning (ptr void)) -let _CFXMLParserGetLineNumber = Foreign.foreign "CFXMLParserGetLineNumber" ((ptr CFXMLParser.t) @-> returning llong) -let _CFXMLParserGetLocation = Foreign.foreign "CFXMLParserGetLocation" ((ptr CFXMLParser.t) @-> returning llong) -let _CFXMLParserGetSourceURL = Foreign.foreign "CFXMLParserGetSourceURL" ((ptr CFXMLParser.t) @-> returning (ptr CFURL.t)) -let _CFXMLParserGetStatusCode = Foreign.foreign "CFXMLParserGetStatusCode" ((ptr CFXMLParser.t) @-> returning llong) -let _CFXMLParserGetTypeID = Foreign.foreign "CFXMLParserGetTypeID" (void @-> returning ullong) -let _CFXMLParserParse = Foreign.foreign "CFXMLParserParse" ((ptr CFXMLParser.t) @-> returning bool) -let _CFXMLTreeCreateFromData = Foreign.foreign "CFXMLTreeCreateFromData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> returning (ptr CFTree.t)) -let _CFXMLTreeCreateFromDataWithError = Foreign.foreign "CFXMLTreeCreateFromDataWithError" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> (ptr (ptr CFDictionary.t)) @-> returning (ptr CFTree.t)) -let _CFXMLTreeCreateWithDataFromURL = Foreign.foreign "CFXMLTreeCreateWithDataFromURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> returning (ptr CFTree.t)) -let _CFXMLTreeCreateWithNode = Foreign.foreign "CFXMLTreeCreateWithNode" ((ptr CFAllocator.t) @-> (ptr CFXMLNode.t) @-> returning (ptr CFTree.t)) -let _CFXMLTreeCreateXMLData = Foreign.foreign "CFXMLTreeCreateXMLData" ((ptr CFAllocator.t) @-> (ptr CFTree.t) @-> returning (ptr CFData.t)) -let _CFXMLTreeGetNode = Foreign.foreign "CFXMLTreeGetNode" ((ptr CFTree.t) @-> returning (ptr CFXMLNode.t)) +let _CFUserNotificationUpdate = Foreign.foreign ~stub:true "CFUserNotificationUpdate" ((ptr CFUserNotification.t) @-> double @-> ullong @-> (ptr CFDictionary.t) @-> returning int) +let _CFWriteStreamCanAcceptBytes = Foreign.foreign ~stub:true "CFWriteStreamCanAcceptBytes" ((ptr CFWriteStream.t) @-> returning bool) +let _CFWriteStreamClose = Foreign.foreign ~stub:true "CFWriteStreamClose" ((ptr CFWriteStream.t) @-> returning void) +let _CFWriteStreamCopyDispatchQueue = Foreign.foreign ~stub:true "CFWriteStreamCopyDispatchQueue" ((ptr CFWriteStream.t) @-> returning id) +let _CFWriteStreamCopyError = Foreign.foreign ~stub:true "CFWriteStreamCopyError" ((ptr CFWriteStream.t) @-> returning (ptr CFError.t)) +let _CFWriteStreamCopyProperty = Foreign.foreign ~stub:true "CFWriteStreamCopyProperty" ((ptr CFWriteStream.t) @-> (ptr CFString.t) @-> returning id) +let _CFWriteStreamCreateWithAllocatedBuffers = Foreign.foreign ~stub:true "CFWriteStreamCreateWithAllocatedBuffers" ((ptr CFAllocator.t) @-> (ptr CFAllocator.t) @-> returning (ptr CFWriteStream.t)) +let _CFWriteStreamCreateWithBuffer = Foreign.foreign ~stub:true "CFWriteStreamCreateWithBuffer" ((ptr CFAllocator.t) @-> string @-> llong @-> returning (ptr CFWriteStream.t)) +let _CFWriteStreamCreateWithFile = Foreign.foreign ~stub:true "CFWriteStreamCreateWithFile" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> returning (ptr CFWriteStream.t)) +let _CFWriteStreamGetError = Foreign.foreign ~stub:true "CFWriteStreamGetError" ((ptr CFWriteStream.t) @-> returning CFStreamError.t) +let _CFWriteStreamGetStatus = Foreign.foreign ~stub:true "CFWriteStreamGetStatus" ((ptr CFWriteStream.t) @-> returning llong) +let _CFWriteStreamGetTypeID = Foreign.foreign ~stub:true "CFWriteStreamGetTypeID" (void @-> returning ullong) +let _CFWriteStreamOpen = Foreign.foreign ~stub:true "CFWriteStreamOpen" ((ptr CFWriteStream.t) @-> returning bool) +let _CFWriteStreamScheduleWithRunLoop = Foreign.foreign ~stub:true "CFWriteStreamScheduleWithRunLoop" ((ptr CFWriteStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) +let _CFWriteStreamSetClient = Foreign.foreign ~stub:true "CFWriteStreamSetClient" ((ptr CFWriteStream.t) @-> ullong @-> Foreign.funptr ((ptr CFWriteStream.t) @-> ullong @-> (ptr void) @-> returning void) @-> (ptr CFStreamClientContext.t) @-> returning bool) +let _CFWriteStreamSetDispatchQueue = Foreign.foreign ~stub:true "CFWriteStreamSetDispatchQueue" ((ptr CFWriteStream.t) @-> id @-> returning void) +let _CFWriteStreamSetProperty = Foreign.foreign ~stub:true "CFWriteStreamSetProperty" ((ptr CFWriteStream.t) @-> (ptr CFString.t) @-> id @-> returning bool) +let _CFWriteStreamUnscheduleFromRunLoop = Foreign.foreign ~stub:true "CFWriteStreamUnscheduleFromRunLoop" ((ptr CFWriteStream.t) @-> (ptr CFRunLoop.t) @-> (ptr CFString.t) @-> returning void) +let _CFWriteStreamWrite = Foreign.foreign ~stub:true "CFWriteStreamWrite" ((ptr CFWriteStream.t) @-> string @-> llong @-> returning llong) +let _CFXMLCreateStringByEscapingEntities = Foreign.foreign ~stub:true "CFXMLCreateStringByEscapingEntities" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFString.t)) +let _CFXMLCreateStringByUnescapingEntities = Foreign.foreign ~stub:true "CFXMLCreateStringByUnescapingEntities" ((ptr CFAllocator.t) @-> (ptr CFString.t) @-> (ptr CFDictionary.t) @-> returning (ptr CFString.t)) +let _CFXMLNodeCreate = Foreign.foreign ~stub:true "CFXMLNodeCreate" ((ptr CFAllocator.t) @-> llong @-> (ptr CFString.t) @-> (ptr void) @-> llong @-> returning (ptr CFXMLNode.t)) +let _CFXMLNodeCreateCopy = Foreign.foreign ~stub:true "CFXMLNodeCreateCopy" ((ptr CFAllocator.t) @-> (ptr CFXMLNode.t) @-> returning (ptr CFXMLNode.t)) +let _CFXMLNodeGetInfoPtr = Foreign.foreign ~stub:true "CFXMLNodeGetInfoPtr" ((ptr CFXMLNode.t) @-> returning (ptr void)) +let _CFXMLNodeGetString = Foreign.foreign ~stub:true "CFXMLNodeGetString" ((ptr CFXMLNode.t) @-> returning (ptr CFString.t)) +let _CFXMLNodeGetTypeCode = Foreign.foreign ~stub:true "CFXMLNodeGetTypeCode" ((ptr CFXMLNode.t) @-> returning llong) +let _CFXMLNodeGetTypeID = Foreign.foreign ~stub:true "CFXMLNodeGetTypeID" (void @-> returning ullong) +let _CFXMLNodeGetVersion = Foreign.foreign ~stub:true "CFXMLNodeGetVersion" ((ptr CFXMLNode.t) @-> returning llong) +let _CFXMLParserAbort = Foreign.foreign ~stub:true "CFXMLParserAbort" ((ptr CFXMLParser.t) @-> llong @-> (ptr CFString.t) @-> returning void) +let _CFXMLParserCopyErrorDescription = Foreign.foreign ~stub:true "CFXMLParserCopyErrorDescription" ((ptr CFXMLParser.t) @-> returning (ptr CFString.t)) +let _CFXMLParserCreate = Foreign.foreign ~stub:true "CFXMLParserCreate" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> (ptr CFXMLParserCallBacks.t) @-> (ptr CFXMLParserContext.t) @-> returning (ptr CFXMLParser.t)) +let _CFXMLParserCreateWithDataFromURL = Foreign.foreign ~stub:true "CFXMLParserCreateWithDataFromURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> (ptr CFXMLParserCallBacks.t) @-> (ptr CFXMLParserContext.t) @-> returning (ptr CFXMLParser.t)) +let _CFXMLParserGetCallBacks = Foreign.foreign ~stub:true "CFXMLParserGetCallBacks" ((ptr CFXMLParser.t) @-> (ptr CFXMLParserCallBacks.t) @-> returning void) +let _CFXMLParserGetContext = Foreign.foreign ~stub:true "CFXMLParserGetContext" ((ptr CFXMLParser.t) @-> (ptr CFXMLParserContext.t) @-> returning void) +let _CFXMLParserGetDocument = Foreign.foreign ~stub:true "CFXMLParserGetDocument" ((ptr CFXMLParser.t) @-> returning (ptr void)) +let _CFXMLParserGetLineNumber = Foreign.foreign ~stub:true "CFXMLParserGetLineNumber" ((ptr CFXMLParser.t) @-> returning llong) +let _CFXMLParserGetLocation = Foreign.foreign ~stub:true "CFXMLParserGetLocation" ((ptr CFXMLParser.t) @-> returning llong) +let _CFXMLParserGetSourceURL = Foreign.foreign ~stub:true "CFXMLParserGetSourceURL" ((ptr CFXMLParser.t) @-> returning (ptr CFURL.t)) +let _CFXMLParserGetStatusCode = Foreign.foreign ~stub:true "CFXMLParserGetStatusCode" ((ptr CFXMLParser.t) @-> returning llong) +let _CFXMLParserGetTypeID = Foreign.foreign ~stub:true "CFXMLParserGetTypeID" (void @-> returning ullong) +let _CFXMLParserParse = Foreign.foreign ~stub:true "CFXMLParserParse" ((ptr CFXMLParser.t) @-> returning bool) +let _CFXMLTreeCreateFromData = Foreign.foreign ~stub:true "CFXMLTreeCreateFromData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> returning (ptr CFTree.t)) +let _CFXMLTreeCreateFromDataWithError = Foreign.foreign ~stub:true "CFXMLTreeCreateFromDataWithError" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> (ptr (ptr CFDictionary.t)) @-> returning (ptr CFTree.t)) +let _CFXMLTreeCreateWithDataFromURL = Foreign.foreign ~stub:true "CFXMLTreeCreateWithDataFromURL" ((ptr CFAllocator.t) @-> (ptr CFURL.t) @-> ullong @-> llong @-> returning (ptr CFTree.t)) +let _CFXMLTreeCreateWithNode = Foreign.foreign ~stub:true "CFXMLTreeCreateWithNode" ((ptr CFAllocator.t) @-> (ptr CFXMLNode.t) @-> returning (ptr CFTree.t)) +let _CFXMLTreeCreateXMLData = Foreign.foreign ~stub:true "CFXMLTreeCreateXMLData" ((ptr CFAllocator.t) @-> (ptr CFTree.t) @-> returning (ptr CFData.t)) +let _CFXMLTreeGetNode = Foreign.foreign ~stub:true "CFXMLTreeGetNode" ((ptr CFTree.t) @-> returning (ptr CFXMLNode.t)) diff --git a/CoreFoundation/CoreFoundation_globals.ml b/CoreFoundation/CoreFoundation_globals.ml index 85e2f9aff..52a93e56d 100644 --- a/CoreFoundation/CoreFoundation_globals.ml +++ b/CoreFoundation/CoreFoundation_globals.ml @@ -1,5 +1,6 @@ (* auto-generated, do not modify *) +[@@@ocaml.warning "-33"] open Runtime open Objc @@ -219,363 +220,363 @@ module CFTypeRef = struct let t = (ptr void) end -let kCFAbsoluteTimeIntervalSince1904 = !@ (Foreign.foreign_value "kCFAbsoluteTimeIntervalSince1904" double) -let kCFAbsoluteTimeIntervalSince1970 = !@ (Foreign.foreign_value "kCFAbsoluteTimeIntervalSince1970" double) -let kCFAllocatorDefault = !@ (Foreign.foreign_value "kCFAllocatorDefault" (ptr CFAllocator.t)) -let kCFAllocatorMalloc = !@ (Foreign.foreign_value "kCFAllocatorMalloc" (ptr CFAllocator.t)) -let kCFAllocatorMallocZone = !@ (Foreign.foreign_value "kCFAllocatorMallocZone" (ptr CFAllocator.t)) -let kCFAllocatorNull = !@ (Foreign.foreign_value "kCFAllocatorNull" (ptr CFAllocator.t)) -let kCFAllocatorSystemDefault = !@ (Foreign.foreign_value "kCFAllocatorSystemDefault" (ptr CFAllocator.t)) -let kCFAllocatorUseContext = !@ (Foreign.foreign_value "kCFAllocatorUseContext" (ptr CFAllocator.t)) -let kCFBooleanFalse = !@ (Foreign.foreign_value "kCFBooleanFalse" (ptr CFBoolean.t)) -let kCFBooleanTrue = !@ (Foreign.foreign_value "kCFBooleanTrue" (ptr CFBoolean.t)) -let kCFBuddhistCalendar = !@ (Foreign.foreign_value "kCFBuddhistCalendar" (ptr CFString.t)) -let kCFBundleDevelopmentRegionKey = !@ (Foreign.foreign_value "kCFBundleDevelopmentRegionKey" (ptr CFString.t)) -let kCFBundleExecutableKey = !@ (Foreign.foreign_value "kCFBundleExecutableKey" (ptr CFString.t)) -let kCFBundleIdentifierKey = !@ (Foreign.foreign_value "kCFBundleIdentifierKey" (ptr CFString.t)) -let kCFBundleInfoDictionaryVersionKey = !@ (Foreign.foreign_value "kCFBundleInfoDictionaryVersionKey" (ptr CFString.t)) -let kCFBundleLocalizationsKey = !@ (Foreign.foreign_value "kCFBundleLocalizationsKey" (ptr CFString.t)) -let kCFBundleNameKey = !@ (Foreign.foreign_value "kCFBundleNameKey" (ptr CFString.t)) -let kCFBundleVersionKey = !@ (Foreign.foreign_value "kCFBundleVersionKey" (ptr CFString.t)) -let kCFChineseCalendar = !@ (Foreign.foreign_value "kCFChineseCalendar" (ptr CFString.t)) -let kCFCopyStringBagCallBacks = !@ (Foreign.foreign_value "kCFCopyStringBagCallBacks" CFBagCallBacks.t) -let kCFCopyStringDictionaryKeyCallBacks = !@ (Foreign.foreign_value "kCFCopyStringDictionaryKeyCallBacks" CFDictionaryKeyCallBacks.t) -let kCFCopyStringSetCallBacks = !@ (Foreign.foreign_value "kCFCopyStringSetCallBacks" CFSetCallBacks.t) -let kCFCoreFoundationVersionNumber = !@ (Foreign.foreign_value "kCFCoreFoundationVersionNumber" double) -let kCFDateFormatterAMSymbol = !@ (Foreign.foreign_value "kCFDateFormatterAMSymbol" (ptr CFString.t)) -let kCFDateFormatterCalendar = !@ (Foreign.foreign_value "kCFDateFormatterCalendar" (ptr CFString.t)) -let kCFDateFormatterCalendarName = !@ (Foreign.foreign_value "kCFDateFormatterCalendarName" (ptr CFString.t)) -let kCFDateFormatterDefaultDate = !@ (Foreign.foreign_value "kCFDateFormatterDefaultDate" (ptr CFString.t)) -let kCFDateFormatterDefaultFormat = !@ (Foreign.foreign_value "kCFDateFormatterDefaultFormat" (ptr CFString.t)) -let kCFDateFormatterDoesRelativeDateFormattingKey = !@ (Foreign.foreign_value "kCFDateFormatterDoesRelativeDateFormattingKey" (ptr CFString.t)) -let kCFDateFormatterEraSymbols = !@ (Foreign.foreign_value "kCFDateFormatterEraSymbols" (ptr CFString.t)) -let kCFDateFormatterGregorianStartDate = !@ (Foreign.foreign_value "kCFDateFormatterGregorianStartDate" (ptr CFString.t)) -let kCFDateFormatterIsLenient = !@ (Foreign.foreign_value "kCFDateFormatterIsLenient" (ptr CFString.t)) -let kCFDateFormatterLongEraSymbols = !@ (Foreign.foreign_value "kCFDateFormatterLongEraSymbols" (ptr CFString.t)) -let kCFDateFormatterMonthSymbols = !@ (Foreign.foreign_value "kCFDateFormatterMonthSymbols" (ptr CFString.t)) -let kCFDateFormatterPMSymbol = !@ (Foreign.foreign_value "kCFDateFormatterPMSymbol" (ptr CFString.t)) -let kCFDateFormatterQuarterSymbols = !@ (Foreign.foreign_value "kCFDateFormatterQuarterSymbols" (ptr CFString.t)) -let kCFDateFormatterShortMonthSymbols = !@ (Foreign.foreign_value "kCFDateFormatterShortMonthSymbols" (ptr CFString.t)) -let kCFDateFormatterShortQuarterSymbols = !@ (Foreign.foreign_value "kCFDateFormatterShortQuarterSymbols" (ptr CFString.t)) -let kCFDateFormatterShortStandaloneMonthSymbols = !@ (Foreign.foreign_value "kCFDateFormatterShortStandaloneMonthSymbols" (ptr CFString.t)) -let kCFDateFormatterShortStandaloneQuarterSymbols = !@ (Foreign.foreign_value "kCFDateFormatterShortStandaloneQuarterSymbols" (ptr CFString.t)) -let kCFDateFormatterShortStandaloneWeekdaySymbols = !@ (Foreign.foreign_value "kCFDateFormatterShortStandaloneWeekdaySymbols" (ptr CFString.t)) -let kCFDateFormatterShortWeekdaySymbols = !@ (Foreign.foreign_value "kCFDateFormatterShortWeekdaySymbols" (ptr CFString.t)) -let kCFDateFormatterStandaloneMonthSymbols = !@ (Foreign.foreign_value "kCFDateFormatterStandaloneMonthSymbols" (ptr CFString.t)) -let kCFDateFormatterStandaloneQuarterSymbols = !@ (Foreign.foreign_value "kCFDateFormatterStandaloneQuarterSymbols" (ptr CFString.t)) -let kCFDateFormatterStandaloneWeekdaySymbols = !@ (Foreign.foreign_value "kCFDateFormatterStandaloneWeekdaySymbols" (ptr CFString.t)) -let kCFDateFormatterTimeZone = !@ (Foreign.foreign_value "kCFDateFormatterTimeZone" (ptr CFString.t)) -let kCFDateFormatterTwoDigitStartDate = !@ (Foreign.foreign_value "kCFDateFormatterTwoDigitStartDate" (ptr CFString.t)) -let kCFDateFormatterVeryShortMonthSymbols = !@ (Foreign.foreign_value "kCFDateFormatterVeryShortMonthSymbols" (ptr CFString.t)) -let kCFDateFormatterVeryShortStandaloneMonthSymbols = !@ (Foreign.foreign_value "kCFDateFormatterVeryShortStandaloneMonthSymbols" (ptr CFString.t)) -let kCFDateFormatterVeryShortStandaloneWeekdaySymbols = !@ (Foreign.foreign_value "kCFDateFormatterVeryShortStandaloneWeekdaySymbols" (ptr CFString.t)) -let kCFDateFormatterVeryShortWeekdaySymbols = !@ (Foreign.foreign_value "kCFDateFormatterVeryShortWeekdaySymbols" (ptr CFString.t)) -let kCFDateFormatterWeekdaySymbols = !@ (Foreign.foreign_value "kCFDateFormatterWeekdaySymbols" (ptr CFString.t)) -let kCFErrorDescriptionKey = !@ (Foreign.foreign_value "kCFErrorDescriptionKey" (ptr CFString.t)) -let kCFErrorDomainCocoa = !@ (Foreign.foreign_value "kCFErrorDomainCocoa" (ptr CFString.t)) -let kCFErrorDomainMach = !@ (Foreign.foreign_value "kCFErrorDomainMach" (ptr CFString.t)) -let kCFErrorDomainOSStatus = !@ (Foreign.foreign_value "kCFErrorDomainOSStatus" (ptr CFString.t)) -let kCFErrorDomainPOSIX = !@ (Foreign.foreign_value "kCFErrorDomainPOSIX" (ptr CFString.t)) -let kCFErrorFilePathKey = !@ (Foreign.foreign_value "kCFErrorFilePathKey" (ptr CFString.t)) -let kCFErrorLocalizedDescriptionKey = !@ (Foreign.foreign_value "kCFErrorLocalizedDescriptionKey" (ptr CFString.t)) -let kCFErrorLocalizedFailureKey = !@ (Foreign.foreign_value "kCFErrorLocalizedFailureKey" (ptr CFString.t)) -let kCFErrorLocalizedFailureReasonKey = !@ (Foreign.foreign_value "kCFErrorLocalizedFailureReasonKey" (ptr CFString.t)) -let kCFErrorLocalizedRecoverySuggestionKey = !@ (Foreign.foreign_value "kCFErrorLocalizedRecoverySuggestionKey" (ptr CFString.t)) -let kCFErrorURLKey = !@ (Foreign.foreign_value "kCFErrorURLKey" (ptr CFString.t)) -let kCFErrorUnderlyingErrorKey = !@ (Foreign.foreign_value "kCFErrorUnderlyingErrorKey" (ptr CFString.t)) -let kCFGregorianCalendar = !@ (Foreign.foreign_value "kCFGregorianCalendar" (ptr CFString.t)) -let kCFHebrewCalendar = !@ (Foreign.foreign_value "kCFHebrewCalendar" (ptr CFString.t)) -let kCFISO8601Calendar = !@ (Foreign.foreign_value "kCFISO8601Calendar" (ptr CFString.t)) -let kCFIndianCalendar = !@ (Foreign.foreign_value "kCFIndianCalendar" (ptr CFString.t)) -let kCFIslamicCalendar = !@ (Foreign.foreign_value "kCFIslamicCalendar" (ptr CFString.t)) -let kCFIslamicCivilCalendar = !@ (Foreign.foreign_value "kCFIslamicCivilCalendar" (ptr CFString.t)) -let kCFIslamicTabularCalendar = !@ (Foreign.foreign_value "kCFIslamicTabularCalendar" (ptr CFString.t)) -let kCFIslamicUmmAlQuraCalendar = !@ (Foreign.foreign_value "kCFIslamicUmmAlQuraCalendar" (ptr CFString.t)) -let kCFJapaneseCalendar = !@ (Foreign.foreign_value "kCFJapaneseCalendar" (ptr CFString.t)) -let kCFLocaleAlternateQuotationBeginDelimiterKey = !@ (Foreign.foreign_value "kCFLocaleAlternateQuotationBeginDelimiterKey" (ptr CFString.t)) -let kCFLocaleAlternateQuotationEndDelimiterKey = !@ (Foreign.foreign_value "kCFLocaleAlternateQuotationEndDelimiterKey" (ptr CFString.t)) -let kCFLocaleCalendar = !@ (Foreign.foreign_value "kCFLocaleCalendar" (ptr CFString.t)) -let kCFLocaleCalendarIdentifier = !@ (Foreign.foreign_value "kCFLocaleCalendarIdentifier" (ptr CFString.t)) -let kCFLocaleCollationIdentifier = !@ (Foreign.foreign_value "kCFLocaleCollationIdentifier" (ptr CFString.t)) -let kCFLocaleCollatorIdentifier = !@ (Foreign.foreign_value "kCFLocaleCollatorIdentifier" (ptr CFString.t)) -let kCFLocaleCountryCode = !@ (Foreign.foreign_value "kCFLocaleCountryCode" (ptr CFString.t)) -let kCFLocaleCurrencyCode = !@ (Foreign.foreign_value "kCFLocaleCurrencyCode" (ptr CFString.t)) -let kCFLocaleCurrencySymbol = !@ (Foreign.foreign_value "kCFLocaleCurrencySymbol" (ptr CFString.t)) -let kCFLocaleCurrentLocaleDidChangeNotification = !@ (Foreign.foreign_value "kCFLocaleCurrentLocaleDidChangeNotification" (ptr CFString.t)) -let kCFLocaleDecimalSeparator = !@ (Foreign.foreign_value "kCFLocaleDecimalSeparator" (ptr CFString.t)) -let kCFLocaleExemplarCharacterSet = !@ (Foreign.foreign_value "kCFLocaleExemplarCharacterSet" (ptr CFString.t)) -let kCFLocaleGroupingSeparator = !@ (Foreign.foreign_value "kCFLocaleGroupingSeparator" (ptr CFString.t)) -let kCFLocaleIdentifier = !@ (Foreign.foreign_value "kCFLocaleIdentifier" (ptr CFString.t)) -let kCFLocaleLanguageCode = !@ (Foreign.foreign_value "kCFLocaleLanguageCode" (ptr CFString.t)) -let kCFLocaleMeasurementSystem = !@ (Foreign.foreign_value "kCFLocaleMeasurementSystem" (ptr CFString.t)) -let kCFLocaleQuotationBeginDelimiterKey = !@ (Foreign.foreign_value "kCFLocaleQuotationBeginDelimiterKey" (ptr CFString.t)) -let kCFLocaleQuotationEndDelimiterKey = !@ (Foreign.foreign_value "kCFLocaleQuotationEndDelimiterKey" (ptr CFString.t)) -let kCFLocaleScriptCode = !@ (Foreign.foreign_value "kCFLocaleScriptCode" (ptr CFString.t)) -let kCFLocaleUsesMetricSystem = !@ (Foreign.foreign_value "kCFLocaleUsesMetricSystem" (ptr CFString.t)) -let kCFLocaleVariantCode = !@ (Foreign.foreign_value "kCFLocaleVariantCode" (ptr CFString.t)) -let kCFNull = !@ (Foreign.foreign_value "kCFNull" (ptr CFNull.t)) -let kCFNumberFormatterAlwaysShowDecimalSeparator = !@ (Foreign.foreign_value "kCFNumberFormatterAlwaysShowDecimalSeparator" (ptr CFString.t)) -let kCFNumberFormatterCurrencyCode = !@ (Foreign.foreign_value "kCFNumberFormatterCurrencyCode" (ptr CFString.t)) -let kCFNumberFormatterCurrencyDecimalSeparator = !@ (Foreign.foreign_value "kCFNumberFormatterCurrencyDecimalSeparator" (ptr CFString.t)) -let kCFNumberFormatterCurrencyGroupingSeparator = !@ (Foreign.foreign_value "kCFNumberFormatterCurrencyGroupingSeparator" (ptr CFString.t)) -let kCFNumberFormatterCurrencySymbol = !@ (Foreign.foreign_value "kCFNumberFormatterCurrencySymbol" (ptr CFString.t)) -let kCFNumberFormatterDecimalSeparator = !@ (Foreign.foreign_value "kCFNumberFormatterDecimalSeparator" (ptr CFString.t)) -let kCFNumberFormatterDefaultFormat = !@ (Foreign.foreign_value "kCFNumberFormatterDefaultFormat" (ptr CFString.t)) -let kCFNumberFormatterExponentSymbol = !@ (Foreign.foreign_value "kCFNumberFormatterExponentSymbol" (ptr CFString.t)) -let kCFNumberFormatterFormatWidth = !@ (Foreign.foreign_value "kCFNumberFormatterFormatWidth" (ptr CFString.t)) -let kCFNumberFormatterGroupingSeparator = !@ (Foreign.foreign_value "kCFNumberFormatterGroupingSeparator" (ptr CFString.t)) -let kCFNumberFormatterGroupingSize = !@ (Foreign.foreign_value "kCFNumberFormatterGroupingSize" (ptr CFString.t)) -let kCFNumberFormatterInfinitySymbol = !@ (Foreign.foreign_value "kCFNumberFormatterInfinitySymbol" (ptr CFString.t)) -let kCFNumberFormatterInternationalCurrencySymbol = !@ (Foreign.foreign_value "kCFNumberFormatterInternationalCurrencySymbol" (ptr CFString.t)) -let kCFNumberFormatterIsLenient = !@ (Foreign.foreign_value "kCFNumberFormatterIsLenient" (ptr CFString.t)) -let kCFNumberFormatterMaxFractionDigits = !@ (Foreign.foreign_value "kCFNumberFormatterMaxFractionDigits" (ptr CFString.t)) -let kCFNumberFormatterMaxIntegerDigits = !@ (Foreign.foreign_value "kCFNumberFormatterMaxIntegerDigits" (ptr CFString.t)) -let kCFNumberFormatterMaxSignificantDigits = !@ (Foreign.foreign_value "kCFNumberFormatterMaxSignificantDigits" (ptr CFString.t)) -let kCFNumberFormatterMinFractionDigits = !@ (Foreign.foreign_value "kCFNumberFormatterMinFractionDigits" (ptr CFString.t)) -let kCFNumberFormatterMinIntegerDigits = !@ (Foreign.foreign_value "kCFNumberFormatterMinIntegerDigits" (ptr CFString.t)) -let kCFNumberFormatterMinSignificantDigits = !@ (Foreign.foreign_value "kCFNumberFormatterMinSignificantDigits" (ptr CFString.t)) -let kCFNumberFormatterMinusSign = !@ (Foreign.foreign_value "kCFNumberFormatterMinusSign" (ptr CFString.t)) -let kCFNumberFormatterMultiplier = !@ (Foreign.foreign_value "kCFNumberFormatterMultiplier" (ptr CFString.t)) -let kCFNumberFormatterNaNSymbol = !@ (Foreign.foreign_value "kCFNumberFormatterNaNSymbol" (ptr CFString.t)) -let kCFNumberFormatterNegativePrefix = !@ (Foreign.foreign_value "kCFNumberFormatterNegativePrefix" (ptr CFString.t)) -let kCFNumberFormatterNegativeSuffix = !@ (Foreign.foreign_value "kCFNumberFormatterNegativeSuffix" (ptr CFString.t)) -let kCFNumberFormatterPaddingCharacter = !@ (Foreign.foreign_value "kCFNumberFormatterPaddingCharacter" (ptr CFString.t)) -let kCFNumberFormatterPaddingPosition = !@ (Foreign.foreign_value "kCFNumberFormatterPaddingPosition" (ptr CFString.t)) -let kCFNumberFormatterPerMillSymbol = !@ (Foreign.foreign_value "kCFNumberFormatterPerMillSymbol" (ptr CFString.t)) -let kCFNumberFormatterPercentSymbol = !@ (Foreign.foreign_value "kCFNumberFormatterPercentSymbol" (ptr CFString.t)) -let kCFNumberFormatterPlusSign = !@ (Foreign.foreign_value "kCFNumberFormatterPlusSign" (ptr CFString.t)) -let kCFNumberFormatterPositivePrefix = !@ (Foreign.foreign_value "kCFNumberFormatterPositivePrefix" (ptr CFString.t)) -let kCFNumberFormatterPositiveSuffix = !@ (Foreign.foreign_value "kCFNumberFormatterPositiveSuffix" (ptr CFString.t)) -let kCFNumberFormatterRoundingIncrement = !@ (Foreign.foreign_value "kCFNumberFormatterRoundingIncrement" (ptr CFString.t)) -let kCFNumberFormatterRoundingMode = !@ (Foreign.foreign_value "kCFNumberFormatterRoundingMode" (ptr CFString.t)) -let kCFNumberFormatterSecondaryGroupingSize = !@ (Foreign.foreign_value "kCFNumberFormatterSecondaryGroupingSize" (ptr CFString.t)) -let kCFNumberFormatterUseGroupingSeparator = !@ (Foreign.foreign_value "kCFNumberFormatterUseGroupingSeparator" (ptr CFString.t)) -let kCFNumberFormatterUseSignificantDigits = !@ (Foreign.foreign_value "kCFNumberFormatterUseSignificantDigits" (ptr CFString.t)) -let kCFNumberFormatterZeroSymbol = !@ (Foreign.foreign_value "kCFNumberFormatterZeroSymbol" (ptr CFString.t)) -let kCFNumberNaN = !@ (Foreign.foreign_value "kCFNumberNaN" (ptr CFNumber.t)) -let kCFNumberNegativeInfinity = !@ (Foreign.foreign_value "kCFNumberNegativeInfinity" (ptr CFNumber.t)) -let kCFNumberPositiveInfinity = !@ (Foreign.foreign_value "kCFNumberPositiveInfinity" (ptr CFNumber.t)) -let kCFPersianCalendar = !@ (Foreign.foreign_value "kCFPersianCalendar" (ptr CFString.t)) -let kCFPlugInDynamicRegisterFunctionKey = !@ (Foreign.foreign_value "kCFPlugInDynamicRegisterFunctionKey" (ptr CFString.t)) -let kCFPlugInDynamicRegistrationKey = !@ (Foreign.foreign_value "kCFPlugInDynamicRegistrationKey" (ptr CFString.t)) -let kCFPlugInFactoriesKey = !@ (Foreign.foreign_value "kCFPlugInFactoriesKey" (ptr CFString.t)) -let kCFPlugInTypesKey = !@ (Foreign.foreign_value "kCFPlugInTypesKey" (ptr CFString.t)) -let kCFPlugInUnloadFunctionKey = !@ (Foreign.foreign_value "kCFPlugInUnloadFunctionKey" (ptr CFString.t)) -let kCFPreferencesAnyApplication = !@ (Foreign.foreign_value "kCFPreferencesAnyApplication" (ptr CFString.t)) -let kCFPreferencesAnyHost = !@ (Foreign.foreign_value "kCFPreferencesAnyHost" (ptr CFString.t)) -let kCFPreferencesAnyUser = !@ (Foreign.foreign_value "kCFPreferencesAnyUser" (ptr CFString.t)) -let kCFPreferencesCurrentApplication = !@ (Foreign.foreign_value "kCFPreferencesCurrentApplication" (ptr CFString.t)) -let kCFPreferencesCurrentHost = !@ (Foreign.foreign_value "kCFPreferencesCurrentHost" (ptr CFString.t)) -let kCFPreferencesCurrentUser = !@ (Foreign.foreign_value "kCFPreferencesCurrentUser" (ptr CFString.t)) -let kCFRepublicOfChinaCalendar = !@ (Foreign.foreign_value "kCFRepublicOfChinaCalendar" (ptr CFString.t)) -let kCFRunLoopCommonModes = !@ (Foreign.foreign_value "kCFRunLoopCommonModes" (ptr CFString.t)) -let kCFRunLoopDefaultMode = !@ (Foreign.foreign_value "kCFRunLoopDefaultMode" (ptr CFString.t)) -let kCFSocketCommandKey = !@ (Foreign.foreign_value "kCFSocketCommandKey" (ptr CFString.t)) -let kCFSocketErrorKey = !@ (Foreign.foreign_value "kCFSocketErrorKey" (ptr CFString.t)) -let kCFSocketNameKey = !@ (Foreign.foreign_value "kCFSocketNameKey" (ptr CFString.t)) -let kCFSocketRegisterCommand = !@ (Foreign.foreign_value "kCFSocketRegisterCommand" (ptr CFString.t)) -let kCFSocketResultKey = !@ (Foreign.foreign_value "kCFSocketResultKey" (ptr CFString.t)) -let kCFSocketRetrieveCommand = !@ (Foreign.foreign_value "kCFSocketRetrieveCommand" (ptr CFString.t)) -let kCFSocketValueKey = !@ (Foreign.foreign_value "kCFSocketValueKey" (ptr CFString.t)) -let kCFStreamErrorDomainSOCKS = !@ (Foreign.foreign_value "kCFStreamErrorDomainSOCKS" int) -let kCFStreamErrorDomainSSL = !@ (Foreign.foreign_value "kCFStreamErrorDomainSSL" int) -let kCFStreamPropertyAppendToFile = !@ (Foreign.foreign_value "kCFStreamPropertyAppendToFile" (ptr CFString.t)) -let kCFStreamPropertyDataWritten = !@ (Foreign.foreign_value "kCFStreamPropertyDataWritten" (ptr CFString.t)) -let kCFStreamPropertyFileCurrentOffset = !@ (Foreign.foreign_value "kCFStreamPropertyFileCurrentOffset" (ptr CFString.t)) -let kCFStreamPropertySOCKSPassword = !@ (Foreign.foreign_value "kCFStreamPropertySOCKSPassword" (ptr CFString.t)) -let kCFStreamPropertySOCKSProxy = !@ (Foreign.foreign_value "kCFStreamPropertySOCKSProxy" (ptr CFString.t)) -let kCFStreamPropertySOCKSProxyHost = !@ (Foreign.foreign_value "kCFStreamPropertySOCKSProxyHost" (ptr CFString.t)) -let kCFStreamPropertySOCKSProxyPort = !@ (Foreign.foreign_value "kCFStreamPropertySOCKSProxyPort" (ptr CFString.t)) -let kCFStreamPropertySOCKSUser = !@ (Foreign.foreign_value "kCFStreamPropertySOCKSUser" (ptr CFString.t)) -let kCFStreamPropertySOCKSVersion = !@ (Foreign.foreign_value "kCFStreamPropertySOCKSVersion" (ptr CFString.t)) -let kCFStreamPropertyShouldCloseNativeSocket = !@ (Foreign.foreign_value "kCFStreamPropertyShouldCloseNativeSocket" (ptr CFString.t)) -let kCFStreamPropertySocketNativeHandle = !@ (Foreign.foreign_value "kCFStreamPropertySocketNativeHandle" (ptr CFString.t)) -let kCFStreamPropertySocketRemoteHostName = !@ (Foreign.foreign_value "kCFStreamPropertySocketRemoteHostName" (ptr CFString.t)) -let kCFStreamPropertySocketRemotePortNumber = !@ (Foreign.foreign_value "kCFStreamPropertySocketRemotePortNumber" (ptr CFString.t)) -let kCFStreamPropertySocketSecurityLevel = !@ (Foreign.foreign_value "kCFStreamPropertySocketSecurityLevel" (ptr CFString.t)) -let kCFStreamSocketSOCKSVersion4 = !@ (Foreign.foreign_value "kCFStreamSocketSOCKSVersion4" (ptr CFString.t)) -let kCFStreamSocketSOCKSVersion5 = !@ (Foreign.foreign_value "kCFStreamSocketSOCKSVersion5" (ptr CFString.t)) -let kCFStreamSocketSecurityLevelNegotiatedSSL = !@ (Foreign.foreign_value "kCFStreamSocketSecurityLevelNegotiatedSSL" (ptr CFString.t)) -let kCFStreamSocketSecurityLevelNone = !@ (Foreign.foreign_value "kCFStreamSocketSecurityLevelNone" (ptr CFString.t)) -let kCFStreamSocketSecurityLevelSSLv2 = !@ (Foreign.foreign_value "kCFStreamSocketSecurityLevelSSLv2" (ptr CFString.t)) -let kCFStreamSocketSecurityLevelSSLv3 = !@ (Foreign.foreign_value "kCFStreamSocketSecurityLevelSSLv3" (ptr CFString.t)) -let kCFStreamSocketSecurityLevelTLSv1 = !@ (Foreign.foreign_value "kCFStreamSocketSecurityLevelTLSv1" (ptr CFString.t)) -let kCFStringBinaryHeapCallBacks = !@ (Foreign.foreign_value "kCFStringBinaryHeapCallBacks" CFBinaryHeapCallBacks.t) -let kCFStringTransformFullwidthHalfwidth = !@ (Foreign.foreign_value "kCFStringTransformFullwidthHalfwidth" (ptr CFString.t)) -let kCFStringTransformHiraganaKatakana = !@ (Foreign.foreign_value "kCFStringTransformHiraganaKatakana" (ptr CFString.t)) -let kCFStringTransformLatinArabic = !@ (Foreign.foreign_value "kCFStringTransformLatinArabic" (ptr CFString.t)) -let kCFStringTransformLatinCyrillic = !@ (Foreign.foreign_value "kCFStringTransformLatinCyrillic" (ptr CFString.t)) -let kCFStringTransformLatinGreek = !@ (Foreign.foreign_value "kCFStringTransformLatinGreek" (ptr CFString.t)) -let kCFStringTransformLatinHangul = !@ (Foreign.foreign_value "kCFStringTransformLatinHangul" (ptr CFString.t)) -let kCFStringTransformLatinHebrew = !@ (Foreign.foreign_value "kCFStringTransformLatinHebrew" (ptr CFString.t)) -let kCFStringTransformLatinHiragana = !@ (Foreign.foreign_value "kCFStringTransformLatinHiragana" (ptr CFString.t)) -let kCFStringTransformLatinKatakana = !@ (Foreign.foreign_value "kCFStringTransformLatinKatakana" (ptr CFString.t)) -let kCFStringTransformLatinThai = !@ (Foreign.foreign_value "kCFStringTransformLatinThai" (ptr CFString.t)) -let kCFStringTransformMandarinLatin = !@ (Foreign.foreign_value "kCFStringTransformMandarinLatin" (ptr CFString.t)) -let kCFStringTransformStripCombiningMarks = !@ (Foreign.foreign_value "kCFStringTransformStripCombiningMarks" (ptr CFString.t)) -let kCFStringTransformStripDiacritics = !@ (Foreign.foreign_value "kCFStringTransformStripDiacritics" (ptr CFString.t)) -let kCFStringTransformToLatin = !@ (Foreign.foreign_value "kCFStringTransformToLatin" (ptr CFString.t)) -let kCFStringTransformToUnicodeName = !@ (Foreign.foreign_value "kCFStringTransformToUnicodeName" (ptr CFString.t)) -let kCFStringTransformToXMLHex = !@ (Foreign.foreign_value "kCFStringTransformToXMLHex" (ptr CFString.t)) -let kCFTimeZoneSystemTimeZoneDidChangeNotification = !@ (Foreign.foreign_value "kCFTimeZoneSystemTimeZoneDidChangeNotification" (ptr CFString.t)) -let kCFTypeArrayCallBacks = !@ (Foreign.foreign_value "kCFTypeArrayCallBacks" CFArrayCallBacks.t) -let kCFTypeBagCallBacks = !@ (Foreign.foreign_value "kCFTypeBagCallBacks" CFBagCallBacks.t) -let kCFTypeDictionaryKeyCallBacks = !@ (Foreign.foreign_value "kCFTypeDictionaryKeyCallBacks" CFDictionaryKeyCallBacks.t) -let kCFTypeDictionaryValueCallBacks = !@ (Foreign.foreign_value "kCFTypeDictionaryValueCallBacks" CFDictionaryValueCallBacks.t) -let kCFTypeSetCallBacks = !@ (Foreign.foreign_value "kCFTypeSetCallBacks" CFSetCallBacks.t) -let kCFURLAddedToDirectoryDateKey = !@ (Foreign.foreign_value "kCFURLAddedToDirectoryDateKey" (ptr CFString.t)) -let kCFURLApplicationIsScriptableKey = !@ (Foreign.foreign_value "kCFURLApplicationIsScriptableKey" (ptr CFString.t)) -let kCFURLAttributeModificationDateKey = !@ (Foreign.foreign_value "kCFURLAttributeModificationDateKey" (ptr CFString.t)) -let kCFURLCanonicalPathKey = !@ (Foreign.foreign_value "kCFURLCanonicalPathKey" (ptr CFString.t)) -let kCFURLContentAccessDateKey = !@ (Foreign.foreign_value "kCFURLContentAccessDateKey" (ptr CFString.t)) -let kCFURLContentModificationDateKey = !@ (Foreign.foreign_value "kCFURLContentModificationDateKey" (ptr CFString.t)) -let kCFURLCreationDateKey = !@ (Foreign.foreign_value "kCFURLCreationDateKey" (ptr CFString.t)) -let kCFURLCustomIconKey = !@ (Foreign.foreign_value "kCFURLCustomIconKey" (ptr CFString.t)) -let kCFURLDocumentIdentifierKey = !@ (Foreign.foreign_value "kCFURLDocumentIdentifierKey" (ptr CFString.t)) -let kCFURLEffectiveIconKey = !@ (Foreign.foreign_value "kCFURLEffectiveIconKey" (ptr CFString.t)) -let kCFURLFileAllocatedSizeKey = !@ (Foreign.foreign_value "kCFURLFileAllocatedSizeKey" (ptr CFString.t)) -let kCFURLFileContentIdentifierKey = !@ (Foreign.foreign_value "kCFURLFileContentIdentifierKey" (ptr CFString.t)) -let kCFURLFileDirectoryContents = !@ (Foreign.foreign_value "kCFURLFileDirectoryContents" (ptr CFString.t)) -let kCFURLFileExists = !@ (Foreign.foreign_value "kCFURLFileExists" (ptr CFString.t)) -let kCFURLFileLastModificationTime = !@ (Foreign.foreign_value "kCFURLFileLastModificationTime" (ptr CFString.t)) -let kCFURLFileLength = !@ (Foreign.foreign_value "kCFURLFileLength" (ptr CFString.t)) -let kCFURLFileOwnerID = !@ (Foreign.foreign_value "kCFURLFileOwnerID" (ptr CFString.t)) -let kCFURLFilePOSIXMode = !@ (Foreign.foreign_value "kCFURLFilePOSIXMode" (ptr CFString.t)) -let kCFURLFileProtectionComplete = !@ (Foreign.foreign_value "kCFURLFileProtectionComplete" (ptr CFString.t)) -let kCFURLFileProtectionCompleteUnlessOpen = !@ (Foreign.foreign_value "kCFURLFileProtectionCompleteUnlessOpen" (ptr CFString.t)) -let kCFURLFileProtectionCompleteUntilFirstUserAuthentication = !@ (Foreign.foreign_value "kCFURLFileProtectionCompleteUntilFirstUserAuthentication" (ptr CFString.t)) -let kCFURLFileProtectionKey = !@ (Foreign.foreign_value "kCFURLFileProtectionKey" (ptr CFString.t)) -let kCFURLFileProtectionNone = !@ (Foreign.foreign_value "kCFURLFileProtectionNone" (ptr CFString.t)) -let kCFURLFileResourceIdentifierKey = !@ (Foreign.foreign_value "kCFURLFileResourceIdentifierKey" (ptr CFString.t)) -let kCFURLFileResourceTypeBlockSpecial = !@ (Foreign.foreign_value "kCFURLFileResourceTypeBlockSpecial" (ptr CFString.t)) -let kCFURLFileResourceTypeCharacterSpecial = !@ (Foreign.foreign_value "kCFURLFileResourceTypeCharacterSpecial" (ptr CFString.t)) -let kCFURLFileResourceTypeDirectory = !@ (Foreign.foreign_value "kCFURLFileResourceTypeDirectory" (ptr CFString.t)) -let kCFURLFileResourceTypeKey = !@ (Foreign.foreign_value "kCFURLFileResourceTypeKey" (ptr CFString.t)) -let kCFURLFileResourceTypeNamedPipe = !@ (Foreign.foreign_value "kCFURLFileResourceTypeNamedPipe" (ptr CFString.t)) -let kCFURLFileResourceTypeRegular = !@ (Foreign.foreign_value "kCFURLFileResourceTypeRegular" (ptr CFString.t)) -let kCFURLFileResourceTypeSocket = !@ (Foreign.foreign_value "kCFURLFileResourceTypeSocket" (ptr CFString.t)) -let kCFURLFileResourceTypeSymbolicLink = !@ (Foreign.foreign_value "kCFURLFileResourceTypeSymbolicLink" (ptr CFString.t)) -let kCFURLFileResourceTypeUnknown = !@ (Foreign.foreign_value "kCFURLFileResourceTypeUnknown" (ptr CFString.t)) -let kCFURLFileSecurityKey = !@ (Foreign.foreign_value "kCFURLFileSecurityKey" (ptr CFString.t)) -let kCFURLFileSizeKey = !@ (Foreign.foreign_value "kCFURLFileSizeKey" (ptr CFString.t)) -let kCFURLGenerationIdentifierKey = !@ (Foreign.foreign_value "kCFURLGenerationIdentifierKey" (ptr CFString.t)) -let kCFURLHTTPStatusCode = !@ (Foreign.foreign_value "kCFURLHTTPStatusCode" (ptr CFString.t)) -let kCFURLHTTPStatusLine = !@ (Foreign.foreign_value "kCFURLHTTPStatusLine" (ptr CFString.t)) -let kCFURLHasHiddenExtensionKey = !@ (Foreign.foreign_value "kCFURLHasHiddenExtensionKey" (ptr CFString.t)) -let kCFURLIsAliasFileKey = !@ (Foreign.foreign_value "kCFURLIsAliasFileKey" (ptr CFString.t)) -let kCFURLIsApplicationKey = !@ (Foreign.foreign_value "kCFURLIsApplicationKey" (ptr CFString.t)) -let kCFURLIsDirectoryKey = !@ (Foreign.foreign_value "kCFURLIsDirectoryKey" (ptr CFString.t)) -let kCFURLIsExcludedFromBackupKey = !@ (Foreign.foreign_value "kCFURLIsExcludedFromBackupKey" (ptr CFString.t)) -let kCFURLIsExecutableKey = !@ (Foreign.foreign_value "kCFURLIsExecutableKey" (ptr CFString.t)) -let kCFURLIsHiddenKey = !@ (Foreign.foreign_value "kCFURLIsHiddenKey" (ptr CFString.t)) -let kCFURLIsMountTriggerKey = !@ (Foreign.foreign_value "kCFURLIsMountTriggerKey" (ptr CFString.t)) -let kCFURLIsPackageKey = !@ (Foreign.foreign_value "kCFURLIsPackageKey" (ptr CFString.t)) -let kCFURLIsPurgeableKey = !@ (Foreign.foreign_value "kCFURLIsPurgeableKey" (ptr CFString.t)) -let kCFURLIsReadableKey = !@ (Foreign.foreign_value "kCFURLIsReadableKey" (ptr CFString.t)) -let kCFURLIsRegularFileKey = !@ (Foreign.foreign_value "kCFURLIsRegularFileKey" (ptr CFString.t)) -let kCFURLIsSparseKey = !@ (Foreign.foreign_value "kCFURLIsSparseKey" (ptr CFString.t)) -let kCFURLIsSymbolicLinkKey = !@ (Foreign.foreign_value "kCFURLIsSymbolicLinkKey" (ptr CFString.t)) -let kCFURLIsSystemImmutableKey = !@ (Foreign.foreign_value "kCFURLIsSystemImmutableKey" (ptr CFString.t)) -let kCFURLIsUbiquitousItemKey = !@ (Foreign.foreign_value "kCFURLIsUbiquitousItemKey" (ptr CFString.t)) -let kCFURLIsUserImmutableKey = !@ (Foreign.foreign_value "kCFURLIsUserImmutableKey" (ptr CFString.t)) -let kCFURLIsVolumeKey = !@ (Foreign.foreign_value "kCFURLIsVolumeKey" (ptr CFString.t)) -let kCFURLIsWritableKey = !@ (Foreign.foreign_value "kCFURLIsWritableKey" (ptr CFString.t)) -let kCFURLKeysOfUnsetValuesKey = !@ (Foreign.foreign_value "kCFURLKeysOfUnsetValuesKey" (ptr CFString.t)) -let kCFURLLabelColorKey = !@ (Foreign.foreign_value "kCFURLLabelColorKey" (ptr CFString.t)) -let kCFURLLabelNumberKey = !@ (Foreign.foreign_value "kCFURLLabelNumberKey" (ptr CFString.t)) -let kCFURLLinkCountKey = !@ (Foreign.foreign_value "kCFURLLinkCountKey" (ptr CFString.t)) -let kCFURLLocalizedLabelKey = !@ (Foreign.foreign_value "kCFURLLocalizedLabelKey" (ptr CFString.t)) -let kCFURLLocalizedNameKey = !@ (Foreign.foreign_value "kCFURLLocalizedNameKey" (ptr CFString.t)) -let kCFURLLocalizedTypeDescriptionKey = !@ (Foreign.foreign_value "kCFURLLocalizedTypeDescriptionKey" (ptr CFString.t)) -let kCFURLMayHaveExtendedAttributesKey = !@ (Foreign.foreign_value "kCFURLMayHaveExtendedAttributesKey" (ptr CFString.t)) -let kCFURLMayShareFileContentKey = !@ (Foreign.foreign_value "kCFURLMayShareFileContentKey" (ptr CFString.t)) -let kCFURLNameKey = !@ (Foreign.foreign_value "kCFURLNameKey" (ptr CFString.t)) -let kCFURLParentDirectoryURLKey = !@ (Foreign.foreign_value "kCFURLParentDirectoryURLKey" (ptr CFString.t)) -let kCFURLPathKey = !@ (Foreign.foreign_value "kCFURLPathKey" (ptr CFString.t)) -let kCFURLPreferredIOBlockSizeKey = !@ (Foreign.foreign_value "kCFURLPreferredIOBlockSizeKey" (ptr CFString.t)) -let kCFURLQuarantinePropertiesKey = !@ (Foreign.foreign_value "kCFURLQuarantinePropertiesKey" (ptr CFString.t)) -let kCFURLTagNamesKey = !@ (Foreign.foreign_value "kCFURLTagNamesKey" (ptr CFString.t)) -let kCFURLTotalFileAllocatedSizeKey = !@ (Foreign.foreign_value "kCFURLTotalFileAllocatedSizeKey" (ptr CFString.t)) -let kCFURLTotalFileSizeKey = !@ (Foreign.foreign_value "kCFURLTotalFileSizeKey" (ptr CFString.t)) -let kCFURLTypeIdentifierKey = !@ (Foreign.foreign_value "kCFURLTypeIdentifierKey" (ptr CFString.t)) -let kCFURLUbiquitousItemDownloadingErrorKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemDownloadingErrorKey" (ptr CFString.t)) -let kCFURLUbiquitousItemDownloadingStatusCurrent = !@ (Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusCurrent" (ptr CFString.t)) -let kCFURLUbiquitousItemDownloadingStatusDownloaded = !@ (Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusDownloaded" (ptr CFString.t)) -let kCFURLUbiquitousItemDownloadingStatusKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusKey" (ptr CFString.t)) -let kCFURLUbiquitousItemDownloadingStatusNotDownloaded = !@ (Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusNotDownloaded" (ptr CFString.t)) -let kCFURLUbiquitousItemHasUnresolvedConflictsKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemHasUnresolvedConflictsKey" (ptr CFString.t)) -let kCFURLUbiquitousItemIsDownloadedKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemIsDownloadedKey" (ptr CFString.t)) -let kCFURLUbiquitousItemIsDownloadingKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemIsDownloadingKey" (ptr CFString.t)) -let kCFURLUbiquitousItemIsExcludedFromSyncKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemIsExcludedFromSyncKey" (ptr CFString.t)) -let kCFURLUbiquitousItemIsUploadedKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemIsUploadedKey" (ptr CFString.t)) -let kCFURLUbiquitousItemIsUploadingKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemIsUploadingKey" (ptr CFString.t)) -let kCFURLUbiquitousItemPercentDownloadedKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemPercentDownloadedKey" (ptr CFString.t)) -let kCFURLUbiquitousItemPercentUploadedKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemPercentUploadedKey" (ptr CFString.t)) -let kCFURLUbiquitousItemUploadingErrorKey = !@ (Foreign.foreign_value "kCFURLUbiquitousItemUploadingErrorKey" (ptr CFString.t)) -let kCFURLVolumeAvailableCapacityForImportantUsageKey = !@ (Foreign.foreign_value "kCFURLVolumeAvailableCapacityForImportantUsageKey" (ptr CFString.t)) -let kCFURLVolumeAvailableCapacityForOpportunisticUsageKey = !@ (Foreign.foreign_value "kCFURLVolumeAvailableCapacityForOpportunisticUsageKey" (ptr CFString.t)) -let kCFURLVolumeAvailableCapacityKey = !@ (Foreign.foreign_value "kCFURLVolumeAvailableCapacityKey" (ptr CFString.t)) -let kCFURLVolumeCreationDateKey = !@ (Foreign.foreign_value "kCFURLVolumeCreationDateKey" (ptr CFString.t)) -let kCFURLVolumeIdentifierKey = !@ (Foreign.foreign_value "kCFURLVolumeIdentifierKey" (ptr CFString.t)) -let kCFURLVolumeIsAutomountedKey = !@ (Foreign.foreign_value "kCFURLVolumeIsAutomountedKey" (ptr CFString.t)) -let kCFURLVolumeIsBrowsableKey = !@ (Foreign.foreign_value "kCFURLVolumeIsBrowsableKey" (ptr CFString.t)) -let kCFURLVolumeIsEjectableKey = !@ (Foreign.foreign_value "kCFURLVolumeIsEjectableKey" (ptr CFString.t)) -let kCFURLVolumeIsEncryptedKey = !@ (Foreign.foreign_value "kCFURLVolumeIsEncryptedKey" (ptr CFString.t)) -let kCFURLVolumeIsInternalKey = !@ (Foreign.foreign_value "kCFURLVolumeIsInternalKey" (ptr CFString.t)) -let kCFURLVolumeIsJournalingKey = !@ (Foreign.foreign_value "kCFURLVolumeIsJournalingKey" (ptr CFString.t)) -let kCFURLVolumeIsLocalKey = !@ (Foreign.foreign_value "kCFURLVolumeIsLocalKey" (ptr CFString.t)) -let kCFURLVolumeIsReadOnlyKey = !@ (Foreign.foreign_value "kCFURLVolumeIsReadOnlyKey" (ptr CFString.t)) -let kCFURLVolumeIsRemovableKey = !@ (Foreign.foreign_value "kCFURLVolumeIsRemovableKey" (ptr CFString.t)) -let kCFURLVolumeIsRootFileSystemKey = !@ (Foreign.foreign_value "kCFURLVolumeIsRootFileSystemKey" (ptr CFString.t)) -let kCFURLVolumeLocalizedFormatDescriptionKey = !@ (Foreign.foreign_value "kCFURLVolumeLocalizedFormatDescriptionKey" (ptr CFString.t)) -let kCFURLVolumeLocalizedNameKey = !@ (Foreign.foreign_value "kCFURLVolumeLocalizedNameKey" (ptr CFString.t)) -let kCFURLVolumeMaximumFileSizeKey = !@ (Foreign.foreign_value "kCFURLVolumeMaximumFileSizeKey" (ptr CFString.t)) -let kCFURLVolumeNameKey = !@ (Foreign.foreign_value "kCFURLVolumeNameKey" (ptr CFString.t)) -let kCFURLVolumeResourceCountKey = !@ (Foreign.foreign_value "kCFURLVolumeResourceCountKey" (ptr CFString.t)) -let kCFURLVolumeSupportsAccessPermissionsKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsAccessPermissionsKey" (ptr CFString.t)) -let kCFURLVolumeSupportsAdvisoryFileLockingKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsAdvisoryFileLockingKey" (ptr CFString.t)) -let kCFURLVolumeSupportsCasePreservedNamesKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsCasePreservedNamesKey" (ptr CFString.t)) -let kCFURLVolumeSupportsCaseSensitiveNamesKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsCaseSensitiveNamesKey" (ptr CFString.t)) -let kCFURLVolumeSupportsCompressionKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsCompressionKey" (ptr CFString.t)) -let kCFURLVolumeSupportsExclusiveRenamingKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsExclusiveRenamingKey" (ptr CFString.t)) -let kCFURLVolumeSupportsExtendedSecurityKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsExtendedSecurityKey" (ptr CFString.t)) -let kCFURLVolumeSupportsFileCloningKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsFileCloningKey" (ptr CFString.t)) -let kCFURLVolumeSupportsFileProtectionKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsFileProtectionKey" (ptr CFString.t)) -let kCFURLVolumeSupportsHardLinksKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsHardLinksKey" (ptr CFString.t)) -let kCFURLVolumeSupportsImmutableFilesKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsImmutableFilesKey" (ptr CFString.t)) -let kCFURLVolumeSupportsJournalingKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsJournalingKey" (ptr CFString.t)) -let kCFURLVolumeSupportsPersistentIDsKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsPersistentIDsKey" (ptr CFString.t)) -let kCFURLVolumeSupportsRenamingKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsRenamingKey" (ptr CFString.t)) -let kCFURLVolumeSupportsRootDirectoryDatesKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsRootDirectoryDatesKey" (ptr CFString.t)) -let kCFURLVolumeSupportsSparseFilesKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsSparseFilesKey" (ptr CFString.t)) -let kCFURLVolumeSupportsSwapRenamingKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsSwapRenamingKey" (ptr CFString.t)) -let kCFURLVolumeSupportsSymbolicLinksKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsSymbolicLinksKey" (ptr CFString.t)) -let kCFURLVolumeSupportsVolumeSizesKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsVolumeSizesKey" (ptr CFString.t)) -let kCFURLVolumeSupportsZeroRunsKey = !@ (Foreign.foreign_value "kCFURLVolumeSupportsZeroRunsKey" (ptr CFString.t)) -let kCFURLVolumeTotalCapacityKey = !@ (Foreign.foreign_value "kCFURLVolumeTotalCapacityKey" (ptr CFString.t)) -let kCFURLVolumeURLForRemountingKey = !@ (Foreign.foreign_value "kCFURLVolumeURLForRemountingKey" (ptr CFString.t)) -let kCFURLVolumeURLKey = !@ (Foreign.foreign_value "kCFURLVolumeURLKey" (ptr CFString.t)) -let kCFURLVolumeUUIDStringKey = !@ (Foreign.foreign_value "kCFURLVolumeUUIDStringKey" (ptr CFString.t)) -let kCFUserNotificationAlertHeaderKey = !@ (Foreign.foreign_value "kCFUserNotificationAlertHeaderKey" (ptr CFString.t)) -let kCFUserNotificationAlertMessageKey = !@ (Foreign.foreign_value "kCFUserNotificationAlertMessageKey" (ptr CFString.t)) -let kCFUserNotificationAlertTopMostKey = !@ (Foreign.foreign_value "kCFUserNotificationAlertTopMostKey" (ptr CFString.t)) -let kCFUserNotificationAlternateButtonTitleKey = !@ (Foreign.foreign_value "kCFUserNotificationAlternateButtonTitleKey" (ptr CFString.t)) -let kCFUserNotificationCheckBoxTitlesKey = !@ (Foreign.foreign_value "kCFUserNotificationCheckBoxTitlesKey" (ptr CFString.t)) -let kCFUserNotificationDefaultButtonTitleKey = !@ (Foreign.foreign_value "kCFUserNotificationDefaultButtonTitleKey" (ptr CFString.t)) -let kCFUserNotificationIconURLKey = !@ (Foreign.foreign_value "kCFUserNotificationIconURLKey" (ptr CFString.t)) -let kCFUserNotificationKeyboardTypesKey = !@ (Foreign.foreign_value "kCFUserNotificationKeyboardTypesKey" (ptr CFString.t)) -let kCFUserNotificationLocalizationURLKey = !@ (Foreign.foreign_value "kCFUserNotificationLocalizationURLKey" (ptr CFString.t)) -let kCFUserNotificationOtherButtonTitleKey = !@ (Foreign.foreign_value "kCFUserNotificationOtherButtonTitleKey" (ptr CFString.t)) -let kCFUserNotificationPopUpSelectionKey = !@ (Foreign.foreign_value "kCFUserNotificationPopUpSelectionKey" (ptr CFString.t)) -let kCFUserNotificationPopUpTitlesKey = !@ (Foreign.foreign_value "kCFUserNotificationPopUpTitlesKey" (ptr CFString.t)) -let kCFUserNotificationProgressIndicatorValueKey = !@ (Foreign.foreign_value "kCFUserNotificationProgressIndicatorValueKey" (ptr CFString.t)) -let kCFUserNotificationSoundURLKey = !@ (Foreign.foreign_value "kCFUserNotificationSoundURLKey" (ptr CFString.t)) -let kCFUserNotificationTextFieldTitlesKey = !@ (Foreign.foreign_value "kCFUserNotificationTextFieldTitlesKey" (ptr CFString.t)) -let kCFUserNotificationTextFieldValuesKey = !@ (Foreign.foreign_value "kCFUserNotificationTextFieldValuesKey" (ptr CFString.t)) -let kCFXMLTreeErrorDescription = !@ (Foreign.foreign_value "kCFXMLTreeErrorDescription" (ptr CFString.t)) -let kCFXMLTreeErrorLineNumber = !@ (Foreign.foreign_value "kCFXMLTreeErrorLineNumber" (ptr CFString.t)) -let kCFXMLTreeErrorLocation = !@ (Foreign.foreign_value "kCFXMLTreeErrorLocation" (ptr CFString.t)) -let kCFXMLTreeErrorStatusCode = !@ (Foreign.foreign_value "kCFXMLTreeErrorStatusCode" (ptr CFString.t)) +let kCFAbsoluteTimeIntervalSince1904 = Foreign.foreign_value "kCFAbsoluteTimeIntervalSince1904" double +let kCFAbsoluteTimeIntervalSince1970 = Foreign.foreign_value "kCFAbsoluteTimeIntervalSince1970" double +let kCFAllocatorDefault = Foreign.foreign_value "kCFAllocatorDefault" (ptr CFAllocator.t) +let kCFAllocatorMalloc = Foreign.foreign_value "kCFAllocatorMalloc" (ptr CFAllocator.t) +let kCFAllocatorMallocZone = Foreign.foreign_value "kCFAllocatorMallocZone" (ptr CFAllocator.t) +let kCFAllocatorNull = Foreign.foreign_value "kCFAllocatorNull" (ptr CFAllocator.t) +let kCFAllocatorSystemDefault = Foreign.foreign_value "kCFAllocatorSystemDefault" (ptr CFAllocator.t) +let kCFAllocatorUseContext = Foreign.foreign_value "kCFAllocatorUseContext" (ptr CFAllocator.t) +let kCFBooleanFalse = Foreign.foreign_value "kCFBooleanFalse" (ptr CFBoolean.t) +let kCFBooleanTrue = Foreign.foreign_value "kCFBooleanTrue" (ptr CFBoolean.t) +let kCFBuddhistCalendar = Foreign.foreign_value "kCFBuddhistCalendar" (ptr CFString.t) +let kCFBundleDevelopmentRegionKey = Foreign.foreign_value "kCFBundleDevelopmentRegionKey" (ptr CFString.t) +let kCFBundleExecutableKey = Foreign.foreign_value "kCFBundleExecutableKey" (ptr CFString.t) +let kCFBundleIdentifierKey = Foreign.foreign_value "kCFBundleIdentifierKey" (ptr CFString.t) +let kCFBundleInfoDictionaryVersionKey = Foreign.foreign_value "kCFBundleInfoDictionaryVersionKey" (ptr CFString.t) +let kCFBundleLocalizationsKey = Foreign.foreign_value "kCFBundleLocalizationsKey" (ptr CFString.t) +let kCFBundleNameKey = Foreign.foreign_value "kCFBundleNameKey" (ptr CFString.t) +let kCFBundleVersionKey = Foreign.foreign_value "kCFBundleVersionKey" (ptr CFString.t) +let kCFChineseCalendar = Foreign.foreign_value "kCFChineseCalendar" (ptr CFString.t) +let kCFCopyStringBagCallBacks = Foreign.foreign_value "kCFCopyStringBagCallBacks" CFBagCallBacks.t +let kCFCopyStringDictionaryKeyCallBacks = Foreign.foreign_value "kCFCopyStringDictionaryKeyCallBacks" CFDictionaryKeyCallBacks.t +let kCFCopyStringSetCallBacks = Foreign.foreign_value "kCFCopyStringSetCallBacks" CFSetCallBacks.t +let kCFCoreFoundationVersionNumber = Foreign.foreign_value "kCFCoreFoundationVersionNumber" double +let kCFDateFormatterAMSymbol = Foreign.foreign_value "kCFDateFormatterAMSymbol" (ptr CFString.t) +let kCFDateFormatterCalendar = Foreign.foreign_value "kCFDateFormatterCalendar" (ptr CFString.t) +let kCFDateFormatterCalendarName = Foreign.foreign_value "kCFDateFormatterCalendarName" (ptr CFString.t) +let kCFDateFormatterDefaultDate = Foreign.foreign_value "kCFDateFormatterDefaultDate" (ptr CFString.t) +let kCFDateFormatterDefaultFormat = Foreign.foreign_value "kCFDateFormatterDefaultFormat" (ptr CFString.t) +let kCFDateFormatterDoesRelativeDateFormattingKey = Foreign.foreign_value "kCFDateFormatterDoesRelativeDateFormattingKey" (ptr CFString.t) +let kCFDateFormatterEraSymbols = Foreign.foreign_value "kCFDateFormatterEraSymbols" (ptr CFString.t) +let kCFDateFormatterGregorianStartDate = Foreign.foreign_value "kCFDateFormatterGregorianStartDate" (ptr CFString.t) +let kCFDateFormatterIsLenient = Foreign.foreign_value "kCFDateFormatterIsLenient" (ptr CFString.t) +let kCFDateFormatterLongEraSymbols = Foreign.foreign_value "kCFDateFormatterLongEraSymbols" (ptr CFString.t) +let kCFDateFormatterMonthSymbols = Foreign.foreign_value "kCFDateFormatterMonthSymbols" (ptr CFString.t) +let kCFDateFormatterPMSymbol = Foreign.foreign_value "kCFDateFormatterPMSymbol" (ptr CFString.t) +let kCFDateFormatterQuarterSymbols = Foreign.foreign_value "kCFDateFormatterQuarterSymbols" (ptr CFString.t) +let kCFDateFormatterShortMonthSymbols = Foreign.foreign_value "kCFDateFormatterShortMonthSymbols" (ptr CFString.t) +let kCFDateFormatterShortQuarterSymbols = Foreign.foreign_value "kCFDateFormatterShortQuarterSymbols" (ptr CFString.t) +let kCFDateFormatterShortStandaloneMonthSymbols = Foreign.foreign_value "kCFDateFormatterShortStandaloneMonthSymbols" (ptr CFString.t) +let kCFDateFormatterShortStandaloneQuarterSymbols = Foreign.foreign_value "kCFDateFormatterShortStandaloneQuarterSymbols" (ptr CFString.t) +let kCFDateFormatterShortStandaloneWeekdaySymbols = Foreign.foreign_value "kCFDateFormatterShortStandaloneWeekdaySymbols" (ptr CFString.t) +let kCFDateFormatterShortWeekdaySymbols = Foreign.foreign_value "kCFDateFormatterShortWeekdaySymbols" (ptr CFString.t) +let kCFDateFormatterStandaloneMonthSymbols = Foreign.foreign_value "kCFDateFormatterStandaloneMonthSymbols" (ptr CFString.t) +let kCFDateFormatterStandaloneQuarterSymbols = Foreign.foreign_value "kCFDateFormatterStandaloneQuarterSymbols" (ptr CFString.t) +let kCFDateFormatterStandaloneWeekdaySymbols = Foreign.foreign_value "kCFDateFormatterStandaloneWeekdaySymbols" (ptr CFString.t) +let kCFDateFormatterTimeZone = Foreign.foreign_value "kCFDateFormatterTimeZone" (ptr CFString.t) +let kCFDateFormatterTwoDigitStartDate = Foreign.foreign_value "kCFDateFormatterTwoDigitStartDate" (ptr CFString.t) +let kCFDateFormatterVeryShortMonthSymbols = Foreign.foreign_value "kCFDateFormatterVeryShortMonthSymbols" (ptr CFString.t) +let kCFDateFormatterVeryShortStandaloneMonthSymbols = Foreign.foreign_value "kCFDateFormatterVeryShortStandaloneMonthSymbols" (ptr CFString.t) +let kCFDateFormatterVeryShortStandaloneWeekdaySymbols = Foreign.foreign_value "kCFDateFormatterVeryShortStandaloneWeekdaySymbols" (ptr CFString.t) +let kCFDateFormatterVeryShortWeekdaySymbols = Foreign.foreign_value "kCFDateFormatterVeryShortWeekdaySymbols" (ptr CFString.t) +let kCFDateFormatterWeekdaySymbols = Foreign.foreign_value "kCFDateFormatterWeekdaySymbols" (ptr CFString.t) +let kCFErrorDescriptionKey = Foreign.foreign_value "kCFErrorDescriptionKey" (ptr CFString.t) +let kCFErrorDomainCocoa = Foreign.foreign_value "kCFErrorDomainCocoa" (ptr CFString.t) +let kCFErrorDomainMach = Foreign.foreign_value "kCFErrorDomainMach" (ptr CFString.t) +let kCFErrorDomainOSStatus = Foreign.foreign_value "kCFErrorDomainOSStatus" (ptr CFString.t) +let kCFErrorDomainPOSIX = Foreign.foreign_value "kCFErrorDomainPOSIX" (ptr CFString.t) +let kCFErrorFilePathKey = Foreign.foreign_value "kCFErrorFilePathKey" (ptr CFString.t) +let kCFErrorLocalizedDescriptionKey = Foreign.foreign_value "kCFErrorLocalizedDescriptionKey" (ptr CFString.t) +let kCFErrorLocalizedFailureKey = Foreign.foreign_value "kCFErrorLocalizedFailureKey" (ptr CFString.t) +let kCFErrorLocalizedFailureReasonKey = Foreign.foreign_value "kCFErrorLocalizedFailureReasonKey" (ptr CFString.t) +let kCFErrorLocalizedRecoverySuggestionKey = Foreign.foreign_value "kCFErrorLocalizedRecoverySuggestionKey" (ptr CFString.t) +let kCFErrorURLKey = Foreign.foreign_value "kCFErrorURLKey" (ptr CFString.t) +let kCFErrorUnderlyingErrorKey = Foreign.foreign_value "kCFErrorUnderlyingErrorKey" (ptr CFString.t) +let kCFGregorianCalendar = Foreign.foreign_value "kCFGregorianCalendar" (ptr CFString.t) +let kCFHebrewCalendar = Foreign.foreign_value "kCFHebrewCalendar" (ptr CFString.t) +let kCFISO8601Calendar = Foreign.foreign_value "kCFISO8601Calendar" (ptr CFString.t) +let kCFIndianCalendar = Foreign.foreign_value "kCFIndianCalendar" (ptr CFString.t) +let kCFIslamicCalendar = Foreign.foreign_value "kCFIslamicCalendar" (ptr CFString.t) +let kCFIslamicCivilCalendar = Foreign.foreign_value "kCFIslamicCivilCalendar" (ptr CFString.t) +let kCFIslamicTabularCalendar = Foreign.foreign_value "kCFIslamicTabularCalendar" (ptr CFString.t) +let kCFIslamicUmmAlQuraCalendar = Foreign.foreign_value "kCFIslamicUmmAlQuraCalendar" (ptr CFString.t) +let kCFJapaneseCalendar = Foreign.foreign_value "kCFJapaneseCalendar" (ptr CFString.t) +let kCFLocaleAlternateQuotationBeginDelimiterKey = Foreign.foreign_value "kCFLocaleAlternateQuotationBeginDelimiterKey" (ptr CFString.t) +let kCFLocaleAlternateQuotationEndDelimiterKey = Foreign.foreign_value "kCFLocaleAlternateQuotationEndDelimiterKey" (ptr CFString.t) +let kCFLocaleCalendar = Foreign.foreign_value "kCFLocaleCalendar" (ptr CFString.t) +let kCFLocaleCalendarIdentifier = Foreign.foreign_value "kCFLocaleCalendarIdentifier" (ptr CFString.t) +let kCFLocaleCollationIdentifier = Foreign.foreign_value "kCFLocaleCollationIdentifier" (ptr CFString.t) +let kCFLocaleCollatorIdentifier = Foreign.foreign_value "kCFLocaleCollatorIdentifier" (ptr CFString.t) +let kCFLocaleCountryCode = Foreign.foreign_value "kCFLocaleCountryCode" (ptr CFString.t) +let kCFLocaleCurrencyCode = Foreign.foreign_value "kCFLocaleCurrencyCode" (ptr CFString.t) +let kCFLocaleCurrencySymbol = Foreign.foreign_value "kCFLocaleCurrencySymbol" (ptr CFString.t) +let kCFLocaleCurrentLocaleDidChangeNotification = Foreign.foreign_value "kCFLocaleCurrentLocaleDidChangeNotification" (ptr CFString.t) +let kCFLocaleDecimalSeparator = Foreign.foreign_value "kCFLocaleDecimalSeparator" (ptr CFString.t) +let kCFLocaleExemplarCharacterSet = Foreign.foreign_value "kCFLocaleExemplarCharacterSet" (ptr CFString.t) +let kCFLocaleGroupingSeparator = Foreign.foreign_value "kCFLocaleGroupingSeparator" (ptr CFString.t) +let kCFLocaleIdentifier = Foreign.foreign_value "kCFLocaleIdentifier" (ptr CFString.t) +let kCFLocaleLanguageCode = Foreign.foreign_value "kCFLocaleLanguageCode" (ptr CFString.t) +let kCFLocaleMeasurementSystem = Foreign.foreign_value "kCFLocaleMeasurementSystem" (ptr CFString.t) +let kCFLocaleQuotationBeginDelimiterKey = Foreign.foreign_value "kCFLocaleQuotationBeginDelimiterKey" (ptr CFString.t) +let kCFLocaleQuotationEndDelimiterKey = Foreign.foreign_value "kCFLocaleQuotationEndDelimiterKey" (ptr CFString.t) +let kCFLocaleScriptCode = Foreign.foreign_value "kCFLocaleScriptCode" (ptr CFString.t) +let kCFLocaleUsesMetricSystem = Foreign.foreign_value "kCFLocaleUsesMetricSystem" (ptr CFString.t) +let kCFLocaleVariantCode = Foreign.foreign_value "kCFLocaleVariantCode" (ptr CFString.t) +let kCFNull = Foreign.foreign_value "kCFNull" (ptr CFNull.t) +let kCFNumberFormatterAlwaysShowDecimalSeparator = Foreign.foreign_value "kCFNumberFormatterAlwaysShowDecimalSeparator" (ptr CFString.t) +let kCFNumberFormatterCurrencyCode = Foreign.foreign_value "kCFNumberFormatterCurrencyCode" (ptr CFString.t) +let kCFNumberFormatterCurrencyDecimalSeparator = Foreign.foreign_value "kCFNumberFormatterCurrencyDecimalSeparator" (ptr CFString.t) +let kCFNumberFormatterCurrencyGroupingSeparator = Foreign.foreign_value "kCFNumberFormatterCurrencyGroupingSeparator" (ptr CFString.t) +let kCFNumberFormatterCurrencySymbol = Foreign.foreign_value "kCFNumberFormatterCurrencySymbol" (ptr CFString.t) +let kCFNumberFormatterDecimalSeparator = Foreign.foreign_value "kCFNumberFormatterDecimalSeparator" (ptr CFString.t) +let kCFNumberFormatterDefaultFormat = Foreign.foreign_value "kCFNumberFormatterDefaultFormat" (ptr CFString.t) +let kCFNumberFormatterExponentSymbol = Foreign.foreign_value "kCFNumberFormatterExponentSymbol" (ptr CFString.t) +let kCFNumberFormatterFormatWidth = Foreign.foreign_value "kCFNumberFormatterFormatWidth" (ptr CFString.t) +let kCFNumberFormatterGroupingSeparator = Foreign.foreign_value "kCFNumberFormatterGroupingSeparator" (ptr CFString.t) +let kCFNumberFormatterGroupingSize = Foreign.foreign_value "kCFNumberFormatterGroupingSize" (ptr CFString.t) +let kCFNumberFormatterInfinitySymbol = Foreign.foreign_value "kCFNumberFormatterInfinitySymbol" (ptr CFString.t) +let kCFNumberFormatterInternationalCurrencySymbol = Foreign.foreign_value "kCFNumberFormatterInternationalCurrencySymbol" (ptr CFString.t) +let kCFNumberFormatterIsLenient = Foreign.foreign_value "kCFNumberFormatterIsLenient" (ptr CFString.t) +let kCFNumberFormatterMaxFractionDigits = Foreign.foreign_value "kCFNumberFormatterMaxFractionDigits" (ptr CFString.t) +let kCFNumberFormatterMaxIntegerDigits = Foreign.foreign_value "kCFNumberFormatterMaxIntegerDigits" (ptr CFString.t) +let kCFNumberFormatterMaxSignificantDigits = Foreign.foreign_value "kCFNumberFormatterMaxSignificantDigits" (ptr CFString.t) +let kCFNumberFormatterMinFractionDigits = Foreign.foreign_value "kCFNumberFormatterMinFractionDigits" (ptr CFString.t) +let kCFNumberFormatterMinIntegerDigits = Foreign.foreign_value "kCFNumberFormatterMinIntegerDigits" (ptr CFString.t) +let kCFNumberFormatterMinSignificantDigits = Foreign.foreign_value "kCFNumberFormatterMinSignificantDigits" (ptr CFString.t) +let kCFNumberFormatterMinusSign = Foreign.foreign_value "kCFNumberFormatterMinusSign" (ptr CFString.t) +let kCFNumberFormatterMultiplier = Foreign.foreign_value "kCFNumberFormatterMultiplier" (ptr CFString.t) +let kCFNumberFormatterNaNSymbol = Foreign.foreign_value "kCFNumberFormatterNaNSymbol" (ptr CFString.t) +let kCFNumberFormatterNegativePrefix = Foreign.foreign_value "kCFNumberFormatterNegativePrefix" (ptr CFString.t) +let kCFNumberFormatterNegativeSuffix = Foreign.foreign_value "kCFNumberFormatterNegativeSuffix" (ptr CFString.t) +let kCFNumberFormatterPaddingCharacter = Foreign.foreign_value "kCFNumberFormatterPaddingCharacter" (ptr CFString.t) +let kCFNumberFormatterPaddingPosition = Foreign.foreign_value "kCFNumberFormatterPaddingPosition" (ptr CFString.t) +let kCFNumberFormatterPerMillSymbol = Foreign.foreign_value "kCFNumberFormatterPerMillSymbol" (ptr CFString.t) +let kCFNumberFormatterPercentSymbol = Foreign.foreign_value "kCFNumberFormatterPercentSymbol" (ptr CFString.t) +let kCFNumberFormatterPlusSign = Foreign.foreign_value "kCFNumberFormatterPlusSign" (ptr CFString.t) +let kCFNumberFormatterPositivePrefix = Foreign.foreign_value "kCFNumberFormatterPositivePrefix" (ptr CFString.t) +let kCFNumberFormatterPositiveSuffix = Foreign.foreign_value "kCFNumberFormatterPositiveSuffix" (ptr CFString.t) +let kCFNumberFormatterRoundingIncrement = Foreign.foreign_value "kCFNumberFormatterRoundingIncrement" (ptr CFString.t) +let kCFNumberFormatterRoundingMode = Foreign.foreign_value "kCFNumberFormatterRoundingMode" (ptr CFString.t) +let kCFNumberFormatterSecondaryGroupingSize = Foreign.foreign_value "kCFNumberFormatterSecondaryGroupingSize" (ptr CFString.t) +let kCFNumberFormatterUseGroupingSeparator = Foreign.foreign_value "kCFNumberFormatterUseGroupingSeparator" (ptr CFString.t) +let kCFNumberFormatterUseSignificantDigits = Foreign.foreign_value "kCFNumberFormatterUseSignificantDigits" (ptr CFString.t) +let kCFNumberFormatterZeroSymbol = Foreign.foreign_value "kCFNumberFormatterZeroSymbol" (ptr CFString.t) +let kCFNumberNaN = Foreign.foreign_value "kCFNumberNaN" (ptr CFNumber.t) +let kCFNumberNegativeInfinity = Foreign.foreign_value "kCFNumberNegativeInfinity" (ptr CFNumber.t) +let kCFNumberPositiveInfinity = Foreign.foreign_value "kCFNumberPositiveInfinity" (ptr CFNumber.t) +let kCFPersianCalendar = Foreign.foreign_value "kCFPersianCalendar" (ptr CFString.t) +let kCFPlugInDynamicRegisterFunctionKey = Foreign.foreign_value "kCFPlugInDynamicRegisterFunctionKey" (ptr CFString.t) +let kCFPlugInDynamicRegistrationKey = Foreign.foreign_value "kCFPlugInDynamicRegistrationKey" (ptr CFString.t) +let kCFPlugInFactoriesKey = Foreign.foreign_value "kCFPlugInFactoriesKey" (ptr CFString.t) +let kCFPlugInTypesKey = Foreign.foreign_value "kCFPlugInTypesKey" (ptr CFString.t) +let kCFPlugInUnloadFunctionKey = Foreign.foreign_value "kCFPlugInUnloadFunctionKey" (ptr CFString.t) +let kCFPreferencesAnyApplication = Foreign.foreign_value "kCFPreferencesAnyApplication" (ptr CFString.t) +let kCFPreferencesAnyHost = Foreign.foreign_value "kCFPreferencesAnyHost" (ptr CFString.t) +let kCFPreferencesAnyUser = Foreign.foreign_value "kCFPreferencesAnyUser" (ptr CFString.t) +let kCFPreferencesCurrentApplication = Foreign.foreign_value "kCFPreferencesCurrentApplication" (ptr CFString.t) +let kCFPreferencesCurrentHost = Foreign.foreign_value "kCFPreferencesCurrentHost" (ptr CFString.t) +let kCFPreferencesCurrentUser = Foreign.foreign_value "kCFPreferencesCurrentUser" (ptr CFString.t) +let kCFRepublicOfChinaCalendar = Foreign.foreign_value "kCFRepublicOfChinaCalendar" (ptr CFString.t) +let kCFRunLoopCommonModes = Foreign.foreign_value "kCFRunLoopCommonModes" (ptr CFString.t) +let kCFRunLoopDefaultMode = Foreign.foreign_value "kCFRunLoopDefaultMode" (ptr CFString.t) +let kCFSocketCommandKey = Foreign.foreign_value "kCFSocketCommandKey" (ptr CFString.t) +let kCFSocketErrorKey = Foreign.foreign_value "kCFSocketErrorKey" (ptr CFString.t) +let kCFSocketNameKey = Foreign.foreign_value "kCFSocketNameKey" (ptr CFString.t) +let kCFSocketRegisterCommand = Foreign.foreign_value "kCFSocketRegisterCommand" (ptr CFString.t) +let kCFSocketResultKey = Foreign.foreign_value "kCFSocketResultKey" (ptr CFString.t) +let kCFSocketRetrieveCommand = Foreign.foreign_value "kCFSocketRetrieveCommand" (ptr CFString.t) +let kCFSocketValueKey = Foreign.foreign_value "kCFSocketValueKey" (ptr CFString.t) +let kCFStreamErrorDomainSOCKS = Foreign.foreign_value "kCFStreamErrorDomainSOCKS" int +let kCFStreamErrorDomainSSL = Foreign.foreign_value "kCFStreamErrorDomainSSL" int +let kCFStreamPropertyAppendToFile = Foreign.foreign_value "kCFStreamPropertyAppendToFile" (ptr CFString.t) +let kCFStreamPropertyDataWritten = Foreign.foreign_value "kCFStreamPropertyDataWritten" (ptr CFString.t) +let kCFStreamPropertyFileCurrentOffset = Foreign.foreign_value "kCFStreamPropertyFileCurrentOffset" (ptr CFString.t) +let kCFStreamPropertySOCKSPassword = Foreign.foreign_value "kCFStreamPropertySOCKSPassword" (ptr CFString.t) +let kCFStreamPropertySOCKSProxy = Foreign.foreign_value "kCFStreamPropertySOCKSProxy" (ptr CFString.t) +let kCFStreamPropertySOCKSProxyHost = Foreign.foreign_value "kCFStreamPropertySOCKSProxyHost" (ptr CFString.t) +let kCFStreamPropertySOCKSProxyPort = Foreign.foreign_value "kCFStreamPropertySOCKSProxyPort" (ptr CFString.t) +let kCFStreamPropertySOCKSUser = Foreign.foreign_value "kCFStreamPropertySOCKSUser" (ptr CFString.t) +let kCFStreamPropertySOCKSVersion = Foreign.foreign_value "kCFStreamPropertySOCKSVersion" (ptr CFString.t) +let kCFStreamPropertyShouldCloseNativeSocket = Foreign.foreign_value "kCFStreamPropertyShouldCloseNativeSocket" (ptr CFString.t) +let kCFStreamPropertySocketNativeHandle = Foreign.foreign_value "kCFStreamPropertySocketNativeHandle" (ptr CFString.t) +let kCFStreamPropertySocketRemoteHostName = Foreign.foreign_value "kCFStreamPropertySocketRemoteHostName" (ptr CFString.t) +let kCFStreamPropertySocketRemotePortNumber = Foreign.foreign_value "kCFStreamPropertySocketRemotePortNumber" (ptr CFString.t) +let kCFStreamPropertySocketSecurityLevel = Foreign.foreign_value "kCFStreamPropertySocketSecurityLevel" (ptr CFString.t) +let kCFStreamSocketSOCKSVersion4 = Foreign.foreign_value "kCFStreamSocketSOCKSVersion4" (ptr CFString.t) +let kCFStreamSocketSOCKSVersion5 = Foreign.foreign_value "kCFStreamSocketSOCKSVersion5" (ptr CFString.t) +let kCFStreamSocketSecurityLevelNegotiatedSSL = Foreign.foreign_value "kCFStreamSocketSecurityLevelNegotiatedSSL" (ptr CFString.t) +let kCFStreamSocketSecurityLevelNone = Foreign.foreign_value "kCFStreamSocketSecurityLevelNone" (ptr CFString.t) +let kCFStreamSocketSecurityLevelSSLv2 = Foreign.foreign_value "kCFStreamSocketSecurityLevelSSLv2" (ptr CFString.t) +let kCFStreamSocketSecurityLevelSSLv3 = Foreign.foreign_value "kCFStreamSocketSecurityLevelSSLv3" (ptr CFString.t) +let kCFStreamSocketSecurityLevelTLSv1 = Foreign.foreign_value "kCFStreamSocketSecurityLevelTLSv1" (ptr CFString.t) +let kCFStringBinaryHeapCallBacks = Foreign.foreign_value "kCFStringBinaryHeapCallBacks" CFBinaryHeapCallBacks.t +let kCFStringTransformFullwidthHalfwidth = Foreign.foreign_value "kCFStringTransformFullwidthHalfwidth" (ptr CFString.t) +let kCFStringTransformHiraganaKatakana = Foreign.foreign_value "kCFStringTransformHiraganaKatakana" (ptr CFString.t) +let kCFStringTransformLatinArabic = Foreign.foreign_value "kCFStringTransformLatinArabic" (ptr CFString.t) +let kCFStringTransformLatinCyrillic = Foreign.foreign_value "kCFStringTransformLatinCyrillic" (ptr CFString.t) +let kCFStringTransformLatinGreek = Foreign.foreign_value "kCFStringTransformLatinGreek" (ptr CFString.t) +let kCFStringTransformLatinHangul = Foreign.foreign_value "kCFStringTransformLatinHangul" (ptr CFString.t) +let kCFStringTransformLatinHebrew = Foreign.foreign_value "kCFStringTransformLatinHebrew" (ptr CFString.t) +let kCFStringTransformLatinHiragana = Foreign.foreign_value "kCFStringTransformLatinHiragana" (ptr CFString.t) +let kCFStringTransformLatinKatakana = Foreign.foreign_value "kCFStringTransformLatinKatakana" (ptr CFString.t) +let kCFStringTransformLatinThai = Foreign.foreign_value "kCFStringTransformLatinThai" (ptr CFString.t) +let kCFStringTransformMandarinLatin = Foreign.foreign_value "kCFStringTransformMandarinLatin" (ptr CFString.t) +let kCFStringTransformStripCombiningMarks = Foreign.foreign_value "kCFStringTransformStripCombiningMarks" (ptr CFString.t) +let kCFStringTransformStripDiacritics = Foreign.foreign_value "kCFStringTransformStripDiacritics" (ptr CFString.t) +let kCFStringTransformToLatin = Foreign.foreign_value "kCFStringTransformToLatin" (ptr CFString.t) +let kCFStringTransformToUnicodeName = Foreign.foreign_value "kCFStringTransformToUnicodeName" (ptr CFString.t) +let kCFStringTransformToXMLHex = Foreign.foreign_value "kCFStringTransformToXMLHex" (ptr CFString.t) +let kCFTimeZoneSystemTimeZoneDidChangeNotification = Foreign.foreign_value "kCFTimeZoneSystemTimeZoneDidChangeNotification" (ptr CFString.t) +let kCFTypeArrayCallBacks = Foreign.foreign_value "kCFTypeArrayCallBacks" CFArrayCallBacks.t +let kCFTypeBagCallBacks = Foreign.foreign_value "kCFTypeBagCallBacks" CFBagCallBacks.t +let kCFTypeDictionaryKeyCallBacks = Foreign.foreign_value "kCFTypeDictionaryKeyCallBacks" CFDictionaryKeyCallBacks.t +let kCFTypeDictionaryValueCallBacks = Foreign.foreign_value "kCFTypeDictionaryValueCallBacks" CFDictionaryValueCallBacks.t +let kCFTypeSetCallBacks = Foreign.foreign_value "kCFTypeSetCallBacks" CFSetCallBacks.t +let kCFURLAddedToDirectoryDateKey = Foreign.foreign_value "kCFURLAddedToDirectoryDateKey" (ptr CFString.t) +let kCFURLApplicationIsScriptableKey = Foreign.foreign_value "kCFURLApplicationIsScriptableKey" (ptr CFString.t) +let kCFURLAttributeModificationDateKey = Foreign.foreign_value "kCFURLAttributeModificationDateKey" (ptr CFString.t) +let kCFURLCanonicalPathKey = Foreign.foreign_value "kCFURLCanonicalPathKey" (ptr CFString.t) +let kCFURLContentAccessDateKey = Foreign.foreign_value "kCFURLContentAccessDateKey" (ptr CFString.t) +let kCFURLContentModificationDateKey = Foreign.foreign_value "kCFURLContentModificationDateKey" (ptr CFString.t) +let kCFURLCreationDateKey = Foreign.foreign_value "kCFURLCreationDateKey" (ptr CFString.t) +let kCFURLCustomIconKey = Foreign.foreign_value "kCFURLCustomIconKey" (ptr CFString.t) +let kCFURLDocumentIdentifierKey = Foreign.foreign_value "kCFURLDocumentIdentifierKey" (ptr CFString.t) +let kCFURLEffectiveIconKey = Foreign.foreign_value "kCFURLEffectiveIconKey" (ptr CFString.t) +let kCFURLFileAllocatedSizeKey = Foreign.foreign_value "kCFURLFileAllocatedSizeKey" (ptr CFString.t) +let kCFURLFileContentIdentifierKey = Foreign.foreign_value "kCFURLFileContentIdentifierKey" (ptr CFString.t) +let kCFURLFileDirectoryContents = Foreign.foreign_value "kCFURLFileDirectoryContents" (ptr CFString.t) +let kCFURLFileExists = Foreign.foreign_value "kCFURLFileExists" (ptr CFString.t) +let kCFURLFileLastModificationTime = Foreign.foreign_value "kCFURLFileLastModificationTime" (ptr CFString.t) +let kCFURLFileLength = Foreign.foreign_value "kCFURLFileLength" (ptr CFString.t) +let kCFURLFileOwnerID = Foreign.foreign_value "kCFURLFileOwnerID" (ptr CFString.t) +let kCFURLFilePOSIXMode = Foreign.foreign_value "kCFURLFilePOSIXMode" (ptr CFString.t) +let kCFURLFileProtectionComplete = Foreign.foreign_value "kCFURLFileProtectionComplete" (ptr CFString.t) +let kCFURLFileProtectionCompleteUnlessOpen = Foreign.foreign_value "kCFURLFileProtectionCompleteUnlessOpen" (ptr CFString.t) +let kCFURLFileProtectionCompleteUntilFirstUserAuthentication = Foreign.foreign_value "kCFURLFileProtectionCompleteUntilFirstUserAuthentication" (ptr CFString.t) +let kCFURLFileProtectionKey = Foreign.foreign_value "kCFURLFileProtectionKey" (ptr CFString.t) +let kCFURLFileProtectionNone = Foreign.foreign_value "kCFURLFileProtectionNone" (ptr CFString.t) +let kCFURLFileResourceIdentifierKey = Foreign.foreign_value "kCFURLFileResourceIdentifierKey" (ptr CFString.t) +let kCFURLFileResourceTypeBlockSpecial = Foreign.foreign_value "kCFURLFileResourceTypeBlockSpecial" (ptr CFString.t) +let kCFURLFileResourceTypeCharacterSpecial = Foreign.foreign_value "kCFURLFileResourceTypeCharacterSpecial" (ptr CFString.t) +let kCFURLFileResourceTypeDirectory = Foreign.foreign_value "kCFURLFileResourceTypeDirectory" (ptr CFString.t) +let kCFURLFileResourceTypeKey = Foreign.foreign_value "kCFURLFileResourceTypeKey" (ptr CFString.t) +let kCFURLFileResourceTypeNamedPipe = Foreign.foreign_value "kCFURLFileResourceTypeNamedPipe" (ptr CFString.t) +let kCFURLFileResourceTypeRegular = Foreign.foreign_value "kCFURLFileResourceTypeRegular" (ptr CFString.t) +let kCFURLFileResourceTypeSocket = Foreign.foreign_value "kCFURLFileResourceTypeSocket" (ptr CFString.t) +let kCFURLFileResourceTypeSymbolicLink = Foreign.foreign_value "kCFURLFileResourceTypeSymbolicLink" (ptr CFString.t) +let kCFURLFileResourceTypeUnknown = Foreign.foreign_value "kCFURLFileResourceTypeUnknown" (ptr CFString.t) +let kCFURLFileSecurityKey = Foreign.foreign_value "kCFURLFileSecurityKey" (ptr CFString.t) +let kCFURLFileSizeKey = Foreign.foreign_value "kCFURLFileSizeKey" (ptr CFString.t) +let kCFURLGenerationIdentifierKey = Foreign.foreign_value "kCFURLGenerationIdentifierKey" (ptr CFString.t) +let kCFURLHTTPStatusCode = Foreign.foreign_value "kCFURLHTTPStatusCode" (ptr CFString.t) +let kCFURLHTTPStatusLine = Foreign.foreign_value "kCFURLHTTPStatusLine" (ptr CFString.t) +let kCFURLHasHiddenExtensionKey = Foreign.foreign_value "kCFURLHasHiddenExtensionKey" (ptr CFString.t) +let kCFURLIsAliasFileKey = Foreign.foreign_value "kCFURLIsAliasFileKey" (ptr CFString.t) +let kCFURLIsApplicationKey = Foreign.foreign_value "kCFURLIsApplicationKey" (ptr CFString.t) +let kCFURLIsDirectoryKey = Foreign.foreign_value "kCFURLIsDirectoryKey" (ptr CFString.t) +let kCFURLIsExcludedFromBackupKey = Foreign.foreign_value "kCFURLIsExcludedFromBackupKey" (ptr CFString.t) +let kCFURLIsExecutableKey = Foreign.foreign_value "kCFURLIsExecutableKey" (ptr CFString.t) +let kCFURLIsHiddenKey = Foreign.foreign_value "kCFURLIsHiddenKey" (ptr CFString.t) +let kCFURLIsMountTriggerKey = Foreign.foreign_value "kCFURLIsMountTriggerKey" (ptr CFString.t) +let kCFURLIsPackageKey = Foreign.foreign_value "kCFURLIsPackageKey" (ptr CFString.t) +let kCFURLIsPurgeableKey = Foreign.foreign_value "kCFURLIsPurgeableKey" (ptr CFString.t) +let kCFURLIsReadableKey = Foreign.foreign_value "kCFURLIsReadableKey" (ptr CFString.t) +let kCFURLIsRegularFileKey = Foreign.foreign_value "kCFURLIsRegularFileKey" (ptr CFString.t) +let kCFURLIsSparseKey = Foreign.foreign_value "kCFURLIsSparseKey" (ptr CFString.t) +let kCFURLIsSymbolicLinkKey = Foreign.foreign_value "kCFURLIsSymbolicLinkKey" (ptr CFString.t) +let kCFURLIsSystemImmutableKey = Foreign.foreign_value "kCFURLIsSystemImmutableKey" (ptr CFString.t) +let kCFURLIsUbiquitousItemKey = Foreign.foreign_value "kCFURLIsUbiquitousItemKey" (ptr CFString.t) +let kCFURLIsUserImmutableKey = Foreign.foreign_value "kCFURLIsUserImmutableKey" (ptr CFString.t) +let kCFURLIsVolumeKey = Foreign.foreign_value "kCFURLIsVolumeKey" (ptr CFString.t) +let kCFURLIsWritableKey = Foreign.foreign_value "kCFURLIsWritableKey" (ptr CFString.t) +let kCFURLKeysOfUnsetValuesKey = Foreign.foreign_value "kCFURLKeysOfUnsetValuesKey" (ptr CFString.t) +let kCFURLLabelColorKey = Foreign.foreign_value "kCFURLLabelColorKey" (ptr CFString.t) +let kCFURLLabelNumberKey = Foreign.foreign_value "kCFURLLabelNumberKey" (ptr CFString.t) +let kCFURLLinkCountKey = Foreign.foreign_value "kCFURLLinkCountKey" (ptr CFString.t) +let kCFURLLocalizedLabelKey = Foreign.foreign_value "kCFURLLocalizedLabelKey" (ptr CFString.t) +let kCFURLLocalizedNameKey = Foreign.foreign_value "kCFURLLocalizedNameKey" (ptr CFString.t) +let kCFURLLocalizedTypeDescriptionKey = Foreign.foreign_value "kCFURLLocalizedTypeDescriptionKey" (ptr CFString.t) +let kCFURLMayHaveExtendedAttributesKey = Foreign.foreign_value "kCFURLMayHaveExtendedAttributesKey" (ptr CFString.t) +let kCFURLMayShareFileContentKey = Foreign.foreign_value "kCFURLMayShareFileContentKey" (ptr CFString.t) +let kCFURLNameKey = Foreign.foreign_value "kCFURLNameKey" (ptr CFString.t) +let kCFURLParentDirectoryURLKey = Foreign.foreign_value "kCFURLParentDirectoryURLKey" (ptr CFString.t) +let kCFURLPathKey = Foreign.foreign_value "kCFURLPathKey" (ptr CFString.t) +let kCFURLPreferredIOBlockSizeKey = Foreign.foreign_value "kCFURLPreferredIOBlockSizeKey" (ptr CFString.t) +let kCFURLQuarantinePropertiesKey = Foreign.foreign_value "kCFURLQuarantinePropertiesKey" (ptr CFString.t) +let kCFURLTagNamesKey = Foreign.foreign_value "kCFURLTagNamesKey" (ptr CFString.t) +let kCFURLTotalFileAllocatedSizeKey = Foreign.foreign_value "kCFURLTotalFileAllocatedSizeKey" (ptr CFString.t) +let kCFURLTotalFileSizeKey = Foreign.foreign_value "kCFURLTotalFileSizeKey" (ptr CFString.t) +let kCFURLTypeIdentifierKey = Foreign.foreign_value "kCFURLTypeIdentifierKey" (ptr CFString.t) +let kCFURLUbiquitousItemDownloadingErrorKey = Foreign.foreign_value "kCFURLUbiquitousItemDownloadingErrorKey" (ptr CFString.t) +let kCFURLUbiquitousItemDownloadingStatusCurrent = Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusCurrent" (ptr CFString.t) +let kCFURLUbiquitousItemDownloadingStatusDownloaded = Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusDownloaded" (ptr CFString.t) +let kCFURLUbiquitousItemDownloadingStatusKey = Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusKey" (ptr CFString.t) +let kCFURLUbiquitousItemDownloadingStatusNotDownloaded = Foreign.foreign_value "kCFURLUbiquitousItemDownloadingStatusNotDownloaded" (ptr CFString.t) +let kCFURLUbiquitousItemHasUnresolvedConflictsKey = Foreign.foreign_value "kCFURLUbiquitousItemHasUnresolvedConflictsKey" (ptr CFString.t) +let kCFURLUbiquitousItemIsDownloadedKey = Foreign.foreign_value "kCFURLUbiquitousItemIsDownloadedKey" (ptr CFString.t) +let kCFURLUbiquitousItemIsDownloadingKey = Foreign.foreign_value "kCFURLUbiquitousItemIsDownloadingKey" (ptr CFString.t) +let kCFURLUbiquitousItemIsExcludedFromSyncKey = Foreign.foreign_value "kCFURLUbiquitousItemIsExcludedFromSyncKey" (ptr CFString.t) +let kCFURLUbiquitousItemIsUploadedKey = Foreign.foreign_value "kCFURLUbiquitousItemIsUploadedKey" (ptr CFString.t) +let kCFURLUbiquitousItemIsUploadingKey = Foreign.foreign_value "kCFURLUbiquitousItemIsUploadingKey" (ptr CFString.t) +let kCFURLUbiquitousItemPercentDownloadedKey = Foreign.foreign_value "kCFURLUbiquitousItemPercentDownloadedKey" (ptr CFString.t) +let kCFURLUbiquitousItemPercentUploadedKey = Foreign.foreign_value "kCFURLUbiquitousItemPercentUploadedKey" (ptr CFString.t) +let kCFURLUbiquitousItemUploadingErrorKey = Foreign.foreign_value "kCFURLUbiquitousItemUploadingErrorKey" (ptr CFString.t) +let kCFURLVolumeAvailableCapacityForImportantUsageKey = Foreign.foreign_value "kCFURLVolumeAvailableCapacityForImportantUsageKey" (ptr CFString.t) +let kCFURLVolumeAvailableCapacityForOpportunisticUsageKey = Foreign.foreign_value "kCFURLVolumeAvailableCapacityForOpportunisticUsageKey" (ptr CFString.t) +let kCFURLVolumeAvailableCapacityKey = Foreign.foreign_value "kCFURLVolumeAvailableCapacityKey" (ptr CFString.t) +let kCFURLVolumeCreationDateKey = Foreign.foreign_value "kCFURLVolumeCreationDateKey" (ptr CFString.t) +let kCFURLVolumeIdentifierKey = Foreign.foreign_value "kCFURLVolumeIdentifierKey" (ptr CFString.t) +let kCFURLVolumeIsAutomountedKey = Foreign.foreign_value "kCFURLVolumeIsAutomountedKey" (ptr CFString.t) +let kCFURLVolumeIsBrowsableKey = Foreign.foreign_value "kCFURLVolumeIsBrowsableKey" (ptr CFString.t) +let kCFURLVolumeIsEjectableKey = Foreign.foreign_value "kCFURLVolumeIsEjectableKey" (ptr CFString.t) +let kCFURLVolumeIsEncryptedKey = Foreign.foreign_value "kCFURLVolumeIsEncryptedKey" (ptr CFString.t) +let kCFURLVolumeIsInternalKey = Foreign.foreign_value "kCFURLVolumeIsInternalKey" (ptr CFString.t) +let kCFURLVolumeIsJournalingKey = Foreign.foreign_value "kCFURLVolumeIsJournalingKey" (ptr CFString.t) +let kCFURLVolumeIsLocalKey = Foreign.foreign_value "kCFURLVolumeIsLocalKey" (ptr CFString.t) +let kCFURLVolumeIsReadOnlyKey = Foreign.foreign_value "kCFURLVolumeIsReadOnlyKey" (ptr CFString.t) +let kCFURLVolumeIsRemovableKey = Foreign.foreign_value "kCFURLVolumeIsRemovableKey" (ptr CFString.t) +let kCFURLVolumeIsRootFileSystemKey = Foreign.foreign_value "kCFURLVolumeIsRootFileSystemKey" (ptr CFString.t) +let kCFURLVolumeLocalizedFormatDescriptionKey = Foreign.foreign_value "kCFURLVolumeLocalizedFormatDescriptionKey" (ptr CFString.t) +let kCFURLVolumeLocalizedNameKey = Foreign.foreign_value "kCFURLVolumeLocalizedNameKey" (ptr CFString.t) +let kCFURLVolumeMaximumFileSizeKey = Foreign.foreign_value "kCFURLVolumeMaximumFileSizeKey" (ptr CFString.t) +let kCFURLVolumeNameKey = Foreign.foreign_value "kCFURLVolumeNameKey" (ptr CFString.t) +let kCFURLVolumeResourceCountKey = Foreign.foreign_value "kCFURLVolumeResourceCountKey" (ptr CFString.t) +let kCFURLVolumeSupportsAccessPermissionsKey = Foreign.foreign_value "kCFURLVolumeSupportsAccessPermissionsKey" (ptr CFString.t) +let kCFURLVolumeSupportsAdvisoryFileLockingKey = Foreign.foreign_value "kCFURLVolumeSupportsAdvisoryFileLockingKey" (ptr CFString.t) +let kCFURLVolumeSupportsCasePreservedNamesKey = Foreign.foreign_value "kCFURLVolumeSupportsCasePreservedNamesKey" (ptr CFString.t) +let kCFURLVolumeSupportsCaseSensitiveNamesKey = Foreign.foreign_value "kCFURLVolumeSupportsCaseSensitiveNamesKey" (ptr CFString.t) +let kCFURLVolumeSupportsCompressionKey = Foreign.foreign_value "kCFURLVolumeSupportsCompressionKey" (ptr CFString.t) +let kCFURLVolumeSupportsExclusiveRenamingKey = Foreign.foreign_value "kCFURLVolumeSupportsExclusiveRenamingKey" (ptr CFString.t) +let kCFURLVolumeSupportsExtendedSecurityKey = Foreign.foreign_value "kCFURLVolumeSupportsExtendedSecurityKey" (ptr CFString.t) +let kCFURLVolumeSupportsFileCloningKey = Foreign.foreign_value "kCFURLVolumeSupportsFileCloningKey" (ptr CFString.t) +let kCFURLVolumeSupportsFileProtectionKey = Foreign.foreign_value "kCFURLVolumeSupportsFileProtectionKey" (ptr CFString.t) +let kCFURLVolumeSupportsHardLinksKey = Foreign.foreign_value "kCFURLVolumeSupportsHardLinksKey" (ptr CFString.t) +let kCFURLVolumeSupportsImmutableFilesKey = Foreign.foreign_value "kCFURLVolumeSupportsImmutableFilesKey" (ptr CFString.t) +let kCFURLVolumeSupportsJournalingKey = Foreign.foreign_value "kCFURLVolumeSupportsJournalingKey" (ptr CFString.t) +let kCFURLVolumeSupportsPersistentIDsKey = Foreign.foreign_value "kCFURLVolumeSupportsPersistentIDsKey" (ptr CFString.t) +let kCFURLVolumeSupportsRenamingKey = Foreign.foreign_value "kCFURLVolumeSupportsRenamingKey" (ptr CFString.t) +let kCFURLVolumeSupportsRootDirectoryDatesKey = Foreign.foreign_value "kCFURLVolumeSupportsRootDirectoryDatesKey" (ptr CFString.t) +let kCFURLVolumeSupportsSparseFilesKey = Foreign.foreign_value "kCFURLVolumeSupportsSparseFilesKey" (ptr CFString.t) +let kCFURLVolumeSupportsSwapRenamingKey = Foreign.foreign_value "kCFURLVolumeSupportsSwapRenamingKey" (ptr CFString.t) +let kCFURLVolumeSupportsSymbolicLinksKey = Foreign.foreign_value "kCFURLVolumeSupportsSymbolicLinksKey" (ptr CFString.t) +let kCFURLVolumeSupportsVolumeSizesKey = Foreign.foreign_value "kCFURLVolumeSupportsVolumeSizesKey" (ptr CFString.t) +let kCFURLVolumeSupportsZeroRunsKey = Foreign.foreign_value "kCFURLVolumeSupportsZeroRunsKey" (ptr CFString.t) +let kCFURLVolumeTotalCapacityKey = Foreign.foreign_value "kCFURLVolumeTotalCapacityKey" (ptr CFString.t) +let kCFURLVolumeURLForRemountingKey = Foreign.foreign_value "kCFURLVolumeURLForRemountingKey" (ptr CFString.t) +let kCFURLVolumeURLKey = Foreign.foreign_value "kCFURLVolumeURLKey" (ptr CFString.t) +let kCFURLVolumeUUIDStringKey = Foreign.foreign_value "kCFURLVolumeUUIDStringKey" (ptr CFString.t) +let kCFUserNotificationAlertHeaderKey = Foreign.foreign_value "kCFUserNotificationAlertHeaderKey" (ptr CFString.t) +let kCFUserNotificationAlertMessageKey = Foreign.foreign_value "kCFUserNotificationAlertMessageKey" (ptr CFString.t) +let kCFUserNotificationAlertTopMostKey = Foreign.foreign_value "kCFUserNotificationAlertTopMostKey" (ptr CFString.t) +let kCFUserNotificationAlternateButtonTitleKey = Foreign.foreign_value "kCFUserNotificationAlternateButtonTitleKey" (ptr CFString.t) +let kCFUserNotificationCheckBoxTitlesKey = Foreign.foreign_value "kCFUserNotificationCheckBoxTitlesKey" (ptr CFString.t) +let kCFUserNotificationDefaultButtonTitleKey = Foreign.foreign_value "kCFUserNotificationDefaultButtonTitleKey" (ptr CFString.t) +let kCFUserNotificationIconURLKey = Foreign.foreign_value "kCFUserNotificationIconURLKey" (ptr CFString.t) +let kCFUserNotificationKeyboardTypesKey = Foreign.foreign_value "kCFUserNotificationKeyboardTypesKey" (ptr CFString.t) +let kCFUserNotificationLocalizationURLKey = Foreign.foreign_value "kCFUserNotificationLocalizationURLKey" (ptr CFString.t) +let kCFUserNotificationOtherButtonTitleKey = Foreign.foreign_value "kCFUserNotificationOtherButtonTitleKey" (ptr CFString.t) +let kCFUserNotificationPopUpSelectionKey = Foreign.foreign_value "kCFUserNotificationPopUpSelectionKey" (ptr CFString.t) +let kCFUserNotificationPopUpTitlesKey = Foreign.foreign_value "kCFUserNotificationPopUpTitlesKey" (ptr CFString.t) +let kCFUserNotificationProgressIndicatorValueKey = Foreign.foreign_value "kCFUserNotificationProgressIndicatorValueKey" (ptr CFString.t) +let kCFUserNotificationSoundURLKey = Foreign.foreign_value "kCFUserNotificationSoundURLKey" (ptr CFString.t) +let kCFUserNotificationTextFieldTitlesKey = Foreign.foreign_value "kCFUserNotificationTextFieldTitlesKey" (ptr CFString.t) +let kCFUserNotificationTextFieldValuesKey = Foreign.foreign_value "kCFUserNotificationTextFieldValuesKey" (ptr CFString.t) +let kCFXMLTreeErrorDescription = Foreign.foreign_value "kCFXMLTreeErrorDescription" (ptr CFString.t) +let kCFXMLTreeErrorLineNumber = Foreign.foreign_value "kCFXMLTreeErrorLineNumber" (ptr CFString.t) +let kCFXMLTreeErrorLocation = Foreign.foreign_value "kCFXMLTreeErrorLocation" (ptr CFString.t) +let kCFXMLTreeErrorStatusCode = Foreign.foreign_value "kCFXMLTreeErrorStatusCode" (ptr CFString.t) let _CFByteOrderBigEndian = 2 let _CFByteOrderLittleEndian = 1 let _CFByteOrderUnknown = 0 diff --git a/CoreGraphics/CoreGraphics_fn.ml b/CoreGraphics/CoreGraphics_fn.ml index dc5d7e279..57bcb0913 100644 --- a/CoreGraphics/CoreGraphics_fn.ml +++ b/CoreGraphics/CoreGraphics_fn.ml @@ -1,689 +1,689 @@ (* auto-generated, do not modify *) +[@@@ocaml.warning "-33"] open Runtime open Objc -[@@@ocaml.warning "-33"] open CoreFoundation open CoreGraphics_globals -let _CGAcquireDisplayFadeReservation = Foreign.foreign "CGAcquireDisplayFadeReservation" (float @-> (ptr uint) @-> returning int) -let _CGAffineTransformConcat = Foreign.foreign "CGAffineTransformConcat" (CGAffineTransform.t @-> CGAffineTransform.t @-> returning CGAffineTransform.t) -let _CGAffineTransformEqualToTransform = Foreign.foreign "CGAffineTransformEqualToTransform" (CGAffineTransform.t @-> CGAffineTransform.t @-> returning bool) -let _CGAffineTransformInvert = Foreign.foreign "CGAffineTransformInvert" (CGAffineTransform.t @-> returning CGAffineTransform.t) -let _CGAffineTransformIsIdentity = Foreign.foreign "CGAffineTransformIsIdentity" (CGAffineTransform.t @-> returning bool) -let _CGAffineTransformMake = Foreign.foreign "CGAffineTransformMake" (double @-> double @-> double @-> double @-> double @-> double @-> returning CGAffineTransform.t) -let _CGAffineTransformMakeRotation = Foreign.foreign "CGAffineTransformMakeRotation" (double @-> returning CGAffineTransform.t) -let _CGAffineTransformMakeScale = Foreign.foreign "CGAffineTransformMakeScale" (double @-> double @-> returning CGAffineTransform.t) -let _CGAffineTransformMakeTranslation = Foreign.foreign "CGAffineTransformMakeTranslation" (double @-> double @-> returning CGAffineTransform.t) -let _CGAffineTransformRotate = Foreign.foreign "CGAffineTransformRotate" (CGAffineTransform.t @-> double @-> returning CGAffineTransform.t) -let _CGAffineTransformScale = Foreign.foreign "CGAffineTransformScale" (CGAffineTransform.t @-> double @-> double @-> returning CGAffineTransform.t) -let _CGAffineTransformTranslate = Foreign.foreign "CGAffineTransformTranslate" (CGAffineTransform.t @-> double @-> double @-> returning CGAffineTransform.t) -let _CGAssociateMouseAndMouseCursorPosition = Foreign.foreign "CGAssociateMouseAndMouseCursorPosition" (uint @-> returning int) -let _CGBeginDisplayConfiguration = Foreign.foreign "CGBeginDisplayConfiguration" ((ptr (ptr CGDisplayConfigRef.t)) @-> returning int) -let _CGBitmapContextCreate = Foreign.foreign "CGBitmapContextCreate" ((ptr void) @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGColorSpace.t) @-> uint @-> returning (ptr CGContext.t)) -let _CGBitmapContextCreateImage = Foreign.foreign "CGBitmapContextCreateImage" ((ptr CGContext.t) @-> returning (ptr CGImage.t)) -let _CGBitmapContextCreateWithData = Foreign.foreign "CGBitmapContextCreateWithData" ((ptr void) @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGColorSpace.t) @-> uint @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning (ptr CGContext.t)) -let _CGBitmapContextGetAlphaInfo = Foreign.foreign "CGBitmapContextGetAlphaInfo" ((ptr CGContext.t) @-> returning uint) -let _CGBitmapContextGetBitmapInfo = Foreign.foreign "CGBitmapContextGetBitmapInfo" ((ptr CGContext.t) @-> returning uint) -let _CGBitmapContextGetBitsPerComponent = Foreign.foreign "CGBitmapContextGetBitsPerComponent" ((ptr CGContext.t) @-> returning ullong) -let _CGBitmapContextGetBitsPerPixel = Foreign.foreign "CGBitmapContextGetBitsPerPixel" ((ptr CGContext.t) @-> returning ullong) -let _CGBitmapContextGetBytesPerRow = Foreign.foreign "CGBitmapContextGetBytesPerRow" ((ptr CGContext.t) @-> returning ullong) -let _CGBitmapContextGetColorSpace = Foreign.foreign "CGBitmapContextGetColorSpace" ((ptr CGContext.t) @-> returning (ptr CGColorSpace.t)) -let _CGBitmapContextGetData = Foreign.foreign "CGBitmapContextGetData" ((ptr CGContext.t) @-> returning (ptr void)) -let _CGBitmapContextGetHeight = Foreign.foreign "CGBitmapContextGetHeight" ((ptr CGContext.t) @-> returning ullong) -let _CGBitmapContextGetWidth = Foreign.foreign "CGBitmapContextGetWidth" ((ptr CGContext.t) @-> returning ullong) -let _CGCancelDisplayConfiguration = Foreign.foreign "CGCancelDisplayConfiguration" ((ptr CGDisplayConfigRef.t) @-> returning int) -let _CGCaptureAllDisplays = Foreign.foreign "CGCaptureAllDisplays" (void @-> returning int) -let _CGCaptureAllDisplaysWithOptions = Foreign.foreign "CGCaptureAllDisplaysWithOptions" (uint @-> returning int) -let _CGColorConversionInfoCreate = Foreign.foreign "CGColorConversionInfoCreate" ((ptr CGColorSpace.t) @-> (ptr CGColorSpace.t) @-> returning (ptr CGColorConversionInfo.t)) -let _CGColorConversionInfoCreateFromList = Foreign.foreign "CGColorConversionInfoCreateFromList" ((ptr CFDictionary.t) @-> (ptr CGColorSpace.t) @-> uint @-> int @-> returning (ptr CGColorConversionInfo.t)) -let _CGColorConversionInfoCreateFromListWithArguments = Foreign.foreign "CGColorConversionInfoCreateFromListWithArguments" ((ptr CFDictionary.t) @-> (ptr CGColorSpace.t) @-> uint @-> int @-> (ptr void) @-> returning (ptr CGColorConversionInfo.t)) -let _CGColorConversionInfoCreateWithOptions = Foreign.foreign "CGColorConversionInfoCreateWithOptions" ((ptr CGColorSpace.t) @-> (ptr CGColorSpace.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGColorConversionInfo.t)) -let _CGColorConversionInfoGetTypeID = Foreign.foreign "CGColorConversionInfoGetTypeID" (void @-> returning ullong) -let _CGColorCreate = Foreign.foreign "CGColorCreate" ((ptr CGColorSpace.t) @-> (ptr double) @-> returning (ptr CGColor.t)) -let _CGColorCreateCopy = Foreign.foreign "CGColorCreateCopy" ((ptr CGColor.t) @-> returning (ptr CGColor.t)) -let _CGColorCreateCopyByMatchingToColorSpace = Foreign.foreign "CGColorCreateCopyByMatchingToColorSpace" ((ptr CGColorSpace.t) @-> int @-> (ptr CGColor.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGColor.t)) -let _CGColorCreateCopyWithAlpha = Foreign.foreign "CGColorCreateCopyWithAlpha" ((ptr CGColor.t) @-> double @-> returning (ptr CGColor.t)) -let _CGColorCreateGenericCMYK = Foreign.foreign "CGColorCreateGenericCMYK" (double @-> double @-> double @-> double @-> double @-> returning (ptr CGColor.t)) -let _CGColorCreateGenericGray = Foreign.foreign "CGColorCreateGenericGray" (double @-> double @-> returning (ptr CGColor.t)) -let _CGColorCreateGenericGrayGamma2_2 = Foreign.foreign "CGColorCreateGenericGrayGamma2_2" (double @-> double @-> returning (ptr CGColor.t)) -let _CGColorCreateGenericRGB = Foreign.foreign "CGColorCreateGenericRGB" (double @-> double @-> double @-> double @-> returning (ptr CGColor.t)) -let _CGColorCreateSRGB = Foreign.foreign "CGColorCreateSRGB" (double @-> double @-> double @-> double @-> returning (ptr CGColor.t)) -let _CGColorCreateWithPattern = Foreign.foreign "CGColorCreateWithPattern" ((ptr CGColorSpace.t) @-> (ptr CGPattern.t) @-> (ptr double) @-> returning (ptr CGColor.t)) -let _CGColorEqualToColor = Foreign.foreign "CGColorEqualToColor" ((ptr CGColor.t) @-> (ptr CGColor.t) @-> returning bool) -let _CGColorGetAlpha = Foreign.foreign "CGColorGetAlpha" ((ptr CGColor.t) @-> returning double) -let _CGColorGetColorSpace = Foreign.foreign "CGColorGetColorSpace" ((ptr CGColor.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorGetComponents = Foreign.foreign "CGColorGetComponents" ((ptr CGColor.t) @-> returning (ptr double)) -let _CGColorGetConstantColor = Foreign.foreign "CGColorGetConstantColor" ((ptr CFString.t) @-> returning (ptr CGColor.t)) -let _CGColorGetNumberOfComponents = Foreign.foreign "CGColorGetNumberOfComponents" ((ptr CGColor.t) @-> returning ullong) -let _CGColorGetPattern = Foreign.foreign "CGColorGetPattern" ((ptr CGColor.t) @-> returning (ptr CGPattern.t)) -let _CGColorGetTypeID = Foreign.foreign "CGColorGetTypeID" (void @-> returning ullong) -let _CGColorRelease = Foreign.foreign "CGColorRelease" ((ptr CGColor.t) @-> returning void) -let _CGColorRetain = Foreign.foreign "CGColorRetain" ((ptr CGColor.t) @-> returning (ptr CGColor.t)) -let _CGColorSpaceCopyICCData = Foreign.foreign "CGColorSpaceCopyICCData" ((ptr CGColorSpace.t) @-> returning (ptr CFData.t)) -let _CGColorSpaceCopyICCProfile = Foreign.foreign "CGColorSpaceCopyICCProfile" ((ptr CGColorSpace.t) @-> returning (ptr CFData.t)) -let _CGColorSpaceCopyName = Foreign.foreign "CGColorSpaceCopyName" ((ptr CGColorSpace.t) @-> returning (ptr CFString.t)) -let _CGColorSpaceCopyPropertyList = Foreign.foreign "CGColorSpaceCopyPropertyList" ((ptr CGColorSpace.t) @-> returning (ptr void)) -let _CGColorSpaceCreateCalibratedGray = Foreign.foreign "CGColorSpaceCreateCalibratedGray" ((ptr double) @-> (ptr double) @-> double @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateCalibratedRGB = Foreign.foreign "CGColorSpaceCreateCalibratedRGB" ((ptr double) @-> (ptr double) @-> (ptr double) @-> (ptr double) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateDeviceCMYK = Foreign.foreign "CGColorSpaceCreateDeviceCMYK" (void @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateDeviceGray = Foreign.foreign "CGColorSpaceCreateDeviceGray" (void @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateDeviceRGB = Foreign.foreign "CGColorSpaceCreateDeviceRGB" (void @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateExtended = Foreign.foreign "CGColorSpaceCreateExtended" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateExtendedLinearized = Foreign.foreign "CGColorSpaceCreateExtendedLinearized" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateICCBased = Foreign.foreign "CGColorSpaceCreateICCBased" (ullong @-> (ptr double) @-> (ptr CGDataProvider.t) @-> (ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateIndexed = Foreign.foreign "CGColorSpaceCreateIndexed" ((ptr CGColorSpace.t) @-> ullong @-> string @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateLab = Foreign.foreign "CGColorSpaceCreateLab" ((ptr double) @-> (ptr double) @-> (ptr double) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateLinearized = Foreign.foreign "CGColorSpaceCreateLinearized" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreatePattern = Foreign.foreign "CGColorSpaceCreatePattern" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateWithColorSyncProfile = Foreign.foreign "CGColorSpaceCreateWithColorSyncProfile" ((ptr ColorSyncProfile.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateWithICCData = Foreign.foreign "CGColorSpaceCreateWithICCData" (id @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateWithICCProfile = Foreign.foreign "CGColorSpaceCreateWithICCProfile" ((ptr CFData.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateWithName = Foreign.foreign "CGColorSpaceCreateWithName" ((ptr CFString.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateWithPlatformColorSpace = Foreign.foreign "CGColorSpaceCreateWithPlatformColorSpace" (int @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceCreateWithPropertyList = Foreign.foreign "CGColorSpaceCreateWithPropertyList" ((ptr void) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceGetBaseColorSpace = Foreign.foreign "CGColorSpaceGetBaseColorSpace" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceGetColorTable = Foreign.foreign "CGColorSpaceGetColorTable" ((ptr CGColorSpace.t) @-> string @-> returning void) -let _CGColorSpaceGetColorTableCount = Foreign.foreign "CGColorSpaceGetColorTableCount" ((ptr CGColorSpace.t) @-> returning ullong) -let _CGColorSpaceGetModel = Foreign.foreign "CGColorSpaceGetModel" ((ptr CGColorSpace.t) @-> returning int) -let _CGColorSpaceGetName = Foreign.foreign "CGColorSpaceGetName" ((ptr CGColorSpace.t) @-> returning (ptr CFString.t)) -let _CGColorSpaceGetNumberOfComponents = Foreign.foreign "CGColorSpaceGetNumberOfComponents" ((ptr CGColorSpace.t) @-> returning ullong) -let _CGColorSpaceGetTypeID = Foreign.foreign "CGColorSpaceGetTypeID" (void @-> returning ullong) -let _CGColorSpaceIsHDR = Foreign.foreign "CGColorSpaceIsHDR" ((ptr CGColorSpace.t) @-> returning bool) -let _CGColorSpaceIsHLGBased = Foreign.foreign "CGColorSpaceIsHLGBased" ((ptr CGColorSpace.t) @-> returning bool) -let _CGColorSpaceIsPQBased = Foreign.foreign "CGColorSpaceIsPQBased" ((ptr CGColorSpace.t) @-> returning bool) -let _CGColorSpaceIsWideGamutRGB = Foreign.foreign "CGColorSpaceIsWideGamutRGB" ((ptr CGColorSpace.t) @-> returning bool) -let _CGColorSpaceRelease = Foreign.foreign "CGColorSpaceRelease" ((ptr CGColorSpace.t) @-> returning void) -let _CGColorSpaceRetain = Foreign.foreign "CGColorSpaceRetain" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) -let _CGColorSpaceSupportsOutput = Foreign.foreign "CGColorSpaceSupportsOutput" ((ptr CGColorSpace.t) @-> returning bool) -let _CGColorSpaceUsesExtendedRange = Foreign.foreign "CGColorSpaceUsesExtendedRange" ((ptr CGColorSpace.t) @-> returning bool) -let _CGColorSpaceUsesITUR_2100TF = Foreign.foreign "CGColorSpaceUsesITUR_2100TF" ((ptr CGColorSpace.t) @-> returning bool) -let _CGCompleteDisplayConfiguration = Foreign.foreign "CGCompleteDisplayConfiguration" ((ptr CGDisplayConfigRef.t) @-> uint @-> returning int) -let _CGConfigureDisplayFadeEffect = Foreign.foreign "CGConfigureDisplayFadeEffect" ((ptr CGDisplayConfigRef.t) @-> float @-> float @-> float @-> float @-> float @-> returning int) -let _CGConfigureDisplayMirrorOfDisplay = Foreign.foreign "CGConfigureDisplayMirrorOfDisplay" ((ptr CGDisplayConfigRef.t) @-> uint @-> uint @-> returning int) -let _CGConfigureDisplayMode = Foreign.foreign "CGConfigureDisplayMode" ((ptr CGDisplayConfigRef.t) @-> uint @-> (ptr CFDictionary.t) @-> returning int) -let _CGConfigureDisplayOrigin = Foreign.foreign "CGConfigureDisplayOrigin" ((ptr CGDisplayConfigRef.t) @-> uint @-> int @-> int @-> returning int) -let _CGConfigureDisplayStereoOperation = Foreign.foreign "CGConfigureDisplayStereoOperation" ((ptr CGDisplayConfigRef.t) @-> uint @-> uint @-> uint @-> returning int) -let _CGConfigureDisplayWithDisplayMode = Foreign.foreign "CGConfigureDisplayWithDisplayMode" ((ptr CGDisplayConfigRef.t) @-> uint @-> (ptr CGDisplayMode.t) @-> (ptr CFDictionary.t) @-> returning int) -let _CGContextAddArc = Foreign.foreign "CGContextAddArc" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> int @-> returning void) -let _CGContextAddArcToPoint = Foreign.foreign "CGContextAddArcToPoint" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) -let _CGContextAddCurveToPoint = Foreign.foreign "CGContextAddCurveToPoint" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> double @-> returning void) -let _CGContextAddEllipseInRect = Foreign.foreign "CGContextAddEllipseInRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextAddLineToPoint = Foreign.foreign "CGContextAddLineToPoint" ((ptr CGContext.t) @-> double @-> double @-> returning void) -let _CGContextAddLines = Foreign.foreign "CGContextAddLines" ((ptr CGContext.t) @-> (ptr CGPoint.t) @-> ullong @-> returning void) -let _CGContextAddPath = Foreign.foreign "CGContextAddPath" ((ptr CGContext.t) @-> (ptr CGPath.t) @-> returning void) -let _CGContextAddQuadCurveToPoint = Foreign.foreign "CGContextAddQuadCurveToPoint" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> returning void) -let _CGContextAddRect = Foreign.foreign "CGContextAddRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextAddRects = Foreign.foreign "CGContextAddRects" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) -let _CGContextBeginPage = Foreign.foreign "CGContextBeginPage" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> returning void) -let _CGContextBeginPath = Foreign.foreign "CGContextBeginPath" ((ptr CGContext.t) @-> returning void) -let _CGContextBeginTransparencyLayer = Foreign.foreign "CGContextBeginTransparencyLayer" ((ptr CGContext.t) @-> (ptr CFDictionary.t) @-> returning void) -let _CGContextBeginTransparencyLayerWithRect = Foreign.foreign "CGContextBeginTransparencyLayerWithRect" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CFDictionary.t) @-> returning void) -let _CGContextClearRect = Foreign.foreign "CGContextClearRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextClip = Foreign.foreign "CGContextClip" ((ptr CGContext.t) @-> returning void) -let _CGContextClipToMask = Foreign.foreign "CGContextClipToMask" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGImage.t) @-> returning void) -let _CGContextClipToRect = Foreign.foreign "CGContextClipToRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextClipToRects = Foreign.foreign "CGContextClipToRects" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) -let _CGContextClosePath = Foreign.foreign "CGContextClosePath" ((ptr CGContext.t) @-> returning void) -let _CGContextConcatCTM = Foreign.foreign "CGContextConcatCTM" ((ptr CGContext.t) @-> CGAffineTransform.t @-> returning void) -let _CGContextConvertPointToDeviceSpace = Foreign.foreign "CGContextConvertPointToDeviceSpace" ((ptr CGContext.t) @-> CGPoint.t @-> returning CGPoint.t) -let _CGContextConvertPointToUserSpace = Foreign.foreign "CGContextConvertPointToUserSpace" ((ptr CGContext.t) @-> CGPoint.t @-> returning CGPoint.t) -let _CGContextConvertRectToDeviceSpace = Foreign.foreign "CGContextConvertRectToDeviceSpace" ((ptr CGContext.t) @-> CGRect.t @-> returning CGRect.t) -let _CGContextConvertRectToUserSpace = Foreign.foreign "CGContextConvertRectToUserSpace" ((ptr CGContext.t) @-> CGRect.t @-> returning CGRect.t) -let _CGContextConvertSizeToDeviceSpace = Foreign.foreign "CGContextConvertSizeToDeviceSpace" ((ptr CGContext.t) @-> CGSize.t @-> returning CGSize.t) -let _CGContextConvertSizeToUserSpace = Foreign.foreign "CGContextConvertSizeToUserSpace" ((ptr CGContext.t) @-> CGSize.t @-> returning CGSize.t) -let _CGContextCopyPath = Foreign.foreign "CGContextCopyPath" ((ptr CGContext.t) @-> returning (ptr CGPath.t)) -let _CGContextDrawImage = Foreign.foreign "CGContextDrawImage" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGImage.t) @-> returning void) -let _CGContextDrawLayerAtPoint = Foreign.foreign "CGContextDrawLayerAtPoint" ((ptr CGContext.t) @-> CGPoint.t @-> (ptr CGLayer.t) @-> returning void) -let _CGContextDrawLayerInRect = Foreign.foreign "CGContextDrawLayerInRect" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGLayer.t) @-> returning void) -let _CGContextDrawLinearGradient = Foreign.foreign "CGContextDrawLinearGradient" ((ptr CGContext.t) @-> (ptr CGGradient.t) @-> CGPoint.t @-> CGPoint.t @-> uint @-> returning void) -let _CGContextDrawPDFDocument = Foreign.foreign "CGContextDrawPDFDocument" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGPDFDocument.t) @-> int @-> returning void) -let _CGContextDrawPDFPage = Foreign.foreign "CGContextDrawPDFPage" ((ptr CGContext.t) @-> (ptr CGPDFPage.t) @-> returning void) -let _CGContextDrawPath = Foreign.foreign "CGContextDrawPath" ((ptr CGContext.t) @-> int @-> returning void) -let _CGContextDrawRadialGradient = Foreign.foreign "CGContextDrawRadialGradient" ((ptr CGContext.t) @-> (ptr CGGradient.t) @-> CGPoint.t @-> double @-> CGPoint.t @-> double @-> uint @-> returning void) -let _CGContextDrawShading = Foreign.foreign "CGContextDrawShading" ((ptr CGContext.t) @-> (ptr CGShading.t) @-> returning void) -let _CGContextDrawTiledImage = Foreign.foreign "CGContextDrawTiledImage" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGImage.t) @-> returning void) -let _CGContextEOClip = Foreign.foreign "CGContextEOClip" ((ptr CGContext.t) @-> returning void) -let _CGContextEOFillPath = Foreign.foreign "CGContextEOFillPath" ((ptr CGContext.t) @-> returning void) -let _CGContextEndPage = Foreign.foreign "CGContextEndPage" ((ptr CGContext.t) @-> returning void) -let _CGContextEndTransparencyLayer = Foreign.foreign "CGContextEndTransparencyLayer" ((ptr CGContext.t) @-> returning void) -let _CGContextFillEllipseInRect = Foreign.foreign "CGContextFillEllipseInRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextFillPath = Foreign.foreign "CGContextFillPath" ((ptr CGContext.t) @-> returning void) -let _CGContextFillRect = Foreign.foreign "CGContextFillRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextFillRects = Foreign.foreign "CGContextFillRects" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) -let _CGContextFlush = Foreign.foreign "CGContextFlush" ((ptr CGContext.t) @-> returning void) -let _CGContextGetCTM = Foreign.foreign "CGContextGetCTM" ((ptr CGContext.t) @-> returning CGAffineTransform.t) -let _CGContextGetClipBoundingBox = Foreign.foreign "CGContextGetClipBoundingBox" ((ptr CGContext.t) @-> returning CGRect.t) -let _CGContextGetInterpolationQuality = Foreign.foreign "CGContextGetInterpolationQuality" ((ptr CGContext.t) @-> returning int) -let _CGContextGetPathBoundingBox = Foreign.foreign "CGContextGetPathBoundingBox" ((ptr CGContext.t) @-> returning CGRect.t) -let _CGContextGetPathCurrentPoint = Foreign.foreign "CGContextGetPathCurrentPoint" ((ptr CGContext.t) @-> returning CGPoint.t) -let _CGContextGetTextMatrix = Foreign.foreign "CGContextGetTextMatrix" ((ptr CGContext.t) @-> returning CGAffineTransform.t) -let _CGContextGetTextPosition = Foreign.foreign "CGContextGetTextPosition" ((ptr CGContext.t) @-> returning CGPoint.t) -let _CGContextGetTypeID = Foreign.foreign "CGContextGetTypeID" (void @-> returning ullong) -let _CGContextGetUserSpaceToDeviceSpaceTransform = Foreign.foreign "CGContextGetUserSpaceToDeviceSpaceTransform" ((ptr CGContext.t) @-> returning CGAffineTransform.t) -let _CGContextIsPathEmpty = Foreign.foreign "CGContextIsPathEmpty" ((ptr CGContext.t) @-> returning bool) -let _CGContextMoveToPoint = Foreign.foreign "CGContextMoveToPoint" ((ptr CGContext.t) @-> double @-> double @-> returning void) -let _CGContextPathContainsPoint = Foreign.foreign "CGContextPathContainsPoint" ((ptr CGContext.t) @-> CGPoint.t @-> int @-> returning bool) -let _CGContextRelease = Foreign.foreign "CGContextRelease" ((ptr CGContext.t) @-> returning void) -let _CGContextReplacePathWithStrokedPath = Foreign.foreign "CGContextReplacePathWithStrokedPath" ((ptr CGContext.t) @-> returning void) -let _CGContextResetClip = Foreign.foreign "CGContextResetClip" ((ptr CGContext.t) @-> returning void) -let _CGContextRestoreGState = Foreign.foreign "CGContextRestoreGState" ((ptr CGContext.t) @-> returning void) -let _CGContextRetain = Foreign.foreign "CGContextRetain" ((ptr CGContext.t) @-> returning (ptr CGContext.t)) -let _CGContextRotateCTM = Foreign.foreign "CGContextRotateCTM" ((ptr CGContext.t) @-> double @-> returning void) -let _CGContextSaveGState = Foreign.foreign "CGContextSaveGState" ((ptr CGContext.t) @-> returning void) -let _CGContextScaleCTM = Foreign.foreign "CGContextScaleCTM" ((ptr CGContext.t) @-> double @-> double @-> returning void) -let _CGContextSelectFont = Foreign.foreign "CGContextSelectFont" ((ptr CGContext.t) @-> string @-> double @-> int @-> returning void) -let _CGContextSetAllowsAntialiasing = Foreign.foreign "CGContextSetAllowsAntialiasing" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetAllowsFontSmoothing = Foreign.foreign "CGContextSetAllowsFontSmoothing" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetAllowsFontSubpixelPositioning = Foreign.foreign "CGContextSetAllowsFontSubpixelPositioning" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetAllowsFontSubpixelQuantization = Foreign.foreign "CGContextSetAllowsFontSubpixelQuantization" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetAlpha = Foreign.foreign "CGContextSetAlpha" ((ptr CGContext.t) @-> double @-> returning void) -let _CGContextSetBlendMode = Foreign.foreign "CGContextSetBlendMode" ((ptr CGContext.t) @-> int @-> returning void) -let _CGContextSetCMYKFillColor = Foreign.foreign "CGContextSetCMYKFillColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) -let _CGContextSetCMYKStrokeColor = Foreign.foreign "CGContextSetCMYKStrokeColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) -let _CGContextSetCharacterSpacing = Foreign.foreign "CGContextSetCharacterSpacing" ((ptr CGContext.t) @-> double @-> returning void) -let _CGContextSetFillColor = Foreign.foreign "CGContextSetFillColor" ((ptr CGContext.t) @-> (ptr double) @-> returning void) -let _CGContextSetFillColorSpace = Foreign.foreign "CGContextSetFillColorSpace" ((ptr CGContext.t) @-> (ptr CGColorSpace.t) @-> returning void) -let _CGContextSetFillColorWithColor = Foreign.foreign "CGContextSetFillColorWithColor" ((ptr CGContext.t) @-> (ptr CGColor.t) @-> returning void) -let _CGContextSetFillPattern = Foreign.foreign "CGContextSetFillPattern" ((ptr CGContext.t) @-> (ptr CGPattern.t) @-> (ptr double) @-> returning void) -let _CGContextSetFlatness = Foreign.foreign "CGContextSetFlatness" ((ptr CGContext.t) @-> double @-> returning void) -let _CGContextSetFont = Foreign.foreign "CGContextSetFont" ((ptr CGContext.t) @-> (ptr CGFont.t) @-> returning void) -let _CGContextSetFontSize = Foreign.foreign "CGContextSetFontSize" ((ptr CGContext.t) @-> double @-> returning void) -let _CGContextSetGrayFillColor = Foreign.foreign "CGContextSetGrayFillColor" ((ptr CGContext.t) @-> double @-> double @-> returning void) -let _CGContextSetGrayStrokeColor = Foreign.foreign "CGContextSetGrayStrokeColor" ((ptr CGContext.t) @-> double @-> double @-> returning void) -let _CGContextSetInterpolationQuality = Foreign.foreign "CGContextSetInterpolationQuality" ((ptr CGContext.t) @-> int @-> returning void) -let _CGContextSetLineCap = Foreign.foreign "CGContextSetLineCap" ((ptr CGContext.t) @-> int @-> returning void) -let _CGContextSetLineDash = Foreign.foreign "CGContextSetLineDash" ((ptr CGContext.t) @-> double @-> (ptr double) @-> ullong @-> returning void) -let _CGContextSetLineJoin = Foreign.foreign "CGContextSetLineJoin" ((ptr CGContext.t) @-> int @-> returning void) -let _CGContextSetLineWidth = Foreign.foreign "CGContextSetLineWidth" ((ptr CGContext.t) @-> double @-> returning void) -let _CGContextSetMiterLimit = Foreign.foreign "CGContextSetMiterLimit" ((ptr CGContext.t) @-> double @-> returning void) -let _CGContextSetPatternPhase = Foreign.foreign "CGContextSetPatternPhase" ((ptr CGContext.t) @-> CGSize.t @-> returning void) -let _CGContextSetRGBFillColor = Foreign.foreign "CGContextSetRGBFillColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> returning void) -let _CGContextSetRGBStrokeColor = Foreign.foreign "CGContextSetRGBStrokeColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> returning void) -let _CGContextSetRenderingIntent = Foreign.foreign "CGContextSetRenderingIntent" ((ptr CGContext.t) @-> int @-> returning void) -let _CGContextSetShadow = Foreign.foreign "CGContextSetShadow" ((ptr CGContext.t) @-> CGSize.t @-> double @-> returning void) -let _CGContextSetShadowWithColor = Foreign.foreign "CGContextSetShadowWithColor" ((ptr CGContext.t) @-> CGSize.t @-> double @-> (ptr CGColor.t) @-> returning void) -let _CGContextSetShouldAntialias = Foreign.foreign "CGContextSetShouldAntialias" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetShouldSmoothFonts = Foreign.foreign "CGContextSetShouldSmoothFonts" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetShouldSubpixelPositionFonts = Foreign.foreign "CGContextSetShouldSubpixelPositionFonts" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetShouldSubpixelQuantizeFonts = Foreign.foreign "CGContextSetShouldSubpixelQuantizeFonts" ((ptr CGContext.t) @-> bool @-> returning void) -let _CGContextSetStrokeColor = Foreign.foreign "CGContextSetStrokeColor" ((ptr CGContext.t) @-> (ptr double) @-> returning void) -let _CGContextSetStrokeColorSpace = Foreign.foreign "CGContextSetStrokeColorSpace" ((ptr CGContext.t) @-> (ptr CGColorSpace.t) @-> returning void) -let _CGContextSetStrokeColorWithColor = Foreign.foreign "CGContextSetStrokeColorWithColor" ((ptr CGContext.t) @-> (ptr CGColor.t) @-> returning void) -let _CGContextSetStrokePattern = Foreign.foreign "CGContextSetStrokePattern" ((ptr CGContext.t) @-> (ptr CGPattern.t) @-> (ptr double) @-> returning void) -let _CGContextSetTextDrawingMode = Foreign.foreign "CGContextSetTextDrawingMode" ((ptr CGContext.t) @-> int @-> returning void) -let _CGContextSetTextMatrix = Foreign.foreign "CGContextSetTextMatrix" ((ptr CGContext.t) @-> CGAffineTransform.t @-> returning void) -let _CGContextSetTextPosition = Foreign.foreign "CGContextSetTextPosition" ((ptr CGContext.t) @-> double @-> double @-> returning void) -let _CGContextShowGlyphs = Foreign.foreign "CGContextShowGlyphs" ((ptr CGContext.t) @-> (ptr ushort) @-> ullong @-> returning void) -let _CGContextShowGlyphsAtPoint = Foreign.foreign "CGContextShowGlyphsAtPoint" ((ptr CGContext.t) @-> double @-> double @-> (ptr ushort) @-> ullong @-> returning void) -let _CGContextShowGlyphsAtPositions = Foreign.foreign "CGContextShowGlyphsAtPositions" ((ptr CGContext.t) @-> (ptr ushort) @-> (ptr CGPoint.t) @-> ullong @-> returning void) -let _CGContextShowGlyphsWithAdvances = Foreign.foreign "CGContextShowGlyphsWithAdvances" ((ptr CGContext.t) @-> (ptr ushort) @-> (ptr CGSize.t) @-> ullong @-> returning void) -let _CGContextShowText = Foreign.foreign "CGContextShowText" ((ptr CGContext.t) @-> string @-> ullong @-> returning void) -let _CGContextShowTextAtPoint = Foreign.foreign "CGContextShowTextAtPoint" ((ptr CGContext.t) @-> double @-> double @-> string @-> ullong @-> returning void) -let _CGContextStrokeEllipseInRect = Foreign.foreign "CGContextStrokeEllipseInRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextStrokeLineSegments = Foreign.foreign "CGContextStrokeLineSegments" ((ptr CGContext.t) @-> (ptr CGPoint.t) @-> ullong @-> returning void) -let _CGContextStrokePath = Foreign.foreign "CGContextStrokePath" ((ptr CGContext.t) @-> returning void) -let _CGContextStrokeRect = Foreign.foreign "CGContextStrokeRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) -let _CGContextStrokeRectWithWidth = Foreign.foreign "CGContextStrokeRectWithWidth" ((ptr CGContext.t) @-> CGRect.t @-> double @-> returning void) -let _CGContextSynchronize = Foreign.foreign "CGContextSynchronize" ((ptr CGContext.t) @-> returning void) -let _CGContextTranslateCTM = Foreign.foreign "CGContextTranslateCTM" ((ptr CGContext.t) @-> double @-> double @-> returning void) -let _CGConvertColorDataWithFormat = Foreign.foreign "CGConvertColorDataWithFormat" (ullong @-> ullong @-> (ptr void) @-> CGColorDataFormat.t @-> (ptr void) @-> CGColorDataFormat.t @-> (ptr CFDictionary.t) @-> returning bool) -let _CGCursorIsDrawnInFramebuffer = Foreign.foreign "CGCursorIsDrawnInFramebuffer" (void @-> returning uint) -let _CGCursorIsVisible = Foreign.foreign "CGCursorIsVisible" (void @-> returning uint) -let _CGDataConsumerCreate = Foreign.foreign "CGDataConsumerCreate" ((ptr void) @-> (ptr CGDataConsumerCallbacks.t) @-> returning (ptr CGDataConsumer.t)) -let _CGDataConsumerCreateWithCFData = Foreign.foreign "CGDataConsumerCreateWithCFData" ((ptr CFData.t) @-> returning (ptr CGDataConsumer.t)) -let _CGDataConsumerCreateWithURL = Foreign.foreign "CGDataConsumerCreateWithURL" ((ptr CFURL.t) @-> returning (ptr CGDataConsumer.t)) -let _CGDataConsumerGetTypeID = Foreign.foreign "CGDataConsumerGetTypeID" (void @-> returning ullong) -let _CGDataConsumerRelease = Foreign.foreign "CGDataConsumerRelease" ((ptr CGDataConsumer.t) @-> returning void) -let _CGDataConsumerRetain = Foreign.foreign "CGDataConsumerRetain" ((ptr CGDataConsumer.t) @-> returning (ptr CGDataConsumer.t)) -let _CGDataProviderCopyData = Foreign.foreign "CGDataProviderCopyData" ((ptr CGDataProvider.t) @-> returning (ptr CFData.t)) -let _CGDataProviderCreateDirect = Foreign.foreign "CGDataProviderCreateDirect" ((ptr void) @-> llong @-> (ptr CGDataProviderDirectCallbacks.t) @-> returning (ptr CGDataProvider.t)) -let _CGDataProviderCreateSequential = Foreign.foreign "CGDataProviderCreateSequential" ((ptr void) @-> (ptr CGDataProviderSequentialCallbacks.t) @-> returning (ptr CGDataProvider.t)) -let _CGDataProviderCreateWithCFData = Foreign.foreign "CGDataProviderCreateWithCFData" ((ptr CFData.t) @-> returning (ptr CGDataProvider.t)) -let _CGDataProviderCreateWithData = Foreign.foreign "CGDataProviderCreateWithData" ((ptr void) @-> (ptr void) @-> ullong @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> ullong @-> returning void) @-> returning (ptr CGDataProvider.t)) -let _CGDataProviderCreateWithFilename = Foreign.foreign "CGDataProviderCreateWithFilename" (string @-> returning (ptr CGDataProvider.t)) -let _CGDataProviderCreateWithURL = Foreign.foreign "CGDataProviderCreateWithURL" ((ptr CFURL.t) @-> returning (ptr CGDataProvider.t)) -let _CGDataProviderGetInfo = Foreign.foreign "CGDataProviderGetInfo" ((ptr CGDataProvider.t) @-> returning (ptr void)) -let _CGDataProviderGetTypeID = Foreign.foreign "CGDataProviderGetTypeID" (void @-> returning ullong) -let _CGDataProviderRelease = Foreign.foreign "CGDataProviderRelease" ((ptr CGDataProvider.t) @-> returning void) -let _CGDataProviderRetain = Foreign.foreign "CGDataProviderRetain" ((ptr CGDataProvider.t) @-> returning (ptr CGDataProvider.t)) -let _CGDirectDisplayCopyCurrentMetalDevice = Foreign.foreign "CGDirectDisplayCopyCurrentMetalDevice" (uint @-> returning id) -let _CGDisplayAvailableModes = Foreign.foreign "CGDisplayAvailableModes" (uint @-> returning (ptr CFArray.t)) -let _CGDisplayBestModeForParameters = Foreign.foreign "CGDisplayBestModeForParameters" (uint @-> ullong @-> ullong @-> ullong @-> (ptr uint) @-> returning (ptr CFDictionary.t)) -let _CGDisplayBestModeForParametersAndRefreshRate = Foreign.foreign "CGDisplayBestModeForParametersAndRefreshRate" (uint @-> ullong @-> ullong @-> ullong @-> double @-> (ptr uint) @-> returning (ptr CFDictionary.t)) -let _CGDisplayBounds = Foreign.foreign "CGDisplayBounds" (uint @-> returning CGRect.t) -let _CGDisplayCapture = Foreign.foreign "CGDisplayCapture" (uint @-> returning int) -let _CGDisplayCaptureWithOptions = Foreign.foreign "CGDisplayCaptureWithOptions" (uint @-> uint @-> returning int) -let _CGDisplayCopyAllDisplayModes = Foreign.foreign "CGDisplayCopyAllDisplayModes" (uint @-> (ptr CFDictionary.t) @-> returning (ptr CFArray.t)) -let _CGDisplayCopyColorSpace = Foreign.foreign "CGDisplayCopyColorSpace" (uint @-> returning (ptr CGColorSpace.t)) -let _CGDisplayCopyDisplayMode = Foreign.foreign "CGDisplayCopyDisplayMode" (uint @-> returning (ptr CGDisplayMode.t)) -let _CGDisplayCreateImage = Foreign.foreign "CGDisplayCreateImage" (uint @-> returning (ptr CGImage.t)) -let _CGDisplayCreateImageForRect = Foreign.foreign "CGDisplayCreateImageForRect" (uint @-> CGRect.t @-> returning (ptr CGImage.t)) -let _CGDisplayCurrentMode = Foreign.foreign "CGDisplayCurrentMode" (uint @-> returning (ptr CFDictionary.t)) -let _CGDisplayFade = Foreign.foreign "CGDisplayFade" (uint @-> float @-> float @-> float @-> float @-> float @-> float @-> uint @-> returning int) -let _CGDisplayFadeOperationInProgress = Foreign.foreign "CGDisplayFadeOperationInProgress" (void @-> returning uint) -let _CGDisplayGammaTableCapacity = Foreign.foreign "CGDisplayGammaTableCapacity" (uint @-> returning uint) -let _CGDisplayGetDrawingContext = Foreign.foreign "CGDisplayGetDrawingContext" (uint @-> returning (ptr CGContext.t)) -let _CGDisplayHideCursor = Foreign.foreign "CGDisplayHideCursor" (uint @-> returning int) -let _CGDisplayIDToOpenGLDisplayMask = Foreign.foreign "CGDisplayIDToOpenGLDisplayMask" (uint @-> returning uint) -let _CGDisplayIOServicePort = Foreign.foreign "CGDisplayIOServicePort" (uint @-> returning uint) -let _CGDisplayIsActive = Foreign.foreign "CGDisplayIsActive" (uint @-> returning uint) -let _CGDisplayIsAlwaysInMirrorSet = Foreign.foreign "CGDisplayIsAlwaysInMirrorSet" (uint @-> returning uint) -let _CGDisplayIsAsleep = Foreign.foreign "CGDisplayIsAsleep" (uint @-> returning uint) -let _CGDisplayIsBuiltin = Foreign.foreign "CGDisplayIsBuiltin" (uint @-> returning uint) -let _CGDisplayIsCaptured = Foreign.foreign "CGDisplayIsCaptured" (uint @-> returning uint) -let _CGDisplayIsInHWMirrorSet = Foreign.foreign "CGDisplayIsInHWMirrorSet" (uint @-> returning uint) -let _CGDisplayIsInMirrorSet = Foreign.foreign "CGDisplayIsInMirrorSet" (uint @-> returning uint) -let _CGDisplayIsMain = Foreign.foreign "CGDisplayIsMain" (uint @-> returning uint) -let _CGDisplayIsOnline = Foreign.foreign "CGDisplayIsOnline" (uint @-> returning uint) -let _CGDisplayIsStereo = Foreign.foreign "CGDisplayIsStereo" (uint @-> returning uint) -let _CGDisplayMirrorsDisplay = Foreign.foreign "CGDisplayMirrorsDisplay" (uint @-> returning uint) -let _CGDisplayModeCopyPixelEncoding = Foreign.foreign "CGDisplayModeCopyPixelEncoding" ((ptr CGDisplayMode.t) @-> returning (ptr CFString.t)) -let _CGDisplayModeGetHeight = Foreign.foreign "CGDisplayModeGetHeight" ((ptr CGDisplayMode.t) @-> returning ullong) -let _CGDisplayModeGetIODisplayModeID = Foreign.foreign "CGDisplayModeGetIODisplayModeID" ((ptr CGDisplayMode.t) @-> returning int) -let _CGDisplayModeGetIOFlags = Foreign.foreign "CGDisplayModeGetIOFlags" ((ptr CGDisplayMode.t) @-> returning uint) -let _CGDisplayModeGetPixelHeight = Foreign.foreign "CGDisplayModeGetPixelHeight" ((ptr CGDisplayMode.t) @-> returning ullong) -let _CGDisplayModeGetPixelWidth = Foreign.foreign "CGDisplayModeGetPixelWidth" ((ptr CGDisplayMode.t) @-> returning ullong) -let _CGDisplayModeGetRefreshRate = Foreign.foreign "CGDisplayModeGetRefreshRate" ((ptr CGDisplayMode.t) @-> returning double) -let _CGDisplayModeGetTypeID = Foreign.foreign "CGDisplayModeGetTypeID" (void @-> returning ullong) -let _CGDisplayModeGetWidth = Foreign.foreign "CGDisplayModeGetWidth" ((ptr CGDisplayMode.t) @-> returning ullong) -let _CGDisplayModeIsUsableForDesktopGUI = Foreign.foreign "CGDisplayModeIsUsableForDesktopGUI" ((ptr CGDisplayMode.t) @-> returning bool) -let _CGDisplayModeRelease = Foreign.foreign "CGDisplayModeRelease" ((ptr CGDisplayMode.t) @-> returning void) -let _CGDisplayModeRetain = Foreign.foreign "CGDisplayModeRetain" ((ptr CGDisplayMode.t) @-> returning (ptr CGDisplayMode.t)) -let _CGDisplayModelNumber = Foreign.foreign "CGDisplayModelNumber" (uint @-> returning uint) -let _CGDisplayMoveCursorToPoint = Foreign.foreign "CGDisplayMoveCursorToPoint" (uint @-> CGPoint.t @-> returning int) -let _CGDisplayPixelsHigh = Foreign.foreign "CGDisplayPixelsHigh" (uint @-> returning ullong) -let _CGDisplayPixelsWide = Foreign.foreign "CGDisplayPixelsWide" (uint @-> returning ullong) -let _CGDisplayPrimaryDisplay = Foreign.foreign "CGDisplayPrimaryDisplay" (uint @-> returning uint) -let _CGDisplayRegisterReconfigurationCallback = Foreign.foreign "CGDisplayRegisterReconfigurationCallback" (Foreign.funptr (uint @-> uint @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) -let _CGDisplayRelease = Foreign.foreign "CGDisplayRelease" (uint @-> returning int) -let _CGDisplayRemoveReconfigurationCallback = Foreign.foreign "CGDisplayRemoveReconfigurationCallback" (Foreign.funptr (uint @-> uint @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) -let _CGDisplayRestoreColorSyncSettings = Foreign.foreign "CGDisplayRestoreColorSyncSettings" (void @-> returning void) -let _CGDisplayRotation = Foreign.foreign "CGDisplayRotation" (uint @-> returning double) -let _CGDisplayScreenSize = Foreign.foreign "CGDisplayScreenSize" (uint @-> returning CGSize.t) -let _CGDisplaySerialNumber = Foreign.foreign "CGDisplaySerialNumber" (uint @-> returning uint) -let _CGDisplaySetDisplayMode = Foreign.foreign "CGDisplaySetDisplayMode" (uint @-> (ptr CGDisplayMode.t) @-> (ptr CFDictionary.t) @-> returning int) -let _CGDisplaySetStereoOperation = Foreign.foreign "CGDisplaySetStereoOperation" (uint @-> uint @-> uint @-> uint @-> returning int) -let _CGDisplayShowCursor = Foreign.foreign "CGDisplayShowCursor" (uint @-> returning int) -let _CGDisplayStreamCreate = Foreign.foreign "CGDisplayStreamCreate" (uint @-> ullong @-> ullong @-> int @-> (ptr CFDictionary.t) @-> Foreign.funptr (int @-> ullong @-> (ptr IOSurface.t) @-> (ptr CGDisplayStreamUpdate.t) @-> returning void) @-> returning (ptr CGDisplayStream.t)) -let _CGDisplayStreamCreateWithDispatchQueue = Foreign.foreign "CGDisplayStreamCreateWithDispatchQueue" (uint @-> ullong @-> ullong @-> int @-> (ptr CFDictionary.t) @-> id @-> Foreign.funptr (int @-> ullong @-> (ptr IOSurface.t) @-> (ptr CGDisplayStreamUpdate.t) @-> returning void) @-> returning (ptr CGDisplayStream.t)) -let _CGDisplayStreamGetRunLoopSource = Foreign.foreign "CGDisplayStreamGetRunLoopSource" ((ptr CGDisplayStream.t) @-> returning (ptr CFRunLoopSource.t)) -let _CGDisplayStreamGetTypeID = Foreign.foreign "CGDisplayStreamGetTypeID" (void @-> returning ullong) -let _CGDisplayStreamStart = Foreign.foreign "CGDisplayStreamStart" ((ptr CGDisplayStream.t) @-> returning int) -let _CGDisplayStreamStop = Foreign.foreign "CGDisplayStreamStop" ((ptr CGDisplayStream.t) @-> returning int) -let _CGDisplayStreamUpdateCreateMergedUpdate = Foreign.foreign "CGDisplayStreamUpdateCreateMergedUpdate" ((ptr CGDisplayStreamUpdate.t) @-> (ptr CGDisplayStreamUpdate.t) @-> returning (ptr CGDisplayStreamUpdate.t)) -let _CGDisplayStreamUpdateGetDropCount = Foreign.foreign "CGDisplayStreamUpdateGetDropCount" ((ptr CGDisplayStreamUpdate.t) @-> returning ullong) -let _CGDisplayStreamUpdateGetMovedRectsDelta = Foreign.foreign "CGDisplayStreamUpdateGetMovedRectsDelta" ((ptr CGDisplayStreamUpdate.t) @-> (ptr double) @-> (ptr double) @-> returning void) -let _CGDisplayStreamUpdateGetRects = Foreign.foreign "CGDisplayStreamUpdateGetRects" ((ptr CGDisplayStreamUpdate.t) @-> int @-> (ptr ullong) @-> returning (ptr CGRect.t)) -let _CGDisplayStreamUpdateGetTypeID = Foreign.foreign "CGDisplayStreamUpdateGetTypeID" (void @-> returning ullong) -let _CGDisplaySwitchToMode = Foreign.foreign "CGDisplaySwitchToMode" (uint @-> (ptr CFDictionary.t) @-> returning int) -let _CGDisplayUnitNumber = Foreign.foreign "CGDisplayUnitNumber" (uint @-> returning uint) -let _CGDisplayUsesOpenGLAcceleration = Foreign.foreign "CGDisplayUsesOpenGLAcceleration" (uint @-> returning uint) -let _CGDisplayVendorNumber = Foreign.foreign "CGDisplayVendorNumber" (uint @-> returning uint) -let _CGEnableEventStateCombining = Foreign.foreign "CGEnableEventStateCombining" (uint @-> returning int) -let _CGErrorSetCallback = Foreign.foreign "CGErrorSetCallback" (Foreign.funptr (void @-> returning void) @-> returning void) -let _CGEventCreate = Foreign.foreign "CGEventCreate" ((ptr CGEventSource.t) @-> returning (ptr CGEvent.t)) -let _CGEventCreateCopy = Foreign.foreign "CGEventCreateCopy" ((ptr CGEvent.t) @-> returning (ptr CGEvent.t)) -let _CGEventCreateData = Foreign.foreign "CGEventCreateData" ((ptr CFAllocator.t) @-> (ptr CGEvent.t) @-> returning (ptr CFData.t)) -let _CGEventCreateFromData = Foreign.foreign "CGEventCreateFromData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CGEvent.t)) -let _CGEventCreateKeyboardEvent = Foreign.foreign "CGEventCreateKeyboardEvent" ((ptr CGEventSource.t) @-> ushort @-> bool @-> returning (ptr CGEvent.t)) -let _CGEventCreateMouseEvent = Foreign.foreign "CGEventCreateMouseEvent" ((ptr CGEventSource.t) @-> uint @-> CGPoint.t @-> uint @-> returning (ptr CGEvent.t)) -let _CGEventCreateScrollWheelEvent = Foreign.foreign "CGEventCreateScrollWheelEvent" ((ptr CGEventSource.t) @-> uint @-> uint @-> int @-> returning (ptr CGEvent.t)) -let _CGEventCreateScrollWheelEvent2 = Foreign.foreign "CGEventCreateScrollWheelEvent2" ((ptr CGEventSource.t) @-> uint @-> uint @-> int @-> int @-> int @-> returning (ptr CGEvent.t)) -let _CGEventCreateSourceFromEvent = Foreign.foreign "CGEventCreateSourceFromEvent" ((ptr CGEvent.t) @-> returning (ptr CGEventSource.t)) -let _CGEventGetDoubleValueField = Foreign.foreign "CGEventGetDoubleValueField" ((ptr CGEvent.t) @-> uint @-> returning double) -let _CGEventGetFlags = Foreign.foreign "CGEventGetFlags" ((ptr CGEvent.t) @-> returning ullong) -let _CGEventGetIntegerValueField = Foreign.foreign "CGEventGetIntegerValueField" ((ptr CGEvent.t) @-> uint @-> returning llong) -let _CGEventGetLocation = Foreign.foreign "CGEventGetLocation" ((ptr CGEvent.t) @-> returning CGPoint.t) -let _CGEventGetTimestamp = Foreign.foreign "CGEventGetTimestamp" ((ptr CGEvent.t) @-> returning ullong) -let _CGEventGetType = Foreign.foreign "CGEventGetType" ((ptr CGEvent.t) @-> returning uint) -let _CGEventGetTypeID = Foreign.foreign "CGEventGetTypeID" (void @-> returning ullong) -let _CGEventGetUnflippedLocation = Foreign.foreign "CGEventGetUnflippedLocation" ((ptr CGEvent.t) @-> returning CGPoint.t) -let _CGEventKeyboardGetUnicodeString = Foreign.foreign "CGEventKeyboardGetUnicodeString" ((ptr CGEvent.t) @-> ullong @-> (ptr ullong) @-> (ptr ushort) @-> returning void) -let _CGEventKeyboardSetUnicodeString = Foreign.foreign "CGEventKeyboardSetUnicodeString" ((ptr CGEvent.t) @-> ullong @-> (ptr ushort) @-> returning void) -let _CGEventPost = Foreign.foreign "CGEventPost" (uint @-> (ptr CGEvent.t) @-> returning void) -let _CGEventPostToPSN = Foreign.foreign "CGEventPostToPSN" ((ptr void) @-> (ptr CGEvent.t) @-> returning void) -let _CGEventPostToPid = Foreign.foreign "CGEventPostToPid" (int @-> (ptr CGEvent.t) @-> returning void) -let _CGEventSetDoubleValueField = Foreign.foreign "CGEventSetDoubleValueField" ((ptr CGEvent.t) @-> uint @-> double @-> returning void) -let _CGEventSetFlags = Foreign.foreign "CGEventSetFlags" ((ptr CGEvent.t) @-> ullong @-> returning void) -let _CGEventSetIntegerValueField = Foreign.foreign "CGEventSetIntegerValueField" ((ptr CGEvent.t) @-> uint @-> llong @-> returning void) -let _CGEventSetLocation = Foreign.foreign "CGEventSetLocation" ((ptr CGEvent.t) @-> CGPoint.t @-> returning void) -let _CGEventSetSource = Foreign.foreign "CGEventSetSource" ((ptr CGEvent.t) @-> (ptr CGEventSource.t) @-> returning void) -let _CGEventSetTimestamp = Foreign.foreign "CGEventSetTimestamp" ((ptr CGEvent.t) @-> ullong @-> returning void) -let _CGEventSetType = Foreign.foreign "CGEventSetType" ((ptr CGEvent.t) @-> uint @-> returning void) -let _CGEventSourceButtonState = Foreign.foreign "CGEventSourceButtonState" (int @-> uint @-> returning bool) -let _CGEventSourceCounterForEventType = Foreign.foreign "CGEventSourceCounterForEventType" (int @-> uint @-> returning uint) -let _CGEventSourceCreate = Foreign.foreign "CGEventSourceCreate" (int @-> returning (ptr CGEventSource.t)) -let _CGEventSourceFlagsState = Foreign.foreign "CGEventSourceFlagsState" (int @-> returning ullong) -let _CGEventSourceGetKeyboardType = Foreign.foreign "CGEventSourceGetKeyboardType" ((ptr CGEventSource.t) @-> returning uint) -let _CGEventSourceGetLocalEventsFilterDuringSuppressionState = Foreign.foreign "CGEventSourceGetLocalEventsFilterDuringSuppressionState" ((ptr CGEventSource.t) @-> uint @-> returning uint) -let _CGEventSourceGetLocalEventsSuppressionInterval = Foreign.foreign "CGEventSourceGetLocalEventsSuppressionInterval" ((ptr CGEventSource.t) @-> returning double) -let _CGEventSourceGetPixelsPerLine = Foreign.foreign "CGEventSourceGetPixelsPerLine" ((ptr CGEventSource.t) @-> returning double) -let _CGEventSourceGetSourceStateID = Foreign.foreign "CGEventSourceGetSourceStateID" ((ptr CGEventSource.t) @-> returning int) -let _CGEventSourceGetTypeID = Foreign.foreign "CGEventSourceGetTypeID" (void @-> returning ullong) -let _CGEventSourceGetUserData = Foreign.foreign "CGEventSourceGetUserData" ((ptr CGEventSource.t) @-> returning llong) -let _CGEventSourceKeyState = Foreign.foreign "CGEventSourceKeyState" (int @-> ushort @-> returning bool) -let _CGEventSourceSecondsSinceLastEventType = Foreign.foreign "CGEventSourceSecondsSinceLastEventType" (int @-> uint @-> returning double) -let _CGEventSourceSetKeyboardType = Foreign.foreign "CGEventSourceSetKeyboardType" ((ptr CGEventSource.t) @-> uint @-> returning void) -let _CGEventSourceSetLocalEventsFilterDuringSuppressionState = Foreign.foreign "CGEventSourceSetLocalEventsFilterDuringSuppressionState" ((ptr CGEventSource.t) @-> uint @-> uint @-> returning void) -let _CGEventSourceSetLocalEventsSuppressionInterval = Foreign.foreign "CGEventSourceSetLocalEventsSuppressionInterval" ((ptr CGEventSource.t) @-> double @-> returning void) -let _CGEventSourceSetPixelsPerLine = Foreign.foreign "CGEventSourceSetPixelsPerLine" ((ptr CGEventSource.t) @-> double @-> returning void) -let _CGEventSourceSetUserData = Foreign.foreign "CGEventSourceSetUserData" ((ptr CGEventSource.t) @-> llong @-> returning void) -let _CGEventTapCreate = Foreign.foreign "CGEventTapCreate" (uint @-> uint @-> uint @-> ullong @-> Foreign.funptr ((ptr CGEventTapProxy.t) @-> uint @-> (ptr CGEvent.t) @-> (ptr void) @-> returning (ptr CGEvent.t)) @-> (ptr void) @-> returning (ptr CFMachPort.t)) -let _CGEventTapCreateForPSN = Foreign.foreign "CGEventTapCreateForPSN" ((ptr void) @-> uint @-> uint @-> ullong @-> Foreign.funptr ((ptr CGEventTapProxy.t) @-> uint @-> (ptr CGEvent.t) @-> (ptr void) @-> returning (ptr CGEvent.t)) @-> (ptr void) @-> returning (ptr CFMachPort.t)) -let _CGEventTapCreateForPid = Foreign.foreign "CGEventTapCreateForPid" (int @-> uint @-> uint @-> ullong @-> Foreign.funptr ((ptr CGEventTapProxy.t) @-> uint @-> (ptr CGEvent.t) @-> (ptr void) @-> returning (ptr CGEvent.t)) @-> (ptr void) @-> returning (ptr CFMachPort.t)) -let _CGEventTapEnable = Foreign.foreign "CGEventTapEnable" ((ptr CFMachPort.t) @-> bool @-> returning void) -let _CGEventTapIsEnabled = Foreign.foreign "CGEventTapIsEnabled" ((ptr CFMachPort.t) @-> returning bool) -let _CGEventTapPostEvent = Foreign.foreign "CGEventTapPostEvent" ((ptr CGEventTapProxy.t) @-> (ptr CGEvent.t) @-> returning void) -let _CGFontCanCreatePostScriptSubset = Foreign.foreign "CGFontCanCreatePostScriptSubset" ((ptr CGFont.t) @-> int @-> returning bool) -let _CGFontCopyFullName = Foreign.foreign "CGFontCopyFullName" ((ptr CGFont.t) @-> returning (ptr CFString.t)) -let _CGFontCopyGlyphNameForGlyph = Foreign.foreign "CGFontCopyGlyphNameForGlyph" ((ptr CGFont.t) @-> ushort @-> returning (ptr CFString.t)) -let _CGFontCopyPostScriptName = Foreign.foreign "CGFontCopyPostScriptName" ((ptr CGFont.t) @-> returning (ptr CFString.t)) -let _CGFontCopyTableForTag = Foreign.foreign "CGFontCopyTableForTag" ((ptr CGFont.t) @-> uint @-> returning (ptr CFData.t)) -let _CGFontCopyTableTags = Foreign.foreign "CGFontCopyTableTags" ((ptr CGFont.t) @-> returning (ptr CFArray.t)) -let _CGFontCopyVariationAxes = Foreign.foreign "CGFontCopyVariationAxes" ((ptr CGFont.t) @-> returning (ptr CFArray.t)) -let _CGFontCopyVariations = Foreign.foreign "CGFontCopyVariations" ((ptr CGFont.t) @-> returning (ptr CFDictionary.t)) -let _CGFontCreateCopyWithVariations = Foreign.foreign "CGFontCreateCopyWithVariations" ((ptr CGFont.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGFont.t)) -let _CGFontCreatePostScriptEncoding = Foreign.foreign "CGFontCreatePostScriptEncoding" ((ptr CGFont.t) @-> (ptr ushort) @-> returning (ptr CFData.t)) -let _CGFontCreatePostScriptSubset = Foreign.foreign "CGFontCreatePostScriptSubset" ((ptr CGFont.t) @-> (ptr CFString.t) @-> int @-> (ptr ushort) @-> ullong @-> (ptr ushort) @-> returning (ptr CFData.t)) -let _CGFontCreateWithDataProvider = Foreign.foreign "CGFontCreateWithDataProvider" ((ptr CGDataProvider.t) @-> returning (ptr CGFont.t)) -let _CGFontCreateWithFontName = Foreign.foreign "CGFontCreateWithFontName" ((ptr CFString.t) @-> returning (ptr CGFont.t)) -let _CGFontCreateWithPlatformFont = Foreign.foreign "CGFontCreateWithPlatformFont" (int @-> returning (ptr CGFont.t)) -let _CGFontGetAscent = Foreign.foreign "CGFontGetAscent" ((ptr CGFont.t) @-> returning int) -let _CGFontGetCapHeight = Foreign.foreign "CGFontGetCapHeight" ((ptr CGFont.t) @-> returning int) -let _CGFontGetDescent = Foreign.foreign "CGFontGetDescent" ((ptr CGFont.t) @-> returning int) -let _CGFontGetFontBBox = Foreign.foreign "CGFontGetFontBBox" ((ptr CGFont.t) @-> returning CGRect.t) -let _CGFontGetGlyphAdvances = Foreign.foreign "CGFontGetGlyphAdvances" ((ptr CGFont.t) @-> (ptr ushort) @-> ullong @-> (ptr int) @-> returning bool) -let _CGFontGetGlyphBBoxes = Foreign.foreign "CGFontGetGlyphBBoxes" ((ptr CGFont.t) @-> (ptr ushort) @-> ullong @-> (ptr CGRect.t) @-> returning bool) -let _CGFontGetGlyphWithGlyphName = Foreign.foreign "CGFontGetGlyphWithGlyphName" ((ptr CGFont.t) @-> (ptr CFString.t) @-> returning ushort) -let _CGFontGetItalicAngle = Foreign.foreign "CGFontGetItalicAngle" ((ptr CGFont.t) @-> returning double) -let _CGFontGetLeading = Foreign.foreign "CGFontGetLeading" ((ptr CGFont.t) @-> returning int) -let _CGFontGetNumberOfGlyphs = Foreign.foreign "CGFontGetNumberOfGlyphs" ((ptr CGFont.t) @-> returning ullong) -let _CGFontGetStemV = Foreign.foreign "CGFontGetStemV" ((ptr CGFont.t) @-> returning double) -let _CGFontGetTypeID = Foreign.foreign "CGFontGetTypeID" (void @-> returning ullong) -let _CGFontGetUnitsPerEm = Foreign.foreign "CGFontGetUnitsPerEm" ((ptr CGFont.t) @-> returning int) -let _CGFontGetXHeight = Foreign.foreign "CGFontGetXHeight" ((ptr CGFont.t) @-> returning int) -let _CGFontRelease = Foreign.foreign "CGFontRelease" ((ptr CGFont.t) @-> returning void) -let _CGFontRetain = Foreign.foreign "CGFontRetain" ((ptr CGFont.t) @-> returning (ptr CGFont.t)) -let _CGFunctionCreate = Foreign.foreign "CGFunctionCreate" ((ptr void) @-> ullong @-> (ptr double) @-> ullong @-> (ptr double) @-> (ptr CGFunctionCallbacks.t) @-> returning (ptr CGFunction.t)) -let _CGFunctionGetTypeID = Foreign.foreign "CGFunctionGetTypeID" (void @-> returning ullong) -let _CGFunctionRelease = Foreign.foreign "CGFunctionRelease" ((ptr CGFunction.t) @-> returning void) -let _CGFunctionRetain = Foreign.foreign "CGFunctionRetain" ((ptr CGFunction.t) @-> returning (ptr CGFunction.t)) -let _CGGetActiveDisplayList = Foreign.foreign "CGGetActiveDisplayList" (uint @-> (ptr uint) @-> (ptr uint) @-> returning int) -let _CGGetDisplayTransferByFormula = Foreign.foreign "CGGetDisplayTransferByFormula" (uint @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> returning int) -let _CGGetDisplayTransferByTable = Foreign.foreign "CGGetDisplayTransferByTable" (uint @-> uint @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr uint) @-> returning int) -let _CGGetDisplaysWithOpenGLDisplayMask = Foreign.foreign "CGGetDisplaysWithOpenGLDisplayMask" (uint @-> uint @-> (ptr uint) @-> (ptr uint) @-> returning int) -let _CGGetDisplaysWithPoint = Foreign.foreign "CGGetDisplaysWithPoint" (CGPoint.t @-> uint @-> (ptr uint) @-> (ptr uint) @-> returning int) -let _CGGetDisplaysWithRect = Foreign.foreign "CGGetDisplaysWithRect" (CGRect.t @-> uint @-> (ptr uint) @-> (ptr uint) @-> returning int) -let _CGGetEventTapList = Foreign.foreign "CGGetEventTapList" (uint @-> (ptr CGEventTapInformation.t) @-> (ptr uint) @-> returning int) -let _CGGetLastMouseDelta = Foreign.foreign "CGGetLastMouseDelta" ((ptr int) @-> (ptr int) @-> returning void) -let _CGGetOnlineDisplayList = Foreign.foreign "CGGetOnlineDisplayList" (uint @-> (ptr uint) @-> (ptr uint) @-> returning int) -let _CGGradientCreateWithColorComponents = Foreign.foreign "CGGradientCreateWithColorComponents" ((ptr CGColorSpace.t) @-> (ptr double) @-> (ptr double) @-> ullong @-> returning (ptr CGGradient.t)) -let _CGGradientCreateWithColors = Foreign.foreign "CGGradientCreateWithColors" ((ptr CGColorSpace.t) @-> (ptr CFArray.t) @-> (ptr double) @-> returning (ptr CGGradient.t)) -let _CGGradientGetTypeID = Foreign.foreign "CGGradientGetTypeID" (void @-> returning ullong) -let _CGGradientRelease = Foreign.foreign "CGGradientRelease" ((ptr CGGradient.t) @-> returning void) -let _CGGradientRetain = Foreign.foreign "CGGradientRetain" ((ptr CGGradient.t) @-> returning (ptr CGGradient.t)) -let _CGImageCreate = Foreign.foreign "CGImageCreate" (ullong @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGColorSpace.t) @-> uint @-> (ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> int @-> returning (ptr CGImage.t)) -let _CGImageCreateCopy = Foreign.foreign "CGImageCreateCopy" ((ptr CGImage.t) @-> returning (ptr CGImage.t)) -let _CGImageCreateCopyWithColorSpace = Foreign.foreign "CGImageCreateCopyWithColorSpace" ((ptr CGImage.t) @-> (ptr CGColorSpace.t) @-> returning (ptr CGImage.t)) -let _CGImageCreateWithImageInRect = Foreign.foreign "CGImageCreateWithImageInRect" ((ptr CGImage.t) @-> CGRect.t @-> returning (ptr CGImage.t)) -let _CGImageCreateWithJPEGDataProvider = Foreign.foreign "CGImageCreateWithJPEGDataProvider" ((ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> int @-> returning (ptr CGImage.t)) -let _CGImageCreateWithMask = Foreign.foreign "CGImageCreateWithMask" ((ptr CGImage.t) @-> (ptr CGImage.t) @-> returning (ptr CGImage.t)) -let _CGImageCreateWithMaskingColors = Foreign.foreign "CGImageCreateWithMaskingColors" ((ptr CGImage.t) @-> (ptr double) @-> returning (ptr CGImage.t)) -let _CGImageCreateWithPNGDataProvider = Foreign.foreign "CGImageCreateWithPNGDataProvider" ((ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> int @-> returning (ptr CGImage.t)) -let _CGImageGetAlphaInfo = Foreign.foreign "CGImageGetAlphaInfo" ((ptr CGImage.t) @-> returning uint) -let _CGImageGetBitmapInfo = Foreign.foreign "CGImageGetBitmapInfo" ((ptr CGImage.t) @-> returning uint) -let _CGImageGetBitsPerComponent = Foreign.foreign "CGImageGetBitsPerComponent" ((ptr CGImage.t) @-> returning ullong) -let _CGImageGetBitsPerPixel = Foreign.foreign "CGImageGetBitsPerPixel" ((ptr CGImage.t) @-> returning ullong) -let _CGImageGetByteOrderInfo = Foreign.foreign "CGImageGetByteOrderInfo" ((ptr CGImage.t) @-> returning uint) -let _CGImageGetBytesPerRow = Foreign.foreign "CGImageGetBytesPerRow" ((ptr CGImage.t) @-> returning ullong) -let _CGImageGetColorSpace = Foreign.foreign "CGImageGetColorSpace" ((ptr CGImage.t) @-> returning (ptr CGColorSpace.t)) -let _CGImageGetDataProvider = Foreign.foreign "CGImageGetDataProvider" ((ptr CGImage.t) @-> returning (ptr CGDataProvider.t)) -let _CGImageGetDecode = Foreign.foreign "CGImageGetDecode" ((ptr CGImage.t) @-> returning (ptr double)) -let _CGImageGetHeight = Foreign.foreign "CGImageGetHeight" ((ptr CGImage.t) @-> returning ullong) -let _CGImageGetPixelFormatInfo = Foreign.foreign "CGImageGetPixelFormatInfo" ((ptr CGImage.t) @-> returning uint) -let _CGImageGetRenderingIntent = Foreign.foreign "CGImageGetRenderingIntent" ((ptr CGImage.t) @-> returning int) -let _CGImageGetShouldInterpolate = Foreign.foreign "CGImageGetShouldInterpolate" ((ptr CGImage.t) @-> returning bool) -let _CGImageGetTypeID = Foreign.foreign "CGImageGetTypeID" (void @-> returning ullong) -let _CGImageGetUTType = Foreign.foreign "CGImageGetUTType" ((ptr CGImage.t) @-> returning (ptr CFString.t)) -let _CGImageGetWidth = Foreign.foreign "CGImageGetWidth" ((ptr CGImage.t) @-> returning ullong) -let _CGImageIsMask = Foreign.foreign "CGImageIsMask" ((ptr CGImage.t) @-> returning bool) -let _CGImageMaskCreate = Foreign.foreign "CGImageMaskCreate" (ullong @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> returning (ptr CGImage.t)) -let _CGImageRelease = Foreign.foreign "CGImageRelease" ((ptr CGImage.t) @-> returning void) -let _CGImageRetain = Foreign.foreign "CGImageRetain" ((ptr CGImage.t) @-> returning (ptr CGImage.t)) -let _CGInhibitLocalEvents = Foreign.foreign "CGInhibitLocalEvents" (uint @-> returning int) -let _CGLayerCreateWithContext = Foreign.foreign "CGLayerCreateWithContext" ((ptr CGContext.t) @-> CGSize.t @-> (ptr CFDictionary.t) @-> returning (ptr CGLayer.t)) -let _CGLayerGetContext = Foreign.foreign "CGLayerGetContext" ((ptr CGLayer.t) @-> returning (ptr CGContext.t)) -let _CGLayerGetSize = Foreign.foreign "CGLayerGetSize" ((ptr CGLayer.t) @-> returning CGSize.t) -let _CGLayerGetTypeID = Foreign.foreign "CGLayerGetTypeID" (void @-> returning ullong) -let _CGLayerRelease = Foreign.foreign "CGLayerRelease" ((ptr CGLayer.t) @-> returning void) -let _CGLayerRetain = Foreign.foreign "CGLayerRetain" ((ptr CGLayer.t) @-> returning (ptr CGLayer.t)) -let _CGMainDisplayID = Foreign.foreign "CGMainDisplayID" (void @-> returning uint) -let _CGOpenGLDisplayMaskToDisplayID = Foreign.foreign "CGOpenGLDisplayMaskToDisplayID" (uint @-> returning uint) -let _CGPDFArrayApplyBlock = Foreign.foreign "CGPDFArrayApplyBlock" ((ptr CGPDFArray.t) @-> Foreign.funptr (ullong @-> (ptr CGPDFObject.t) @-> (ptr void) @-> returning bool) @-> (ptr void) @-> returning void) -let _CGPDFArrayGetArray = Foreign.foreign "CGPDFArrayGetArray" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFArray.t)) @-> returning bool) -let _CGPDFArrayGetBoolean = Foreign.foreign "CGPDFArrayGetBoolean" ((ptr CGPDFArray.t) @-> ullong @-> string @-> returning bool) -let _CGPDFArrayGetCount = Foreign.foreign "CGPDFArrayGetCount" ((ptr CGPDFArray.t) @-> returning ullong) -let _CGPDFArrayGetDictionary = Foreign.foreign "CGPDFArrayGetDictionary" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFDictionary.t)) @-> returning bool) -let _CGPDFArrayGetInteger = Foreign.foreign "CGPDFArrayGetInteger" ((ptr CGPDFArray.t) @-> ullong @-> (ptr llong) @-> returning bool) -let _CGPDFArrayGetName = Foreign.foreign "CGPDFArrayGetName" ((ptr CGPDFArray.t) @-> ullong @-> (ptr string) @-> returning bool) -let _CGPDFArrayGetNull = Foreign.foreign "CGPDFArrayGetNull" ((ptr CGPDFArray.t) @-> ullong @-> returning bool) -let _CGPDFArrayGetNumber = Foreign.foreign "CGPDFArrayGetNumber" ((ptr CGPDFArray.t) @-> ullong @-> (ptr double) @-> returning bool) -let _CGPDFArrayGetObject = Foreign.foreign "CGPDFArrayGetObject" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFObject.t)) @-> returning bool) -let _CGPDFArrayGetStream = Foreign.foreign "CGPDFArrayGetStream" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFStream.t)) @-> returning bool) -let _CGPDFArrayGetString = Foreign.foreign "CGPDFArrayGetString" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFString.t)) @-> returning bool) -let _CGPDFContentStreamCreateWithPage = Foreign.foreign "CGPDFContentStreamCreateWithPage" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFContentStream.t)) -let _CGPDFContentStreamCreateWithStream = Foreign.foreign "CGPDFContentStreamCreateWithStream" ((ptr CGPDFStream.t) @-> (ptr CGPDFDictionary.t) @-> (ptr CGPDFContentStream.t) @-> returning (ptr CGPDFContentStream.t)) -let _CGPDFContentStreamGetResource = Foreign.foreign "CGPDFContentStreamGetResource" ((ptr CGPDFContentStream.t) @-> string @-> string @-> returning (ptr CGPDFObject.t)) -let _CGPDFContentStreamGetStreams = Foreign.foreign "CGPDFContentStreamGetStreams" ((ptr CGPDFContentStream.t) @-> returning (ptr CFArray.t)) -let _CGPDFContentStreamRelease = Foreign.foreign "CGPDFContentStreamRelease" ((ptr CGPDFContentStream.t) @-> returning void) -let _CGPDFContentStreamRetain = Foreign.foreign "CGPDFContentStreamRetain" ((ptr CGPDFContentStream.t) @-> returning (ptr CGPDFContentStream.t)) -let _CGPDFContextAddDestinationAtPoint = Foreign.foreign "CGPDFContextAddDestinationAtPoint" ((ptr CGContext.t) @-> (ptr CFString.t) @-> CGPoint.t @-> returning void) -let _CGPDFContextAddDocumentMetadata = Foreign.foreign "CGPDFContextAddDocumentMetadata" ((ptr CGContext.t) @-> (ptr CFData.t) @-> returning void) -let _CGPDFContextBeginPage = Foreign.foreign "CGPDFContextBeginPage" ((ptr CGContext.t) @-> (ptr CFDictionary.t) @-> returning void) -let _CGPDFContextBeginTag = Foreign.foreign "CGPDFContextBeginTag" ((ptr CGContext.t) @-> int @-> (ptr CFDictionary.t) @-> returning void) -let _CGPDFContextClose = Foreign.foreign "CGPDFContextClose" ((ptr CGContext.t) @-> returning void) -let _CGPDFContextCreate = Foreign.foreign "CGPDFContextCreate" ((ptr CGDataConsumer.t) @-> (ptr CGRect.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGContext.t)) -let _CGPDFContextCreateWithURL = Foreign.foreign "CGPDFContextCreateWithURL" ((ptr CFURL.t) @-> (ptr CGRect.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGContext.t)) -let _CGPDFContextEndPage = Foreign.foreign "CGPDFContextEndPage" ((ptr CGContext.t) @-> returning void) -let _CGPDFContextEndTag = Foreign.foreign "CGPDFContextEndTag" ((ptr CGContext.t) @-> returning void) -let _CGPDFContextSetDestinationForRect = Foreign.foreign "CGPDFContextSetDestinationForRect" ((ptr CGContext.t) @-> (ptr CFString.t) @-> CGRect.t @-> returning void) -let _CGPDFContextSetOutline = Foreign.foreign "CGPDFContextSetOutline" ((ptr CGContext.t) @-> (ptr CFDictionary.t) @-> returning void) -let _CGPDFContextSetURLForRect = Foreign.foreign "CGPDFContextSetURLForRect" ((ptr CGContext.t) @-> (ptr CFURL.t) @-> CGRect.t @-> returning void) -let _CGPDFDictionaryApplyBlock = Foreign.foreign "CGPDFDictionaryApplyBlock" ((ptr CGPDFDictionary.t) @-> Foreign.funptr (string @-> (ptr CGPDFObject.t) @-> (ptr void) @-> returning bool) @-> (ptr void) @-> returning void) -let _CGPDFDictionaryApplyFunction = Foreign.foreign "CGPDFDictionaryApplyFunction" ((ptr CGPDFDictionary.t) @-> Foreign.funptr (string @-> (ptr CGPDFObject.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CGPDFDictionaryGetArray = Foreign.foreign "CGPDFDictionaryGetArray" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFArray.t)) @-> returning bool) -let _CGPDFDictionaryGetBoolean = Foreign.foreign "CGPDFDictionaryGetBoolean" ((ptr CGPDFDictionary.t) @-> string @-> string @-> returning bool) -let _CGPDFDictionaryGetCount = Foreign.foreign "CGPDFDictionaryGetCount" ((ptr CGPDFDictionary.t) @-> returning ullong) -let _CGPDFDictionaryGetDictionary = Foreign.foreign "CGPDFDictionaryGetDictionary" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFDictionary.t)) @-> returning bool) -let _CGPDFDictionaryGetInteger = Foreign.foreign "CGPDFDictionaryGetInteger" ((ptr CGPDFDictionary.t) @-> string @-> (ptr llong) @-> returning bool) -let _CGPDFDictionaryGetName = Foreign.foreign "CGPDFDictionaryGetName" ((ptr CGPDFDictionary.t) @-> string @-> (ptr string) @-> returning bool) -let _CGPDFDictionaryGetNumber = Foreign.foreign "CGPDFDictionaryGetNumber" ((ptr CGPDFDictionary.t) @-> string @-> (ptr double) @-> returning bool) -let _CGPDFDictionaryGetObject = Foreign.foreign "CGPDFDictionaryGetObject" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFObject.t)) @-> returning bool) -let _CGPDFDictionaryGetStream = Foreign.foreign "CGPDFDictionaryGetStream" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFStream.t)) @-> returning bool) -let _CGPDFDictionaryGetString = Foreign.foreign "CGPDFDictionaryGetString" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFString.t)) @-> returning bool) -let _CGPDFDocumentAllowsCopying = Foreign.foreign "CGPDFDocumentAllowsCopying" ((ptr CGPDFDocument.t) @-> returning bool) -let _CGPDFDocumentAllowsPrinting = Foreign.foreign "CGPDFDocumentAllowsPrinting" ((ptr CGPDFDocument.t) @-> returning bool) -let _CGPDFDocumentCreateWithProvider = Foreign.foreign "CGPDFDocumentCreateWithProvider" ((ptr CGDataProvider.t) @-> returning (ptr CGPDFDocument.t)) -let _CGPDFDocumentCreateWithURL = Foreign.foreign "CGPDFDocumentCreateWithURL" ((ptr CFURL.t) @-> returning (ptr CGPDFDocument.t)) -let _CGPDFDocumentGetAccessPermissions = Foreign.foreign "CGPDFDocumentGetAccessPermissions" ((ptr CGPDFDocument.t) @-> returning uint) -let _CGPDFDocumentGetArtBox = Foreign.foreign "CGPDFDocumentGetArtBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) -let _CGPDFDocumentGetBleedBox = Foreign.foreign "CGPDFDocumentGetBleedBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) -let _CGPDFDocumentGetCatalog = Foreign.foreign "CGPDFDocumentGetCatalog" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFDictionary.t)) -let _CGPDFDocumentGetCropBox = Foreign.foreign "CGPDFDocumentGetCropBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) -let _CGPDFDocumentGetID = Foreign.foreign "CGPDFDocumentGetID" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFArray.t)) -let _CGPDFDocumentGetInfo = Foreign.foreign "CGPDFDocumentGetInfo" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFDictionary.t)) -let _CGPDFDocumentGetMediaBox = Foreign.foreign "CGPDFDocumentGetMediaBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) -let _CGPDFDocumentGetNumberOfPages = Foreign.foreign "CGPDFDocumentGetNumberOfPages" ((ptr CGPDFDocument.t) @-> returning ullong) -let _CGPDFDocumentGetOutline = Foreign.foreign "CGPDFDocumentGetOutline" ((ptr CGPDFDocument.t) @-> returning (ptr CFDictionary.t)) -let _CGPDFDocumentGetPage = Foreign.foreign "CGPDFDocumentGetPage" ((ptr CGPDFDocument.t) @-> ullong @-> returning (ptr CGPDFPage.t)) -let _CGPDFDocumentGetRotationAngle = Foreign.foreign "CGPDFDocumentGetRotationAngle" ((ptr CGPDFDocument.t) @-> int @-> returning int) -let _CGPDFDocumentGetTrimBox = Foreign.foreign "CGPDFDocumentGetTrimBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) -let _CGPDFDocumentGetTypeID = Foreign.foreign "CGPDFDocumentGetTypeID" (void @-> returning ullong) -let _CGPDFDocumentGetVersion = Foreign.foreign "CGPDFDocumentGetVersion" ((ptr CGPDFDocument.t) @-> (ptr int) @-> (ptr int) @-> returning void) -let _CGPDFDocumentIsEncrypted = Foreign.foreign "CGPDFDocumentIsEncrypted" ((ptr CGPDFDocument.t) @-> returning bool) -let _CGPDFDocumentIsUnlocked = Foreign.foreign "CGPDFDocumentIsUnlocked" ((ptr CGPDFDocument.t) @-> returning bool) -let _CGPDFDocumentRelease = Foreign.foreign "CGPDFDocumentRelease" ((ptr CGPDFDocument.t) @-> returning void) -let _CGPDFDocumentRetain = Foreign.foreign "CGPDFDocumentRetain" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFDocument.t)) -let _CGPDFDocumentUnlockWithPassword = Foreign.foreign "CGPDFDocumentUnlockWithPassword" ((ptr CGPDFDocument.t) @-> string @-> returning bool) -let _CGPDFObjectGetType = Foreign.foreign "CGPDFObjectGetType" ((ptr CGPDFObject.t) @-> returning int) -let _CGPDFObjectGetValue = Foreign.foreign "CGPDFObjectGetValue" ((ptr CGPDFObject.t) @-> int @-> (ptr void) @-> returning bool) -let _CGPDFOperatorTableCreate = Foreign.foreign "CGPDFOperatorTableCreate" (void @-> returning (ptr CGPDFOperatorTable.t)) -let _CGPDFOperatorTableRelease = Foreign.foreign "CGPDFOperatorTableRelease" ((ptr CGPDFOperatorTable.t) @-> returning void) -let _CGPDFOperatorTableRetain = Foreign.foreign "CGPDFOperatorTableRetain" ((ptr CGPDFOperatorTable.t) @-> returning (ptr CGPDFOperatorTable.t)) -let _CGPDFOperatorTableSetCallback = Foreign.foreign "CGPDFOperatorTableSetCallback" ((ptr CGPDFOperatorTable.t) @-> string @-> Foreign.funptr ((ptr CGPDFScanner.t) @-> (ptr void) @-> returning void) @-> returning void) -let _CGPDFPageGetBoxRect = Foreign.foreign "CGPDFPageGetBoxRect" ((ptr CGPDFPage.t) @-> int @-> returning CGRect.t) -let _CGPDFPageGetDictionary = Foreign.foreign "CGPDFPageGetDictionary" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFDictionary.t)) -let _CGPDFPageGetDocument = Foreign.foreign "CGPDFPageGetDocument" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFDocument.t)) -let _CGPDFPageGetDrawingTransform = Foreign.foreign "CGPDFPageGetDrawingTransform" ((ptr CGPDFPage.t) @-> int @-> CGRect.t @-> int @-> bool @-> returning CGAffineTransform.t) -let _CGPDFPageGetPageNumber = Foreign.foreign "CGPDFPageGetPageNumber" ((ptr CGPDFPage.t) @-> returning ullong) -let _CGPDFPageGetRotationAngle = Foreign.foreign "CGPDFPageGetRotationAngle" ((ptr CGPDFPage.t) @-> returning int) -let _CGPDFPageGetTypeID = Foreign.foreign "CGPDFPageGetTypeID" (void @-> returning ullong) -let _CGPDFPageRelease = Foreign.foreign "CGPDFPageRelease" ((ptr CGPDFPage.t) @-> returning void) -let _CGPDFPageRetain = Foreign.foreign "CGPDFPageRetain" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFPage.t)) -let _CGPDFScannerCreate = Foreign.foreign "CGPDFScannerCreate" ((ptr CGPDFContentStream.t) @-> (ptr CGPDFOperatorTable.t) @-> (ptr void) @-> returning (ptr CGPDFScanner.t)) -let _CGPDFScannerGetContentStream = Foreign.foreign "CGPDFScannerGetContentStream" ((ptr CGPDFScanner.t) @-> returning (ptr CGPDFContentStream.t)) -let _CGPDFScannerPopArray = Foreign.foreign "CGPDFScannerPopArray" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFArray.t)) @-> returning bool) -let _CGPDFScannerPopBoolean = Foreign.foreign "CGPDFScannerPopBoolean" ((ptr CGPDFScanner.t) @-> string @-> returning bool) -let _CGPDFScannerPopDictionary = Foreign.foreign "CGPDFScannerPopDictionary" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFDictionary.t)) @-> returning bool) -let _CGPDFScannerPopInteger = Foreign.foreign "CGPDFScannerPopInteger" ((ptr CGPDFScanner.t) @-> (ptr llong) @-> returning bool) -let _CGPDFScannerPopName = Foreign.foreign "CGPDFScannerPopName" ((ptr CGPDFScanner.t) @-> (ptr string) @-> returning bool) -let _CGPDFScannerPopNumber = Foreign.foreign "CGPDFScannerPopNumber" ((ptr CGPDFScanner.t) @-> (ptr double) @-> returning bool) -let _CGPDFScannerPopObject = Foreign.foreign "CGPDFScannerPopObject" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFObject.t)) @-> returning bool) -let _CGPDFScannerPopStream = Foreign.foreign "CGPDFScannerPopStream" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFStream.t)) @-> returning bool) -let _CGPDFScannerPopString = Foreign.foreign "CGPDFScannerPopString" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFString.t)) @-> returning bool) -let _CGPDFScannerRelease = Foreign.foreign "CGPDFScannerRelease" ((ptr CGPDFScanner.t) @-> returning void) -let _CGPDFScannerRetain = Foreign.foreign "CGPDFScannerRetain" ((ptr CGPDFScanner.t) @-> returning (ptr CGPDFScanner.t)) -let _CGPDFScannerScan = Foreign.foreign "CGPDFScannerScan" ((ptr CGPDFScanner.t) @-> returning bool) -let _CGPDFStreamCopyData = Foreign.foreign "CGPDFStreamCopyData" ((ptr CGPDFStream.t) @-> (ptr int) @-> returning (ptr CFData.t)) -let _CGPDFStreamGetDictionary = Foreign.foreign "CGPDFStreamGetDictionary" ((ptr CGPDFStream.t) @-> returning (ptr CGPDFDictionary.t)) -let _CGPDFStringCopyDate = Foreign.foreign "CGPDFStringCopyDate" ((ptr CGPDFString.t) @-> returning (ptr CFDate.t)) -let _CGPDFStringCopyTextString = Foreign.foreign "CGPDFStringCopyTextString" ((ptr CGPDFString.t) @-> returning (ptr CFString.t)) -let _CGPDFStringGetBytePtr = Foreign.foreign "CGPDFStringGetBytePtr" ((ptr CGPDFString.t) @-> returning string) -let _CGPDFStringGetLength = Foreign.foreign "CGPDFStringGetLength" ((ptr CGPDFString.t) @-> returning ullong) -let _CGPDFTagTypeGetName = Foreign.foreign "CGPDFTagTypeGetName" (int @-> returning string) -let _CGPSConverterAbort = Foreign.foreign "CGPSConverterAbort" ((ptr CGPSConverter.t) @-> returning bool) -let _CGPSConverterConvert = Foreign.foreign "CGPSConverterConvert" ((ptr CGPSConverter.t) @-> (ptr CGDataProvider.t) @-> (ptr CGDataConsumer.t) @-> (ptr CFDictionary.t) @-> returning bool) -let _CGPSConverterCreate = Foreign.foreign "CGPSConverterCreate" ((ptr void) @-> (ptr CGPSConverterCallbacks.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGPSConverter.t)) -let _CGPSConverterGetTypeID = Foreign.foreign "CGPSConverterGetTypeID" (void @-> returning ullong) -let _CGPSConverterIsConverting = Foreign.foreign "CGPSConverterIsConverting" ((ptr CGPSConverter.t) @-> returning bool) -let _CGPathAddArc = Foreign.foreign "CGPathAddArc" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> bool @-> returning void) -let _CGPathAddArcToPoint = Foreign.foreign "CGPathAddArcToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) -let _CGPathAddCurveToPoint = Foreign.foreign "CGPathAddCurveToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> double @-> returning void) -let _CGPathAddEllipseInRect = Foreign.foreign "CGPathAddEllipseInRect" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGRect.t @-> returning void) -let _CGPathAddLineToPoint = Foreign.foreign "CGPathAddLineToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> returning void) -let _CGPathAddLines = Foreign.foreign "CGPathAddLines" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> (ptr CGPoint.t) @-> ullong @-> returning void) -let _CGPathAddPath = Foreign.foreign "CGPathAddPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> (ptr CGPath.t) @-> returning void) -let _CGPathAddQuadCurveToPoint = Foreign.foreign "CGPathAddQuadCurveToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> returning void) -let _CGPathAddRect = Foreign.foreign "CGPathAddRect" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGRect.t @-> returning void) -let _CGPathAddRects = Foreign.foreign "CGPathAddRects" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) -let _CGPathAddRelativeArc = Foreign.foreign "CGPathAddRelativeArc" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) -let _CGPathAddRoundedRect = Foreign.foreign "CGPathAddRoundedRect" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGRect.t @-> double @-> double @-> returning void) -let _CGPathApply = Foreign.foreign "CGPathApply" ((ptr CGPath.t) @-> (ptr void) @-> Foreign.funptr ((ptr void) @-> (ptr CGPathElement.t) @-> returning void) @-> returning void) -let _CGPathApplyWithBlock = Foreign.foreign "CGPathApplyWithBlock" ((ptr CGPath.t) @-> Foreign.funptr ((ptr CGPathElement.t) @-> returning void) @-> returning void) -let _CGPathCloseSubpath = Foreign.foreign "CGPathCloseSubpath" ((ptr CGPath.t) @-> returning void) -let _CGPathContainsPoint = Foreign.foreign "CGPathContainsPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGPoint.t @-> bool @-> returning bool) -let _CGPathCreateCopy = Foreign.foreign "CGPathCreateCopy" ((ptr CGPath.t) @-> returning (ptr CGPath.t)) -let _CGPathCreateCopyByDashingPath = Foreign.foreign "CGPathCreateCopyByDashingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> (ptr double) @-> ullong @-> returning (ptr CGPath.t)) -let _CGPathCreateCopyByStrokingPath = Foreign.foreign "CGPathCreateCopyByStrokingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> int @-> int @-> double @-> returning (ptr CGPath.t)) -let _CGPathCreateCopyByTransformingPath = Foreign.foreign "CGPathCreateCopyByTransformingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) -let _CGPathCreateMutable = Foreign.foreign "CGPathCreateMutable" (void @-> returning (ptr CGPath.t)) -let _CGPathCreateMutableCopy = Foreign.foreign "CGPathCreateMutableCopy" ((ptr CGPath.t) @-> returning (ptr CGPath.t)) -let _CGPathCreateMutableCopyByTransformingPath = Foreign.foreign "CGPathCreateMutableCopyByTransformingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) -let _CGPathCreateWithEllipseInRect = Foreign.foreign "CGPathCreateWithEllipseInRect" (CGRect.t @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) -let _CGPathCreateWithRect = Foreign.foreign "CGPathCreateWithRect" (CGRect.t @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) -let _CGPathCreateWithRoundedRect = Foreign.foreign "CGPathCreateWithRoundedRect" (CGRect.t @-> double @-> double @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) -let _CGPathEqualToPath = Foreign.foreign "CGPathEqualToPath" ((ptr CGPath.t) @-> (ptr CGPath.t) @-> returning bool) -let _CGPathGetBoundingBox = Foreign.foreign "CGPathGetBoundingBox" ((ptr CGPath.t) @-> returning CGRect.t) -let _CGPathGetCurrentPoint = Foreign.foreign "CGPathGetCurrentPoint" ((ptr CGPath.t) @-> returning CGPoint.t) -let _CGPathGetPathBoundingBox = Foreign.foreign "CGPathGetPathBoundingBox" ((ptr CGPath.t) @-> returning CGRect.t) -let _CGPathGetTypeID = Foreign.foreign "CGPathGetTypeID" (void @-> returning ullong) -let _CGPathIsEmpty = Foreign.foreign "CGPathIsEmpty" ((ptr CGPath.t) @-> returning bool) -let _CGPathIsRect = Foreign.foreign "CGPathIsRect" ((ptr CGPath.t) @-> (ptr CGRect.t) @-> returning bool) -let _CGPathMoveToPoint = Foreign.foreign "CGPathMoveToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> returning void) -let _CGPathRelease = Foreign.foreign "CGPathRelease" ((ptr CGPath.t) @-> returning void) -let _CGPathRetain = Foreign.foreign "CGPathRetain" ((ptr CGPath.t) @-> returning (ptr CGPath.t)) -let _CGPatternCreate = Foreign.foreign "CGPatternCreate" ((ptr void) @-> CGRect.t @-> CGAffineTransform.t @-> double @-> double @-> int @-> bool @-> (ptr CGPatternCallbacks.t) @-> returning (ptr CGPattern.t)) -let _CGPatternGetTypeID = Foreign.foreign "CGPatternGetTypeID" (void @-> returning ullong) -let _CGPatternRelease = Foreign.foreign "CGPatternRelease" ((ptr CGPattern.t) @-> returning void) -let _CGPatternRetain = Foreign.foreign "CGPatternRetain" ((ptr CGPattern.t) @-> returning (ptr CGPattern.t)) -let _CGPointApplyAffineTransform = Foreign.foreign "CGPointApplyAffineTransform" (CGPoint.t @-> CGAffineTransform.t @-> returning CGPoint.t) -let _CGPointCreateDictionaryRepresentation = Foreign.foreign "CGPointCreateDictionaryRepresentation" (CGPoint.t @-> returning (ptr CFDictionary.t)) -let _CGPointEqualToPoint = Foreign.foreign "CGPointEqualToPoint" (CGPoint.t @-> CGPoint.t @-> returning bool) +let _CGAcquireDisplayFadeReservation = Foreign.foreign ~stub:true "CGAcquireDisplayFadeReservation" (float @-> (ptr uint) @-> returning int) +let _CGAffineTransformConcat = Foreign.foreign ~stub:true "CGAffineTransformConcat" (CGAffineTransform.t @-> CGAffineTransform.t @-> returning CGAffineTransform.t) +let _CGAffineTransformEqualToTransform = Foreign.foreign ~stub:true "CGAffineTransformEqualToTransform" (CGAffineTransform.t @-> CGAffineTransform.t @-> returning bool) +let _CGAffineTransformInvert = Foreign.foreign ~stub:true "CGAffineTransformInvert" (CGAffineTransform.t @-> returning CGAffineTransform.t) +let _CGAffineTransformIsIdentity = Foreign.foreign ~stub:true "CGAffineTransformIsIdentity" (CGAffineTransform.t @-> returning bool) +let _CGAffineTransformMake = Foreign.foreign ~stub:true "CGAffineTransformMake" (double @-> double @-> double @-> double @-> double @-> double @-> returning CGAffineTransform.t) +let _CGAffineTransformMakeRotation = Foreign.foreign ~stub:true "CGAffineTransformMakeRotation" (double @-> returning CGAffineTransform.t) +let _CGAffineTransformMakeScale = Foreign.foreign ~stub:true "CGAffineTransformMakeScale" (double @-> double @-> returning CGAffineTransform.t) +let _CGAffineTransformMakeTranslation = Foreign.foreign ~stub:true "CGAffineTransformMakeTranslation" (double @-> double @-> returning CGAffineTransform.t) +let _CGAffineTransformRotate = Foreign.foreign ~stub:true "CGAffineTransformRotate" (CGAffineTransform.t @-> double @-> returning CGAffineTransform.t) +let _CGAffineTransformScale = Foreign.foreign ~stub:true "CGAffineTransformScale" (CGAffineTransform.t @-> double @-> double @-> returning CGAffineTransform.t) +let _CGAffineTransformTranslate = Foreign.foreign ~stub:true "CGAffineTransformTranslate" (CGAffineTransform.t @-> double @-> double @-> returning CGAffineTransform.t) +let _CGAssociateMouseAndMouseCursorPosition = Foreign.foreign ~stub:true "CGAssociateMouseAndMouseCursorPosition" (uint @-> returning int) +let _CGBeginDisplayConfiguration = Foreign.foreign ~stub:true "CGBeginDisplayConfiguration" ((ptr (ptr CGDisplayConfigRef.t)) @-> returning int) +let _CGBitmapContextCreate = Foreign.foreign ~stub:true "CGBitmapContextCreate" ((ptr void) @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGColorSpace.t) @-> uint @-> returning (ptr CGContext.t)) +let _CGBitmapContextCreateImage = Foreign.foreign ~stub:true "CGBitmapContextCreateImage" ((ptr CGContext.t) @-> returning (ptr CGImage.t)) +let _CGBitmapContextCreateWithData = Foreign.foreign ~stub:true "CGBitmapContextCreateWithData" ((ptr void) @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGColorSpace.t) @-> uint @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning (ptr CGContext.t)) +let _CGBitmapContextGetAlphaInfo = Foreign.foreign ~stub:true "CGBitmapContextGetAlphaInfo" ((ptr CGContext.t) @-> returning uint) +let _CGBitmapContextGetBitmapInfo = Foreign.foreign ~stub:true "CGBitmapContextGetBitmapInfo" ((ptr CGContext.t) @-> returning uint) +let _CGBitmapContextGetBitsPerComponent = Foreign.foreign ~stub:true "CGBitmapContextGetBitsPerComponent" ((ptr CGContext.t) @-> returning ullong) +let _CGBitmapContextGetBitsPerPixel = Foreign.foreign ~stub:true "CGBitmapContextGetBitsPerPixel" ((ptr CGContext.t) @-> returning ullong) +let _CGBitmapContextGetBytesPerRow = Foreign.foreign ~stub:true "CGBitmapContextGetBytesPerRow" ((ptr CGContext.t) @-> returning ullong) +let _CGBitmapContextGetColorSpace = Foreign.foreign ~stub:true "CGBitmapContextGetColorSpace" ((ptr CGContext.t) @-> returning (ptr CGColorSpace.t)) +let _CGBitmapContextGetData = Foreign.foreign ~stub:true "CGBitmapContextGetData" ((ptr CGContext.t) @-> returning (ptr void)) +let _CGBitmapContextGetHeight = Foreign.foreign ~stub:true "CGBitmapContextGetHeight" ((ptr CGContext.t) @-> returning ullong) +let _CGBitmapContextGetWidth = Foreign.foreign ~stub:true "CGBitmapContextGetWidth" ((ptr CGContext.t) @-> returning ullong) +let _CGCancelDisplayConfiguration = Foreign.foreign ~stub:true "CGCancelDisplayConfiguration" ((ptr CGDisplayConfigRef.t) @-> returning int) +let _CGCaptureAllDisplays = Foreign.foreign ~stub:true "CGCaptureAllDisplays" (void @-> returning int) +let _CGCaptureAllDisplaysWithOptions = Foreign.foreign ~stub:true "CGCaptureAllDisplaysWithOptions" (uint @-> returning int) +let _CGColorConversionInfoCreate = Foreign.foreign ~stub:true "CGColorConversionInfoCreate" ((ptr CGColorSpace.t) @-> (ptr CGColorSpace.t) @-> returning (ptr CGColorConversionInfo.t)) +let _CGColorConversionInfoCreateFromList = Foreign.foreign ~stub:true "CGColorConversionInfoCreateFromList" ((ptr CFDictionary.t) @-> (ptr CGColorSpace.t) @-> uint @-> int @-> returning (ptr CGColorConversionInfo.t)) +let _CGColorConversionInfoCreateFromListWithArguments = Foreign.foreign ~stub:true "CGColorConversionInfoCreateFromListWithArguments" ((ptr CFDictionary.t) @-> (ptr CGColorSpace.t) @-> uint @-> int @-> (ptr void) @-> returning (ptr CGColorConversionInfo.t)) +let _CGColorConversionInfoCreateWithOptions = Foreign.foreign ~stub:true "CGColorConversionInfoCreateWithOptions" ((ptr CGColorSpace.t) @-> (ptr CGColorSpace.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGColorConversionInfo.t)) +let _CGColorConversionInfoGetTypeID = Foreign.foreign ~stub:true "CGColorConversionInfoGetTypeID" (void @-> returning ullong) +let _CGColorCreate = Foreign.foreign ~stub:true "CGColorCreate" ((ptr CGColorSpace.t) @-> (ptr double) @-> returning (ptr CGColor.t)) +let _CGColorCreateCopy = Foreign.foreign ~stub:true "CGColorCreateCopy" ((ptr CGColor.t) @-> returning (ptr CGColor.t)) +let _CGColorCreateCopyByMatchingToColorSpace = Foreign.foreign ~stub:true "CGColorCreateCopyByMatchingToColorSpace" ((ptr CGColorSpace.t) @-> int @-> (ptr CGColor.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGColor.t)) +let _CGColorCreateCopyWithAlpha = Foreign.foreign ~stub:true "CGColorCreateCopyWithAlpha" ((ptr CGColor.t) @-> double @-> returning (ptr CGColor.t)) +let _CGColorCreateGenericCMYK = Foreign.foreign ~stub:true "CGColorCreateGenericCMYK" (double @-> double @-> double @-> double @-> double @-> returning (ptr CGColor.t)) +let _CGColorCreateGenericGray = Foreign.foreign ~stub:true "CGColorCreateGenericGray" (double @-> double @-> returning (ptr CGColor.t)) +let _CGColorCreateGenericGrayGamma2_2 = Foreign.foreign ~stub:true "CGColorCreateGenericGrayGamma2_2" (double @-> double @-> returning (ptr CGColor.t)) +let _CGColorCreateGenericRGB = Foreign.foreign ~stub:true "CGColorCreateGenericRGB" (double @-> double @-> double @-> double @-> returning (ptr CGColor.t)) +let _CGColorCreateSRGB = Foreign.foreign ~stub:true "CGColorCreateSRGB" (double @-> double @-> double @-> double @-> returning (ptr CGColor.t)) +let _CGColorCreateWithPattern = Foreign.foreign ~stub:true "CGColorCreateWithPattern" ((ptr CGColorSpace.t) @-> (ptr CGPattern.t) @-> (ptr double) @-> returning (ptr CGColor.t)) +let _CGColorEqualToColor = Foreign.foreign ~stub:true "CGColorEqualToColor" ((ptr CGColor.t) @-> (ptr CGColor.t) @-> returning bool) +let _CGColorGetAlpha = Foreign.foreign ~stub:true "CGColorGetAlpha" ((ptr CGColor.t) @-> returning double) +let _CGColorGetColorSpace = Foreign.foreign ~stub:true "CGColorGetColorSpace" ((ptr CGColor.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorGetComponents = Foreign.foreign ~stub:true "CGColorGetComponents" ((ptr CGColor.t) @-> returning (ptr double)) +let _CGColorGetConstantColor = Foreign.foreign ~stub:true "CGColorGetConstantColor" ((ptr CFString.t) @-> returning (ptr CGColor.t)) +let _CGColorGetNumberOfComponents = Foreign.foreign ~stub:true "CGColorGetNumberOfComponents" ((ptr CGColor.t) @-> returning ullong) +let _CGColorGetPattern = Foreign.foreign ~stub:true "CGColorGetPattern" ((ptr CGColor.t) @-> returning (ptr CGPattern.t)) +let _CGColorGetTypeID = Foreign.foreign ~stub:true "CGColorGetTypeID" (void @-> returning ullong) +let _CGColorRelease = Foreign.foreign ~stub:true "CGColorRelease" ((ptr CGColor.t) @-> returning void) +let _CGColorRetain = Foreign.foreign ~stub:true "CGColorRetain" ((ptr CGColor.t) @-> returning (ptr CGColor.t)) +let _CGColorSpaceCopyICCData = Foreign.foreign ~stub:true "CGColorSpaceCopyICCData" ((ptr CGColorSpace.t) @-> returning (ptr CFData.t)) +let _CGColorSpaceCopyICCProfile = Foreign.foreign ~stub:true "CGColorSpaceCopyICCProfile" ((ptr CGColorSpace.t) @-> returning (ptr CFData.t)) +let _CGColorSpaceCopyName = Foreign.foreign ~stub:true "CGColorSpaceCopyName" ((ptr CGColorSpace.t) @-> returning (ptr CFString.t)) +let _CGColorSpaceCopyPropertyList = Foreign.foreign ~stub:true "CGColorSpaceCopyPropertyList" ((ptr CGColorSpace.t) @-> returning (ptr void)) +let _CGColorSpaceCreateCalibratedGray = Foreign.foreign ~stub:true "CGColorSpaceCreateCalibratedGray" ((ptr double) @-> (ptr double) @-> double @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateCalibratedRGB = Foreign.foreign ~stub:true "CGColorSpaceCreateCalibratedRGB" ((ptr double) @-> (ptr double) @-> (ptr double) @-> (ptr double) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateDeviceCMYK = Foreign.foreign ~stub:true "CGColorSpaceCreateDeviceCMYK" (void @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateDeviceGray = Foreign.foreign ~stub:true "CGColorSpaceCreateDeviceGray" (void @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateDeviceRGB = Foreign.foreign ~stub:true "CGColorSpaceCreateDeviceRGB" (void @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateExtended = Foreign.foreign ~stub:true "CGColorSpaceCreateExtended" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateExtendedLinearized = Foreign.foreign ~stub:true "CGColorSpaceCreateExtendedLinearized" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateICCBased = Foreign.foreign ~stub:true "CGColorSpaceCreateICCBased" (ullong @-> (ptr double) @-> (ptr CGDataProvider.t) @-> (ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateIndexed = Foreign.foreign ~stub:true "CGColorSpaceCreateIndexed" ((ptr CGColorSpace.t) @-> ullong @-> string @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateLab = Foreign.foreign ~stub:true "CGColorSpaceCreateLab" ((ptr double) @-> (ptr double) @-> (ptr double) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateLinearized = Foreign.foreign ~stub:true "CGColorSpaceCreateLinearized" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreatePattern = Foreign.foreign ~stub:true "CGColorSpaceCreatePattern" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateWithColorSyncProfile = Foreign.foreign ~stub:true "CGColorSpaceCreateWithColorSyncProfile" ((ptr ColorSyncProfile.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateWithICCData = Foreign.foreign ~stub:true "CGColorSpaceCreateWithICCData" (id @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateWithICCProfile = Foreign.foreign ~stub:true "CGColorSpaceCreateWithICCProfile" ((ptr CFData.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateWithName = Foreign.foreign ~stub:true "CGColorSpaceCreateWithName" ((ptr CFString.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateWithPlatformColorSpace = Foreign.foreign ~stub:true "CGColorSpaceCreateWithPlatformColorSpace" (int @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceCreateWithPropertyList = Foreign.foreign ~stub:true "CGColorSpaceCreateWithPropertyList" ((ptr void) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceGetBaseColorSpace = Foreign.foreign ~stub:true "CGColorSpaceGetBaseColorSpace" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceGetColorTable = Foreign.foreign ~stub:true "CGColorSpaceGetColorTable" ((ptr CGColorSpace.t) @-> string @-> returning void) +let _CGColorSpaceGetColorTableCount = Foreign.foreign ~stub:true "CGColorSpaceGetColorTableCount" ((ptr CGColorSpace.t) @-> returning ullong) +let _CGColorSpaceGetModel = Foreign.foreign ~stub:true "CGColorSpaceGetModel" ((ptr CGColorSpace.t) @-> returning int) +let _CGColorSpaceGetName = Foreign.foreign ~stub:true "CGColorSpaceGetName" ((ptr CGColorSpace.t) @-> returning (ptr CFString.t)) +let _CGColorSpaceGetNumberOfComponents = Foreign.foreign ~stub:true "CGColorSpaceGetNumberOfComponents" ((ptr CGColorSpace.t) @-> returning ullong) +let _CGColorSpaceGetTypeID = Foreign.foreign ~stub:true "CGColorSpaceGetTypeID" (void @-> returning ullong) +let _CGColorSpaceIsHDR = Foreign.foreign ~stub:true "CGColorSpaceIsHDR" ((ptr CGColorSpace.t) @-> returning bool) +let _CGColorSpaceIsHLGBased = Foreign.foreign ~stub:true "CGColorSpaceIsHLGBased" ((ptr CGColorSpace.t) @-> returning bool) +let _CGColorSpaceIsPQBased = Foreign.foreign ~stub:true "CGColorSpaceIsPQBased" ((ptr CGColorSpace.t) @-> returning bool) +let _CGColorSpaceIsWideGamutRGB = Foreign.foreign ~stub:true "CGColorSpaceIsWideGamutRGB" ((ptr CGColorSpace.t) @-> returning bool) +let _CGColorSpaceRelease = Foreign.foreign ~stub:true "CGColorSpaceRelease" ((ptr CGColorSpace.t) @-> returning void) +let _CGColorSpaceRetain = Foreign.foreign ~stub:true "CGColorSpaceRetain" ((ptr CGColorSpace.t) @-> returning (ptr CGColorSpace.t)) +let _CGColorSpaceSupportsOutput = Foreign.foreign ~stub:true "CGColorSpaceSupportsOutput" ((ptr CGColorSpace.t) @-> returning bool) +let _CGColorSpaceUsesExtendedRange = Foreign.foreign ~stub:true "CGColorSpaceUsesExtendedRange" ((ptr CGColorSpace.t) @-> returning bool) +let _CGColorSpaceUsesITUR_2100TF = Foreign.foreign ~stub:true "CGColorSpaceUsesITUR_2100TF" ((ptr CGColorSpace.t) @-> returning bool) +let _CGCompleteDisplayConfiguration = Foreign.foreign ~stub:true "CGCompleteDisplayConfiguration" ((ptr CGDisplayConfigRef.t) @-> uint @-> returning int) +let _CGConfigureDisplayFadeEffect = Foreign.foreign ~stub:true "CGConfigureDisplayFadeEffect" ((ptr CGDisplayConfigRef.t) @-> float @-> float @-> float @-> float @-> float @-> returning int) +let _CGConfigureDisplayMirrorOfDisplay = Foreign.foreign ~stub:true "CGConfigureDisplayMirrorOfDisplay" ((ptr CGDisplayConfigRef.t) @-> uint @-> uint @-> returning int) +let _CGConfigureDisplayMode = Foreign.foreign ~stub:true "CGConfigureDisplayMode" ((ptr CGDisplayConfigRef.t) @-> uint @-> (ptr CFDictionary.t) @-> returning int) +let _CGConfigureDisplayOrigin = Foreign.foreign ~stub:true "CGConfigureDisplayOrigin" ((ptr CGDisplayConfigRef.t) @-> uint @-> int @-> int @-> returning int) +let _CGConfigureDisplayStereoOperation = Foreign.foreign ~stub:true "CGConfigureDisplayStereoOperation" ((ptr CGDisplayConfigRef.t) @-> uint @-> uint @-> uint @-> returning int) +let _CGConfigureDisplayWithDisplayMode = Foreign.foreign ~stub:true "CGConfigureDisplayWithDisplayMode" ((ptr CGDisplayConfigRef.t) @-> uint @-> (ptr CGDisplayMode.t) @-> (ptr CFDictionary.t) @-> returning int) +let _CGContextAddArc = Foreign.foreign ~stub:true "CGContextAddArc" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> int @-> returning void) +let _CGContextAddArcToPoint = Foreign.foreign ~stub:true "CGContextAddArcToPoint" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) +let _CGContextAddCurveToPoint = Foreign.foreign ~stub:true "CGContextAddCurveToPoint" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> double @-> returning void) +let _CGContextAddEllipseInRect = Foreign.foreign ~stub:true "CGContextAddEllipseInRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextAddLineToPoint = Foreign.foreign ~stub:true "CGContextAddLineToPoint" ((ptr CGContext.t) @-> double @-> double @-> returning void) +let _CGContextAddLines = Foreign.foreign ~stub:true "CGContextAddLines" ((ptr CGContext.t) @-> (ptr CGPoint.t) @-> ullong @-> returning void) +let _CGContextAddPath = Foreign.foreign ~stub:true "CGContextAddPath" ((ptr CGContext.t) @-> (ptr CGPath.t) @-> returning void) +let _CGContextAddQuadCurveToPoint = Foreign.foreign ~stub:true "CGContextAddQuadCurveToPoint" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> returning void) +let _CGContextAddRect = Foreign.foreign ~stub:true "CGContextAddRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextAddRects = Foreign.foreign ~stub:true "CGContextAddRects" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) +let _CGContextBeginPage = Foreign.foreign ~stub:true "CGContextBeginPage" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> returning void) +let _CGContextBeginPath = Foreign.foreign ~stub:true "CGContextBeginPath" ((ptr CGContext.t) @-> returning void) +let _CGContextBeginTransparencyLayer = Foreign.foreign ~stub:true "CGContextBeginTransparencyLayer" ((ptr CGContext.t) @-> (ptr CFDictionary.t) @-> returning void) +let _CGContextBeginTransparencyLayerWithRect = Foreign.foreign ~stub:true "CGContextBeginTransparencyLayerWithRect" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CFDictionary.t) @-> returning void) +let _CGContextClearRect = Foreign.foreign ~stub:true "CGContextClearRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextClip = Foreign.foreign ~stub:true "CGContextClip" ((ptr CGContext.t) @-> returning void) +let _CGContextClipToMask = Foreign.foreign ~stub:true "CGContextClipToMask" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGImage.t) @-> returning void) +let _CGContextClipToRect = Foreign.foreign ~stub:true "CGContextClipToRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextClipToRects = Foreign.foreign ~stub:true "CGContextClipToRects" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) +let _CGContextClosePath = Foreign.foreign ~stub:true "CGContextClosePath" ((ptr CGContext.t) @-> returning void) +let _CGContextConcatCTM = Foreign.foreign ~stub:true "CGContextConcatCTM" ((ptr CGContext.t) @-> CGAffineTransform.t @-> returning void) +let _CGContextConvertPointToDeviceSpace = Foreign.foreign ~stub:true "CGContextConvertPointToDeviceSpace" ((ptr CGContext.t) @-> CGPoint.t @-> returning CGPoint.t) +let _CGContextConvertPointToUserSpace = Foreign.foreign ~stub:true "CGContextConvertPointToUserSpace" ((ptr CGContext.t) @-> CGPoint.t @-> returning CGPoint.t) +let _CGContextConvertRectToDeviceSpace = Foreign.foreign ~stub:true "CGContextConvertRectToDeviceSpace" ((ptr CGContext.t) @-> CGRect.t @-> returning CGRect.t) +let _CGContextConvertRectToUserSpace = Foreign.foreign ~stub:true "CGContextConvertRectToUserSpace" ((ptr CGContext.t) @-> CGRect.t @-> returning CGRect.t) +let _CGContextConvertSizeToDeviceSpace = Foreign.foreign ~stub:true "CGContextConvertSizeToDeviceSpace" ((ptr CGContext.t) @-> CGSize.t @-> returning CGSize.t) +let _CGContextConvertSizeToUserSpace = Foreign.foreign ~stub:true "CGContextConvertSizeToUserSpace" ((ptr CGContext.t) @-> CGSize.t @-> returning CGSize.t) +let _CGContextCopyPath = Foreign.foreign ~stub:true "CGContextCopyPath" ((ptr CGContext.t) @-> returning (ptr CGPath.t)) +let _CGContextDrawImage = Foreign.foreign ~stub:true "CGContextDrawImage" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGImage.t) @-> returning void) +let _CGContextDrawLayerAtPoint = Foreign.foreign ~stub:true "CGContextDrawLayerAtPoint" ((ptr CGContext.t) @-> CGPoint.t @-> (ptr CGLayer.t) @-> returning void) +let _CGContextDrawLayerInRect = Foreign.foreign ~stub:true "CGContextDrawLayerInRect" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGLayer.t) @-> returning void) +let _CGContextDrawLinearGradient = Foreign.foreign ~stub:true "CGContextDrawLinearGradient" ((ptr CGContext.t) @-> (ptr CGGradient.t) @-> CGPoint.t @-> CGPoint.t @-> uint @-> returning void) +let _CGContextDrawPDFDocument = Foreign.foreign ~stub:true "CGContextDrawPDFDocument" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGPDFDocument.t) @-> int @-> returning void) +let _CGContextDrawPDFPage = Foreign.foreign ~stub:true "CGContextDrawPDFPage" ((ptr CGContext.t) @-> (ptr CGPDFPage.t) @-> returning void) +let _CGContextDrawPath = Foreign.foreign ~stub:true "CGContextDrawPath" ((ptr CGContext.t) @-> int @-> returning void) +let _CGContextDrawRadialGradient = Foreign.foreign ~stub:true "CGContextDrawRadialGradient" ((ptr CGContext.t) @-> (ptr CGGradient.t) @-> CGPoint.t @-> double @-> CGPoint.t @-> double @-> uint @-> returning void) +let _CGContextDrawShading = Foreign.foreign ~stub:true "CGContextDrawShading" ((ptr CGContext.t) @-> (ptr CGShading.t) @-> returning void) +let _CGContextDrawTiledImage = Foreign.foreign ~stub:true "CGContextDrawTiledImage" ((ptr CGContext.t) @-> CGRect.t @-> (ptr CGImage.t) @-> returning void) +let _CGContextEOClip = Foreign.foreign ~stub:true "CGContextEOClip" ((ptr CGContext.t) @-> returning void) +let _CGContextEOFillPath = Foreign.foreign ~stub:true "CGContextEOFillPath" ((ptr CGContext.t) @-> returning void) +let _CGContextEndPage = Foreign.foreign ~stub:true "CGContextEndPage" ((ptr CGContext.t) @-> returning void) +let _CGContextEndTransparencyLayer = Foreign.foreign ~stub:true "CGContextEndTransparencyLayer" ((ptr CGContext.t) @-> returning void) +let _CGContextFillEllipseInRect = Foreign.foreign ~stub:true "CGContextFillEllipseInRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextFillPath = Foreign.foreign ~stub:true "CGContextFillPath" ((ptr CGContext.t) @-> returning void) +let _CGContextFillRect = Foreign.foreign ~stub:true "CGContextFillRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextFillRects = Foreign.foreign ~stub:true "CGContextFillRects" ((ptr CGContext.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) +let _CGContextFlush = Foreign.foreign ~stub:true "CGContextFlush" ((ptr CGContext.t) @-> returning void) +let _CGContextGetCTM = Foreign.foreign ~stub:true "CGContextGetCTM" ((ptr CGContext.t) @-> returning CGAffineTransform.t) +let _CGContextGetClipBoundingBox = Foreign.foreign ~stub:true "CGContextGetClipBoundingBox" ((ptr CGContext.t) @-> returning CGRect.t) +let _CGContextGetInterpolationQuality = Foreign.foreign ~stub:true "CGContextGetInterpolationQuality" ((ptr CGContext.t) @-> returning int) +let _CGContextGetPathBoundingBox = Foreign.foreign ~stub:true "CGContextGetPathBoundingBox" ((ptr CGContext.t) @-> returning CGRect.t) +let _CGContextGetPathCurrentPoint = Foreign.foreign ~stub:true "CGContextGetPathCurrentPoint" ((ptr CGContext.t) @-> returning CGPoint.t) +let _CGContextGetTextMatrix = Foreign.foreign ~stub:true "CGContextGetTextMatrix" ((ptr CGContext.t) @-> returning CGAffineTransform.t) +let _CGContextGetTextPosition = Foreign.foreign ~stub:true "CGContextGetTextPosition" ((ptr CGContext.t) @-> returning CGPoint.t) +let _CGContextGetTypeID = Foreign.foreign ~stub:true "CGContextGetTypeID" (void @-> returning ullong) +let _CGContextGetUserSpaceToDeviceSpaceTransform = Foreign.foreign ~stub:true "CGContextGetUserSpaceToDeviceSpaceTransform" ((ptr CGContext.t) @-> returning CGAffineTransform.t) +let _CGContextIsPathEmpty = Foreign.foreign ~stub:true "CGContextIsPathEmpty" ((ptr CGContext.t) @-> returning bool) +let _CGContextMoveToPoint = Foreign.foreign ~stub:true "CGContextMoveToPoint" ((ptr CGContext.t) @-> double @-> double @-> returning void) +let _CGContextPathContainsPoint = Foreign.foreign ~stub:true "CGContextPathContainsPoint" ((ptr CGContext.t) @-> CGPoint.t @-> int @-> returning bool) +let _CGContextRelease = Foreign.foreign ~stub:true "CGContextRelease" ((ptr CGContext.t) @-> returning void) +let _CGContextReplacePathWithStrokedPath = Foreign.foreign ~stub:true "CGContextReplacePathWithStrokedPath" ((ptr CGContext.t) @-> returning void) +let _CGContextResetClip = Foreign.foreign ~stub:true "CGContextResetClip" ((ptr CGContext.t) @-> returning void) +let _CGContextRestoreGState = Foreign.foreign ~stub:true "CGContextRestoreGState" ((ptr CGContext.t) @-> returning void) +let _CGContextRetain = Foreign.foreign ~stub:true "CGContextRetain" ((ptr CGContext.t) @-> returning (ptr CGContext.t)) +let _CGContextRotateCTM = Foreign.foreign ~stub:true "CGContextRotateCTM" ((ptr CGContext.t) @-> double @-> returning void) +let _CGContextSaveGState = Foreign.foreign ~stub:true "CGContextSaveGState" ((ptr CGContext.t) @-> returning void) +let _CGContextScaleCTM = Foreign.foreign ~stub:true "CGContextScaleCTM" ((ptr CGContext.t) @-> double @-> double @-> returning void) +let _CGContextSelectFont = Foreign.foreign ~stub:true "CGContextSelectFont" ((ptr CGContext.t) @-> string @-> double @-> int @-> returning void) +let _CGContextSetAllowsAntialiasing = Foreign.foreign ~stub:true "CGContextSetAllowsAntialiasing" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetAllowsFontSmoothing = Foreign.foreign ~stub:true "CGContextSetAllowsFontSmoothing" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetAllowsFontSubpixelPositioning = Foreign.foreign ~stub:true "CGContextSetAllowsFontSubpixelPositioning" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetAllowsFontSubpixelQuantization = Foreign.foreign ~stub:true "CGContextSetAllowsFontSubpixelQuantization" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetAlpha = Foreign.foreign ~stub:true "CGContextSetAlpha" ((ptr CGContext.t) @-> double @-> returning void) +let _CGContextSetBlendMode = Foreign.foreign ~stub:true "CGContextSetBlendMode" ((ptr CGContext.t) @-> int @-> returning void) +let _CGContextSetCMYKFillColor = Foreign.foreign ~stub:true "CGContextSetCMYKFillColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) +let _CGContextSetCMYKStrokeColor = Foreign.foreign ~stub:true "CGContextSetCMYKStrokeColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) +let _CGContextSetCharacterSpacing = Foreign.foreign ~stub:true "CGContextSetCharacterSpacing" ((ptr CGContext.t) @-> double @-> returning void) +let _CGContextSetFillColor = Foreign.foreign ~stub:true "CGContextSetFillColor" ((ptr CGContext.t) @-> (ptr double) @-> returning void) +let _CGContextSetFillColorSpace = Foreign.foreign ~stub:true "CGContextSetFillColorSpace" ((ptr CGContext.t) @-> (ptr CGColorSpace.t) @-> returning void) +let _CGContextSetFillColorWithColor = Foreign.foreign ~stub:true "CGContextSetFillColorWithColor" ((ptr CGContext.t) @-> (ptr CGColor.t) @-> returning void) +let _CGContextSetFillPattern = Foreign.foreign ~stub:true "CGContextSetFillPattern" ((ptr CGContext.t) @-> (ptr CGPattern.t) @-> (ptr double) @-> returning void) +let _CGContextSetFlatness = Foreign.foreign ~stub:true "CGContextSetFlatness" ((ptr CGContext.t) @-> double @-> returning void) +let _CGContextSetFont = Foreign.foreign ~stub:true "CGContextSetFont" ((ptr CGContext.t) @-> (ptr CGFont.t) @-> returning void) +let _CGContextSetFontSize = Foreign.foreign ~stub:true "CGContextSetFontSize" ((ptr CGContext.t) @-> double @-> returning void) +let _CGContextSetGrayFillColor = Foreign.foreign ~stub:true "CGContextSetGrayFillColor" ((ptr CGContext.t) @-> double @-> double @-> returning void) +let _CGContextSetGrayStrokeColor = Foreign.foreign ~stub:true "CGContextSetGrayStrokeColor" ((ptr CGContext.t) @-> double @-> double @-> returning void) +let _CGContextSetInterpolationQuality = Foreign.foreign ~stub:true "CGContextSetInterpolationQuality" ((ptr CGContext.t) @-> int @-> returning void) +let _CGContextSetLineCap = Foreign.foreign ~stub:true "CGContextSetLineCap" ((ptr CGContext.t) @-> int @-> returning void) +let _CGContextSetLineDash = Foreign.foreign ~stub:true "CGContextSetLineDash" ((ptr CGContext.t) @-> double @-> (ptr double) @-> ullong @-> returning void) +let _CGContextSetLineJoin = Foreign.foreign ~stub:true "CGContextSetLineJoin" ((ptr CGContext.t) @-> int @-> returning void) +let _CGContextSetLineWidth = Foreign.foreign ~stub:true "CGContextSetLineWidth" ((ptr CGContext.t) @-> double @-> returning void) +let _CGContextSetMiterLimit = Foreign.foreign ~stub:true "CGContextSetMiterLimit" ((ptr CGContext.t) @-> double @-> returning void) +let _CGContextSetPatternPhase = Foreign.foreign ~stub:true "CGContextSetPatternPhase" ((ptr CGContext.t) @-> CGSize.t @-> returning void) +let _CGContextSetRGBFillColor = Foreign.foreign ~stub:true "CGContextSetRGBFillColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> returning void) +let _CGContextSetRGBStrokeColor = Foreign.foreign ~stub:true "CGContextSetRGBStrokeColor" ((ptr CGContext.t) @-> double @-> double @-> double @-> double @-> returning void) +let _CGContextSetRenderingIntent = Foreign.foreign ~stub:true "CGContextSetRenderingIntent" ((ptr CGContext.t) @-> int @-> returning void) +let _CGContextSetShadow = Foreign.foreign ~stub:true "CGContextSetShadow" ((ptr CGContext.t) @-> CGSize.t @-> double @-> returning void) +let _CGContextSetShadowWithColor = Foreign.foreign ~stub:true "CGContextSetShadowWithColor" ((ptr CGContext.t) @-> CGSize.t @-> double @-> (ptr CGColor.t) @-> returning void) +let _CGContextSetShouldAntialias = Foreign.foreign ~stub:true "CGContextSetShouldAntialias" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetShouldSmoothFonts = Foreign.foreign ~stub:true "CGContextSetShouldSmoothFonts" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetShouldSubpixelPositionFonts = Foreign.foreign ~stub:true "CGContextSetShouldSubpixelPositionFonts" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetShouldSubpixelQuantizeFonts = Foreign.foreign ~stub:true "CGContextSetShouldSubpixelQuantizeFonts" ((ptr CGContext.t) @-> bool @-> returning void) +let _CGContextSetStrokeColor = Foreign.foreign ~stub:true "CGContextSetStrokeColor" ((ptr CGContext.t) @-> (ptr double) @-> returning void) +let _CGContextSetStrokeColorSpace = Foreign.foreign ~stub:true "CGContextSetStrokeColorSpace" ((ptr CGContext.t) @-> (ptr CGColorSpace.t) @-> returning void) +let _CGContextSetStrokeColorWithColor = Foreign.foreign ~stub:true "CGContextSetStrokeColorWithColor" ((ptr CGContext.t) @-> (ptr CGColor.t) @-> returning void) +let _CGContextSetStrokePattern = Foreign.foreign ~stub:true "CGContextSetStrokePattern" ((ptr CGContext.t) @-> (ptr CGPattern.t) @-> (ptr double) @-> returning void) +let _CGContextSetTextDrawingMode = Foreign.foreign ~stub:true "CGContextSetTextDrawingMode" ((ptr CGContext.t) @-> int @-> returning void) +let _CGContextSetTextMatrix = Foreign.foreign ~stub:true "CGContextSetTextMatrix" ((ptr CGContext.t) @-> CGAffineTransform.t @-> returning void) +let _CGContextSetTextPosition = Foreign.foreign ~stub:true "CGContextSetTextPosition" ((ptr CGContext.t) @-> double @-> double @-> returning void) +let _CGContextShowGlyphs = Foreign.foreign ~stub:true "CGContextShowGlyphs" ((ptr CGContext.t) @-> (ptr ushort) @-> ullong @-> returning void) +let _CGContextShowGlyphsAtPoint = Foreign.foreign ~stub:true "CGContextShowGlyphsAtPoint" ((ptr CGContext.t) @-> double @-> double @-> (ptr ushort) @-> ullong @-> returning void) +let _CGContextShowGlyphsAtPositions = Foreign.foreign ~stub:true "CGContextShowGlyphsAtPositions" ((ptr CGContext.t) @-> (ptr ushort) @-> (ptr CGPoint.t) @-> ullong @-> returning void) +let _CGContextShowGlyphsWithAdvances = Foreign.foreign ~stub:true "CGContextShowGlyphsWithAdvances" ((ptr CGContext.t) @-> (ptr ushort) @-> (ptr CGSize.t) @-> ullong @-> returning void) +let _CGContextShowText = Foreign.foreign ~stub:true "CGContextShowText" ((ptr CGContext.t) @-> string @-> ullong @-> returning void) +let _CGContextShowTextAtPoint = Foreign.foreign ~stub:true "CGContextShowTextAtPoint" ((ptr CGContext.t) @-> double @-> double @-> string @-> ullong @-> returning void) +let _CGContextStrokeEllipseInRect = Foreign.foreign ~stub:true "CGContextStrokeEllipseInRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextStrokeLineSegments = Foreign.foreign ~stub:true "CGContextStrokeLineSegments" ((ptr CGContext.t) @-> (ptr CGPoint.t) @-> ullong @-> returning void) +let _CGContextStrokePath = Foreign.foreign ~stub:true "CGContextStrokePath" ((ptr CGContext.t) @-> returning void) +let _CGContextStrokeRect = Foreign.foreign ~stub:true "CGContextStrokeRect" ((ptr CGContext.t) @-> CGRect.t @-> returning void) +let _CGContextStrokeRectWithWidth = Foreign.foreign ~stub:true "CGContextStrokeRectWithWidth" ((ptr CGContext.t) @-> CGRect.t @-> double @-> returning void) +let _CGContextSynchronize = Foreign.foreign ~stub:true "CGContextSynchronize" ((ptr CGContext.t) @-> returning void) +let _CGContextTranslateCTM = Foreign.foreign ~stub:true "CGContextTranslateCTM" ((ptr CGContext.t) @-> double @-> double @-> returning void) +let _CGConvertColorDataWithFormat = Foreign.foreign ~stub:true "CGConvertColorDataWithFormat" (ullong @-> ullong @-> (ptr void) @-> CGColorDataFormat.t @-> (ptr void) @-> CGColorDataFormat.t @-> (ptr CFDictionary.t) @-> returning bool) +let _CGCursorIsDrawnInFramebuffer = Foreign.foreign ~stub:true "CGCursorIsDrawnInFramebuffer" (void @-> returning uint) +let _CGCursorIsVisible = Foreign.foreign ~stub:true "CGCursorIsVisible" (void @-> returning uint) +let _CGDataConsumerCreate = Foreign.foreign ~stub:true "CGDataConsumerCreate" ((ptr void) @-> (ptr CGDataConsumerCallbacks.t) @-> returning (ptr CGDataConsumer.t)) +let _CGDataConsumerCreateWithCFData = Foreign.foreign ~stub:true "CGDataConsumerCreateWithCFData" ((ptr CFData.t) @-> returning (ptr CGDataConsumer.t)) +let _CGDataConsumerCreateWithURL = Foreign.foreign ~stub:true "CGDataConsumerCreateWithURL" ((ptr CFURL.t) @-> returning (ptr CGDataConsumer.t)) +let _CGDataConsumerGetTypeID = Foreign.foreign ~stub:true "CGDataConsumerGetTypeID" (void @-> returning ullong) +let _CGDataConsumerRelease = Foreign.foreign ~stub:true "CGDataConsumerRelease" ((ptr CGDataConsumer.t) @-> returning void) +let _CGDataConsumerRetain = Foreign.foreign ~stub:true "CGDataConsumerRetain" ((ptr CGDataConsumer.t) @-> returning (ptr CGDataConsumer.t)) +let _CGDataProviderCopyData = Foreign.foreign ~stub:true "CGDataProviderCopyData" ((ptr CGDataProvider.t) @-> returning (ptr CFData.t)) +let _CGDataProviderCreateDirect = Foreign.foreign ~stub:true "CGDataProviderCreateDirect" ((ptr void) @-> llong @-> (ptr CGDataProviderDirectCallbacks.t) @-> returning (ptr CGDataProvider.t)) +let _CGDataProviderCreateSequential = Foreign.foreign ~stub:true "CGDataProviderCreateSequential" ((ptr void) @-> (ptr CGDataProviderSequentialCallbacks.t) @-> returning (ptr CGDataProvider.t)) +let _CGDataProviderCreateWithCFData = Foreign.foreign ~stub:true "CGDataProviderCreateWithCFData" ((ptr CFData.t) @-> returning (ptr CGDataProvider.t)) +let _CGDataProviderCreateWithData = Foreign.foreign ~stub:true "CGDataProviderCreateWithData" ((ptr void) @-> (ptr void) @-> ullong @-> Foreign.funptr ((ptr void) @-> (ptr void) @-> ullong @-> returning void) @-> returning (ptr CGDataProvider.t)) +let _CGDataProviderCreateWithFilename = Foreign.foreign ~stub:true "CGDataProviderCreateWithFilename" (string @-> returning (ptr CGDataProvider.t)) +let _CGDataProviderCreateWithURL = Foreign.foreign ~stub:true "CGDataProviderCreateWithURL" ((ptr CFURL.t) @-> returning (ptr CGDataProvider.t)) +let _CGDataProviderGetInfo = Foreign.foreign ~stub:true "CGDataProviderGetInfo" ((ptr CGDataProvider.t) @-> returning (ptr void)) +let _CGDataProviderGetTypeID = Foreign.foreign ~stub:true "CGDataProviderGetTypeID" (void @-> returning ullong) +let _CGDataProviderRelease = Foreign.foreign ~stub:true "CGDataProviderRelease" ((ptr CGDataProvider.t) @-> returning void) +let _CGDataProviderRetain = Foreign.foreign ~stub:true "CGDataProviderRetain" ((ptr CGDataProvider.t) @-> returning (ptr CGDataProvider.t)) +let _CGDirectDisplayCopyCurrentMetalDevice = Foreign.foreign ~stub:true "CGDirectDisplayCopyCurrentMetalDevice" (uint @-> returning id) +let _CGDisplayAvailableModes = Foreign.foreign ~stub:true "CGDisplayAvailableModes" (uint @-> returning (ptr CFArray.t)) +let _CGDisplayBestModeForParameters = Foreign.foreign ~stub:true "CGDisplayBestModeForParameters" (uint @-> ullong @-> ullong @-> ullong @-> (ptr uint) @-> returning (ptr CFDictionary.t)) +let _CGDisplayBestModeForParametersAndRefreshRate = Foreign.foreign ~stub:true "CGDisplayBestModeForParametersAndRefreshRate" (uint @-> ullong @-> ullong @-> ullong @-> double @-> (ptr uint) @-> returning (ptr CFDictionary.t)) +let _CGDisplayBounds = Foreign.foreign ~stub:true "CGDisplayBounds" (uint @-> returning CGRect.t) +let _CGDisplayCapture = Foreign.foreign ~stub:true "CGDisplayCapture" (uint @-> returning int) +let _CGDisplayCaptureWithOptions = Foreign.foreign ~stub:true "CGDisplayCaptureWithOptions" (uint @-> uint @-> returning int) +let _CGDisplayCopyAllDisplayModes = Foreign.foreign ~stub:true "CGDisplayCopyAllDisplayModes" (uint @-> (ptr CFDictionary.t) @-> returning (ptr CFArray.t)) +let _CGDisplayCopyColorSpace = Foreign.foreign ~stub:true "CGDisplayCopyColorSpace" (uint @-> returning (ptr CGColorSpace.t)) +let _CGDisplayCopyDisplayMode = Foreign.foreign ~stub:true "CGDisplayCopyDisplayMode" (uint @-> returning (ptr CGDisplayMode.t)) +let _CGDisplayCreateImage = Foreign.foreign ~stub:true "CGDisplayCreateImage" (uint @-> returning (ptr CGImage.t)) +let _CGDisplayCreateImageForRect = Foreign.foreign ~stub:true "CGDisplayCreateImageForRect" (uint @-> CGRect.t @-> returning (ptr CGImage.t)) +let _CGDisplayCurrentMode = Foreign.foreign ~stub:true "CGDisplayCurrentMode" (uint @-> returning (ptr CFDictionary.t)) +let _CGDisplayFade = Foreign.foreign ~stub:true "CGDisplayFade" (uint @-> float @-> float @-> float @-> float @-> float @-> float @-> uint @-> returning int) +let _CGDisplayFadeOperationInProgress = Foreign.foreign ~stub:true "CGDisplayFadeOperationInProgress" (void @-> returning uint) +let _CGDisplayGammaTableCapacity = Foreign.foreign ~stub:true "CGDisplayGammaTableCapacity" (uint @-> returning uint) +let _CGDisplayGetDrawingContext = Foreign.foreign ~stub:true "CGDisplayGetDrawingContext" (uint @-> returning (ptr CGContext.t)) +let _CGDisplayHideCursor = Foreign.foreign ~stub:true "CGDisplayHideCursor" (uint @-> returning int) +let _CGDisplayIDToOpenGLDisplayMask = Foreign.foreign ~stub:true "CGDisplayIDToOpenGLDisplayMask" (uint @-> returning uint) +let _CGDisplayIOServicePort = Foreign.foreign ~stub:true "CGDisplayIOServicePort" (uint @-> returning uint) +let _CGDisplayIsActive = Foreign.foreign ~stub:true "CGDisplayIsActive" (uint @-> returning uint) +let _CGDisplayIsAlwaysInMirrorSet = Foreign.foreign ~stub:true "CGDisplayIsAlwaysInMirrorSet" (uint @-> returning uint) +let _CGDisplayIsAsleep = Foreign.foreign ~stub:true "CGDisplayIsAsleep" (uint @-> returning uint) +let _CGDisplayIsBuiltin = Foreign.foreign ~stub:true "CGDisplayIsBuiltin" (uint @-> returning uint) +let _CGDisplayIsCaptured = Foreign.foreign ~stub:true "CGDisplayIsCaptured" (uint @-> returning uint) +let _CGDisplayIsInHWMirrorSet = Foreign.foreign ~stub:true "CGDisplayIsInHWMirrorSet" (uint @-> returning uint) +let _CGDisplayIsInMirrorSet = Foreign.foreign ~stub:true "CGDisplayIsInMirrorSet" (uint @-> returning uint) +let _CGDisplayIsMain = Foreign.foreign ~stub:true "CGDisplayIsMain" (uint @-> returning uint) +let _CGDisplayIsOnline = Foreign.foreign ~stub:true "CGDisplayIsOnline" (uint @-> returning uint) +let _CGDisplayIsStereo = Foreign.foreign ~stub:true "CGDisplayIsStereo" (uint @-> returning uint) +let _CGDisplayMirrorsDisplay = Foreign.foreign ~stub:true "CGDisplayMirrorsDisplay" (uint @-> returning uint) +let _CGDisplayModeCopyPixelEncoding = Foreign.foreign ~stub:true "CGDisplayModeCopyPixelEncoding" ((ptr CGDisplayMode.t) @-> returning (ptr CFString.t)) +let _CGDisplayModeGetHeight = Foreign.foreign ~stub:true "CGDisplayModeGetHeight" ((ptr CGDisplayMode.t) @-> returning ullong) +let _CGDisplayModeGetIODisplayModeID = Foreign.foreign ~stub:true "CGDisplayModeGetIODisplayModeID" ((ptr CGDisplayMode.t) @-> returning int) +let _CGDisplayModeGetIOFlags = Foreign.foreign ~stub:true "CGDisplayModeGetIOFlags" ((ptr CGDisplayMode.t) @-> returning uint) +let _CGDisplayModeGetPixelHeight = Foreign.foreign ~stub:true "CGDisplayModeGetPixelHeight" ((ptr CGDisplayMode.t) @-> returning ullong) +let _CGDisplayModeGetPixelWidth = Foreign.foreign ~stub:true "CGDisplayModeGetPixelWidth" ((ptr CGDisplayMode.t) @-> returning ullong) +let _CGDisplayModeGetRefreshRate = Foreign.foreign ~stub:true "CGDisplayModeGetRefreshRate" ((ptr CGDisplayMode.t) @-> returning double) +let _CGDisplayModeGetTypeID = Foreign.foreign ~stub:true "CGDisplayModeGetTypeID" (void @-> returning ullong) +let _CGDisplayModeGetWidth = Foreign.foreign ~stub:true "CGDisplayModeGetWidth" ((ptr CGDisplayMode.t) @-> returning ullong) +let _CGDisplayModeIsUsableForDesktopGUI = Foreign.foreign ~stub:true "CGDisplayModeIsUsableForDesktopGUI" ((ptr CGDisplayMode.t) @-> returning bool) +let _CGDisplayModeRelease = Foreign.foreign ~stub:true "CGDisplayModeRelease" ((ptr CGDisplayMode.t) @-> returning void) +let _CGDisplayModeRetain = Foreign.foreign ~stub:true "CGDisplayModeRetain" ((ptr CGDisplayMode.t) @-> returning (ptr CGDisplayMode.t)) +let _CGDisplayModelNumber = Foreign.foreign ~stub:true "CGDisplayModelNumber" (uint @-> returning uint) +let _CGDisplayMoveCursorToPoint = Foreign.foreign ~stub:true "CGDisplayMoveCursorToPoint" (uint @-> CGPoint.t @-> returning int) +let _CGDisplayPixelsHigh = Foreign.foreign ~stub:true "CGDisplayPixelsHigh" (uint @-> returning ullong) +let _CGDisplayPixelsWide = Foreign.foreign ~stub:true "CGDisplayPixelsWide" (uint @-> returning ullong) +let _CGDisplayPrimaryDisplay = Foreign.foreign ~stub:true "CGDisplayPrimaryDisplay" (uint @-> returning uint) +let _CGDisplayRegisterReconfigurationCallback = Foreign.foreign ~stub:true "CGDisplayRegisterReconfigurationCallback" (Foreign.funptr (uint @-> uint @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) +let _CGDisplayRelease = Foreign.foreign ~stub:true "CGDisplayRelease" (uint @-> returning int) +let _CGDisplayRemoveReconfigurationCallback = Foreign.foreign ~stub:true "CGDisplayRemoveReconfigurationCallback" (Foreign.funptr (uint @-> uint @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) +let _CGDisplayRestoreColorSyncSettings = Foreign.foreign ~stub:true "CGDisplayRestoreColorSyncSettings" (void @-> returning void) +let _CGDisplayRotation = Foreign.foreign ~stub:true "CGDisplayRotation" (uint @-> returning double) +let _CGDisplayScreenSize = Foreign.foreign ~stub:true "CGDisplayScreenSize" (uint @-> returning CGSize.t) +let _CGDisplaySerialNumber = Foreign.foreign ~stub:true "CGDisplaySerialNumber" (uint @-> returning uint) +let _CGDisplaySetDisplayMode = Foreign.foreign ~stub:true "CGDisplaySetDisplayMode" (uint @-> (ptr CGDisplayMode.t) @-> (ptr CFDictionary.t) @-> returning int) +let _CGDisplaySetStereoOperation = Foreign.foreign ~stub:true "CGDisplaySetStereoOperation" (uint @-> uint @-> uint @-> uint @-> returning int) +let _CGDisplayShowCursor = Foreign.foreign ~stub:true "CGDisplayShowCursor" (uint @-> returning int) +let _CGDisplayStreamCreate = Foreign.foreign ~stub:true "CGDisplayStreamCreate" (uint @-> ullong @-> ullong @-> int @-> (ptr CFDictionary.t) @-> Foreign.funptr (int @-> ullong @-> (ptr IOSurface.t) @-> (ptr CGDisplayStreamUpdate.t) @-> returning void) @-> returning (ptr CGDisplayStream.t)) +let _CGDisplayStreamCreateWithDispatchQueue = Foreign.foreign ~stub:true "CGDisplayStreamCreateWithDispatchQueue" (uint @-> ullong @-> ullong @-> int @-> (ptr CFDictionary.t) @-> id @-> Foreign.funptr (int @-> ullong @-> (ptr IOSurface.t) @-> (ptr CGDisplayStreamUpdate.t) @-> returning void) @-> returning (ptr CGDisplayStream.t)) +let _CGDisplayStreamGetRunLoopSource = Foreign.foreign ~stub:true "CGDisplayStreamGetRunLoopSource" ((ptr CGDisplayStream.t) @-> returning (ptr CFRunLoopSource.t)) +let _CGDisplayStreamGetTypeID = Foreign.foreign ~stub:true "CGDisplayStreamGetTypeID" (void @-> returning ullong) +let _CGDisplayStreamStart = Foreign.foreign ~stub:true "CGDisplayStreamStart" ((ptr CGDisplayStream.t) @-> returning int) +let _CGDisplayStreamStop = Foreign.foreign ~stub:true "CGDisplayStreamStop" ((ptr CGDisplayStream.t) @-> returning int) +let _CGDisplayStreamUpdateCreateMergedUpdate = Foreign.foreign ~stub:true "CGDisplayStreamUpdateCreateMergedUpdate" ((ptr CGDisplayStreamUpdate.t) @-> (ptr CGDisplayStreamUpdate.t) @-> returning (ptr CGDisplayStreamUpdate.t)) +let _CGDisplayStreamUpdateGetDropCount = Foreign.foreign ~stub:true "CGDisplayStreamUpdateGetDropCount" ((ptr CGDisplayStreamUpdate.t) @-> returning ullong) +let _CGDisplayStreamUpdateGetMovedRectsDelta = Foreign.foreign ~stub:true "CGDisplayStreamUpdateGetMovedRectsDelta" ((ptr CGDisplayStreamUpdate.t) @-> (ptr double) @-> (ptr double) @-> returning void) +let _CGDisplayStreamUpdateGetRects = Foreign.foreign ~stub:true "CGDisplayStreamUpdateGetRects" ((ptr CGDisplayStreamUpdate.t) @-> int @-> (ptr ullong) @-> returning (ptr CGRect.t)) +let _CGDisplayStreamUpdateGetTypeID = Foreign.foreign ~stub:true "CGDisplayStreamUpdateGetTypeID" (void @-> returning ullong) +let _CGDisplaySwitchToMode = Foreign.foreign ~stub:true "CGDisplaySwitchToMode" (uint @-> (ptr CFDictionary.t) @-> returning int) +let _CGDisplayUnitNumber = Foreign.foreign ~stub:true "CGDisplayUnitNumber" (uint @-> returning uint) +let _CGDisplayUsesOpenGLAcceleration = Foreign.foreign ~stub:true "CGDisplayUsesOpenGLAcceleration" (uint @-> returning uint) +let _CGDisplayVendorNumber = Foreign.foreign ~stub:true "CGDisplayVendorNumber" (uint @-> returning uint) +let _CGEnableEventStateCombining = Foreign.foreign ~stub:true "CGEnableEventStateCombining" (uint @-> returning int) +let _CGErrorSetCallback = Foreign.foreign ~stub:true "CGErrorSetCallback" (Foreign.funptr (void @-> returning void) @-> returning void) +let _CGEventCreate = Foreign.foreign ~stub:true "CGEventCreate" ((ptr CGEventSource.t) @-> returning (ptr CGEvent.t)) +let _CGEventCreateCopy = Foreign.foreign ~stub:true "CGEventCreateCopy" ((ptr CGEvent.t) @-> returning (ptr CGEvent.t)) +let _CGEventCreateData = Foreign.foreign ~stub:true "CGEventCreateData" ((ptr CFAllocator.t) @-> (ptr CGEvent.t) @-> returning (ptr CFData.t)) +let _CGEventCreateFromData = Foreign.foreign ~stub:true "CGEventCreateFromData" ((ptr CFAllocator.t) @-> (ptr CFData.t) @-> returning (ptr CGEvent.t)) +let _CGEventCreateKeyboardEvent = Foreign.foreign ~stub:true "CGEventCreateKeyboardEvent" ((ptr CGEventSource.t) @-> ushort @-> bool @-> returning (ptr CGEvent.t)) +let _CGEventCreateMouseEvent = Foreign.foreign ~stub:true "CGEventCreateMouseEvent" ((ptr CGEventSource.t) @-> uint @-> CGPoint.t @-> uint @-> returning (ptr CGEvent.t)) +let _CGEventCreateScrollWheelEvent = Foreign.foreign ~stub:true "CGEventCreateScrollWheelEvent" ((ptr CGEventSource.t) @-> uint @-> uint @-> int @-> returning (ptr CGEvent.t)) +let _CGEventCreateScrollWheelEvent2 = Foreign.foreign ~stub:true "CGEventCreateScrollWheelEvent2" ((ptr CGEventSource.t) @-> uint @-> uint @-> int @-> int @-> int @-> returning (ptr CGEvent.t)) +let _CGEventCreateSourceFromEvent = Foreign.foreign ~stub:true "CGEventCreateSourceFromEvent" ((ptr CGEvent.t) @-> returning (ptr CGEventSource.t)) +let _CGEventGetDoubleValueField = Foreign.foreign ~stub:true "CGEventGetDoubleValueField" ((ptr CGEvent.t) @-> uint @-> returning double) +let _CGEventGetFlags = Foreign.foreign ~stub:true "CGEventGetFlags" ((ptr CGEvent.t) @-> returning ullong) +let _CGEventGetIntegerValueField = Foreign.foreign ~stub:true "CGEventGetIntegerValueField" ((ptr CGEvent.t) @-> uint @-> returning llong) +let _CGEventGetLocation = Foreign.foreign ~stub:true "CGEventGetLocation" ((ptr CGEvent.t) @-> returning CGPoint.t) +let _CGEventGetTimestamp = Foreign.foreign ~stub:true "CGEventGetTimestamp" ((ptr CGEvent.t) @-> returning ullong) +let _CGEventGetType = Foreign.foreign ~stub:true "CGEventGetType" ((ptr CGEvent.t) @-> returning uint) +let _CGEventGetTypeID = Foreign.foreign ~stub:true "CGEventGetTypeID" (void @-> returning ullong) +let _CGEventGetUnflippedLocation = Foreign.foreign ~stub:true "CGEventGetUnflippedLocation" ((ptr CGEvent.t) @-> returning CGPoint.t) +let _CGEventKeyboardGetUnicodeString = Foreign.foreign ~stub:true "CGEventKeyboardGetUnicodeString" ((ptr CGEvent.t) @-> ullong @-> (ptr ullong) @-> (ptr ushort) @-> returning void) +let _CGEventKeyboardSetUnicodeString = Foreign.foreign ~stub:true "CGEventKeyboardSetUnicodeString" ((ptr CGEvent.t) @-> ullong @-> (ptr ushort) @-> returning void) +let _CGEventPost = Foreign.foreign ~stub:true "CGEventPost" (uint @-> (ptr CGEvent.t) @-> returning void) +let _CGEventPostToPSN = Foreign.foreign ~stub:true "CGEventPostToPSN" ((ptr void) @-> (ptr CGEvent.t) @-> returning void) +let _CGEventPostToPid = Foreign.foreign ~stub:true "CGEventPostToPid" (int @-> (ptr CGEvent.t) @-> returning void) +let _CGEventSetDoubleValueField = Foreign.foreign ~stub:true "CGEventSetDoubleValueField" ((ptr CGEvent.t) @-> uint @-> double @-> returning void) +let _CGEventSetFlags = Foreign.foreign ~stub:true "CGEventSetFlags" ((ptr CGEvent.t) @-> ullong @-> returning void) +let _CGEventSetIntegerValueField = Foreign.foreign ~stub:true "CGEventSetIntegerValueField" ((ptr CGEvent.t) @-> uint @-> llong @-> returning void) +let _CGEventSetLocation = Foreign.foreign ~stub:true "CGEventSetLocation" ((ptr CGEvent.t) @-> CGPoint.t @-> returning void) +let _CGEventSetSource = Foreign.foreign ~stub:true "CGEventSetSource" ((ptr CGEvent.t) @-> (ptr CGEventSource.t) @-> returning void) +let _CGEventSetTimestamp = Foreign.foreign ~stub:true "CGEventSetTimestamp" ((ptr CGEvent.t) @-> ullong @-> returning void) +let _CGEventSetType = Foreign.foreign ~stub:true "CGEventSetType" ((ptr CGEvent.t) @-> uint @-> returning void) +let _CGEventSourceButtonState = Foreign.foreign ~stub:true "CGEventSourceButtonState" (int @-> uint @-> returning bool) +let _CGEventSourceCounterForEventType = Foreign.foreign ~stub:true "CGEventSourceCounterForEventType" (int @-> uint @-> returning uint) +let _CGEventSourceCreate = Foreign.foreign ~stub:true "CGEventSourceCreate" (int @-> returning (ptr CGEventSource.t)) +let _CGEventSourceFlagsState = Foreign.foreign ~stub:true "CGEventSourceFlagsState" (int @-> returning ullong) +let _CGEventSourceGetKeyboardType = Foreign.foreign ~stub:true "CGEventSourceGetKeyboardType" ((ptr CGEventSource.t) @-> returning uint) +let _CGEventSourceGetLocalEventsFilterDuringSuppressionState = Foreign.foreign ~stub:true "CGEventSourceGetLocalEventsFilterDuringSuppressionState" ((ptr CGEventSource.t) @-> uint @-> returning uint) +let _CGEventSourceGetLocalEventsSuppressionInterval = Foreign.foreign ~stub:true "CGEventSourceGetLocalEventsSuppressionInterval" ((ptr CGEventSource.t) @-> returning double) +let _CGEventSourceGetPixelsPerLine = Foreign.foreign ~stub:true "CGEventSourceGetPixelsPerLine" ((ptr CGEventSource.t) @-> returning double) +let _CGEventSourceGetSourceStateID = Foreign.foreign ~stub:true "CGEventSourceGetSourceStateID" ((ptr CGEventSource.t) @-> returning int) +let _CGEventSourceGetTypeID = Foreign.foreign ~stub:true "CGEventSourceGetTypeID" (void @-> returning ullong) +let _CGEventSourceGetUserData = Foreign.foreign ~stub:true "CGEventSourceGetUserData" ((ptr CGEventSource.t) @-> returning llong) +let _CGEventSourceKeyState = Foreign.foreign ~stub:true "CGEventSourceKeyState" (int @-> ushort @-> returning bool) +let _CGEventSourceSecondsSinceLastEventType = Foreign.foreign ~stub:true "CGEventSourceSecondsSinceLastEventType" (int @-> uint @-> returning double) +let _CGEventSourceSetKeyboardType = Foreign.foreign ~stub:true "CGEventSourceSetKeyboardType" ((ptr CGEventSource.t) @-> uint @-> returning void) +let _CGEventSourceSetLocalEventsFilterDuringSuppressionState = Foreign.foreign ~stub:true "CGEventSourceSetLocalEventsFilterDuringSuppressionState" ((ptr CGEventSource.t) @-> uint @-> uint @-> returning void) +let _CGEventSourceSetLocalEventsSuppressionInterval = Foreign.foreign ~stub:true "CGEventSourceSetLocalEventsSuppressionInterval" ((ptr CGEventSource.t) @-> double @-> returning void) +let _CGEventSourceSetPixelsPerLine = Foreign.foreign ~stub:true "CGEventSourceSetPixelsPerLine" ((ptr CGEventSource.t) @-> double @-> returning void) +let _CGEventSourceSetUserData = Foreign.foreign ~stub:true "CGEventSourceSetUserData" ((ptr CGEventSource.t) @-> llong @-> returning void) +let _CGEventTapCreate = Foreign.foreign ~stub:true "CGEventTapCreate" (uint @-> uint @-> uint @-> ullong @-> Foreign.funptr ((ptr CGEventTapProxy.t) @-> uint @-> (ptr CGEvent.t) @-> (ptr void) @-> returning (ptr CGEvent.t)) @-> (ptr void) @-> returning (ptr CFMachPort.t)) +let _CGEventTapCreateForPSN = Foreign.foreign ~stub:true "CGEventTapCreateForPSN" ((ptr void) @-> uint @-> uint @-> ullong @-> Foreign.funptr ((ptr CGEventTapProxy.t) @-> uint @-> (ptr CGEvent.t) @-> (ptr void) @-> returning (ptr CGEvent.t)) @-> (ptr void) @-> returning (ptr CFMachPort.t)) +let _CGEventTapCreateForPid = Foreign.foreign ~stub:true "CGEventTapCreateForPid" (int @-> uint @-> uint @-> ullong @-> Foreign.funptr ((ptr CGEventTapProxy.t) @-> uint @-> (ptr CGEvent.t) @-> (ptr void) @-> returning (ptr CGEvent.t)) @-> (ptr void) @-> returning (ptr CFMachPort.t)) +let _CGEventTapEnable = Foreign.foreign ~stub:true "CGEventTapEnable" ((ptr CFMachPort.t) @-> bool @-> returning void) +let _CGEventTapIsEnabled = Foreign.foreign ~stub:true "CGEventTapIsEnabled" ((ptr CFMachPort.t) @-> returning bool) +let _CGEventTapPostEvent = Foreign.foreign ~stub:true "CGEventTapPostEvent" ((ptr CGEventTapProxy.t) @-> (ptr CGEvent.t) @-> returning void) +let _CGFontCanCreatePostScriptSubset = Foreign.foreign ~stub:true "CGFontCanCreatePostScriptSubset" ((ptr CGFont.t) @-> int @-> returning bool) +let _CGFontCopyFullName = Foreign.foreign ~stub:true "CGFontCopyFullName" ((ptr CGFont.t) @-> returning (ptr CFString.t)) +let _CGFontCopyGlyphNameForGlyph = Foreign.foreign ~stub:true "CGFontCopyGlyphNameForGlyph" ((ptr CGFont.t) @-> ushort @-> returning (ptr CFString.t)) +let _CGFontCopyPostScriptName = Foreign.foreign ~stub:true "CGFontCopyPostScriptName" ((ptr CGFont.t) @-> returning (ptr CFString.t)) +let _CGFontCopyTableForTag = Foreign.foreign ~stub:true "CGFontCopyTableForTag" ((ptr CGFont.t) @-> uint @-> returning (ptr CFData.t)) +let _CGFontCopyTableTags = Foreign.foreign ~stub:true "CGFontCopyTableTags" ((ptr CGFont.t) @-> returning (ptr CFArray.t)) +let _CGFontCopyVariationAxes = Foreign.foreign ~stub:true "CGFontCopyVariationAxes" ((ptr CGFont.t) @-> returning (ptr CFArray.t)) +let _CGFontCopyVariations = Foreign.foreign ~stub:true "CGFontCopyVariations" ((ptr CGFont.t) @-> returning (ptr CFDictionary.t)) +let _CGFontCreateCopyWithVariations = Foreign.foreign ~stub:true "CGFontCreateCopyWithVariations" ((ptr CGFont.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGFont.t)) +let _CGFontCreatePostScriptEncoding = Foreign.foreign ~stub:true "CGFontCreatePostScriptEncoding" ((ptr CGFont.t) @-> (ptr ushort) @-> returning (ptr CFData.t)) +let _CGFontCreatePostScriptSubset = Foreign.foreign ~stub:true "CGFontCreatePostScriptSubset" ((ptr CGFont.t) @-> (ptr CFString.t) @-> int @-> (ptr ushort) @-> ullong @-> (ptr ushort) @-> returning (ptr CFData.t)) +let _CGFontCreateWithDataProvider = Foreign.foreign ~stub:true "CGFontCreateWithDataProvider" ((ptr CGDataProvider.t) @-> returning (ptr CGFont.t)) +let _CGFontCreateWithFontName = Foreign.foreign ~stub:true "CGFontCreateWithFontName" ((ptr CFString.t) @-> returning (ptr CGFont.t)) +let _CGFontCreateWithPlatformFont = Foreign.foreign ~stub:true "CGFontCreateWithPlatformFont" (int @-> returning (ptr CGFont.t)) +let _CGFontGetAscent = Foreign.foreign ~stub:true "CGFontGetAscent" ((ptr CGFont.t) @-> returning int) +let _CGFontGetCapHeight = Foreign.foreign ~stub:true "CGFontGetCapHeight" ((ptr CGFont.t) @-> returning int) +let _CGFontGetDescent = Foreign.foreign ~stub:true "CGFontGetDescent" ((ptr CGFont.t) @-> returning int) +let _CGFontGetFontBBox = Foreign.foreign ~stub:true "CGFontGetFontBBox" ((ptr CGFont.t) @-> returning CGRect.t) +let _CGFontGetGlyphAdvances = Foreign.foreign ~stub:true "CGFontGetGlyphAdvances" ((ptr CGFont.t) @-> (ptr ushort) @-> ullong @-> (ptr int) @-> returning bool) +let _CGFontGetGlyphBBoxes = Foreign.foreign ~stub:true "CGFontGetGlyphBBoxes" ((ptr CGFont.t) @-> (ptr ushort) @-> ullong @-> (ptr CGRect.t) @-> returning bool) +let _CGFontGetGlyphWithGlyphName = Foreign.foreign ~stub:true "CGFontGetGlyphWithGlyphName" ((ptr CGFont.t) @-> (ptr CFString.t) @-> returning ushort) +let _CGFontGetItalicAngle = Foreign.foreign ~stub:true "CGFontGetItalicAngle" ((ptr CGFont.t) @-> returning double) +let _CGFontGetLeading = Foreign.foreign ~stub:true "CGFontGetLeading" ((ptr CGFont.t) @-> returning int) +let _CGFontGetNumberOfGlyphs = Foreign.foreign ~stub:true "CGFontGetNumberOfGlyphs" ((ptr CGFont.t) @-> returning ullong) +let _CGFontGetStemV = Foreign.foreign ~stub:true "CGFontGetStemV" ((ptr CGFont.t) @-> returning double) +let _CGFontGetTypeID = Foreign.foreign ~stub:true "CGFontGetTypeID" (void @-> returning ullong) +let _CGFontGetUnitsPerEm = Foreign.foreign ~stub:true "CGFontGetUnitsPerEm" ((ptr CGFont.t) @-> returning int) +let _CGFontGetXHeight = Foreign.foreign ~stub:true "CGFontGetXHeight" ((ptr CGFont.t) @-> returning int) +let _CGFontRelease = Foreign.foreign ~stub:true "CGFontRelease" ((ptr CGFont.t) @-> returning void) +let _CGFontRetain = Foreign.foreign ~stub:true "CGFontRetain" ((ptr CGFont.t) @-> returning (ptr CGFont.t)) +let _CGFunctionCreate = Foreign.foreign ~stub:true "CGFunctionCreate" ((ptr void) @-> ullong @-> (ptr double) @-> ullong @-> (ptr double) @-> (ptr CGFunctionCallbacks.t) @-> returning (ptr CGFunction.t)) +let _CGFunctionGetTypeID = Foreign.foreign ~stub:true "CGFunctionGetTypeID" (void @-> returning ullong) +let _CGFunctionRelease = Foreign.foreign ~stub:true "CGFunctionRelease" ((ptr CGFunction.t) @-> returning void) +let _CGFunctionRetain = Foreign.foreign ~stub:true "CGFunctionRetain" ((ptr CGFunction.t) @-> returning (ptr CGFunction.t)) +let _CGGetActiveDisplayList = Foreign.foreign ~stub:true "CGGetActiveDisplayList" (uint @-> (ptr uint) @-> (ptr uint) @-> returning int) +let _CGGetDisplayTransferByFormula = Foreign.foreign ~stub:true "CGGetDisplayTransferByFormula" (uint @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> returning int) +let _CGGetDisplayTransferByTable = Foreign.foreign ~stub:true "CGGetDisplayTransferByTable" (uint @-> uint @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> (ptr uint) @-> returning int) +let _CGGetDisplaysWithOpenGLDisplayMask = Foreign.foreign ~stub:true "CGGetDisplaysWithOpenGLDisplayMask" (uint @-> uint @-> (ptr uint) @-> (ptr uint) @-> returning int) +let _CGGetDisplaysWithPoint = Foreign.foreign ~stub:true "CGGetDisplaysWithPoint" (CGPoint.t @-> uint @-> (ptr uint) @-> (ptr uint) @-> returning int) +let _CGGetDisplaysWithRect = Foreign.foreign ~stub:true "CGGetDisplaysWithRect" (CGRect.t @-> uint @-> (ptr uint) @-> (ptr uint) @-> returning int) +let _CGGetEventTapList = Foreign.foreign ~stub:true "CGGetEventTapList" (uint @-> (ptr CGEventTapInformation.t) @-> (ptr uint) @-> returning int) +let _CGGetLastMouseDelta = Foreign.foreign ~stub:true "CGGetLastMouseDelta" ((ptr int) @-> (ptr int) @-> returning void) +let _CGGetOnlineDisplayList = Foreign.foreign ~stub:true "CGGetOnlineDisplayList" (uint @-> (ptr uint) @-> (ptr uint) @-> returning int) +let _CGGradientCreateWithColorComponents = Foreign.foreign ~stub:true "CGGradientCreateWithColorComponents" ((ptr CGColorSpace.t) @-> (ptr double) @-> (ptr double) @-> ullong @-> returning (ptr CGGradient.t)) +let _CGGradientCreateWithColors = Foreign.foreign ~stub:true "CGGradientCreateWithColors" ((ptr CGColorSpace.t) @-> (ptr CFArray.t) @-> (ptr double) @-> returning (ptr CGGradient.t)) +let _CGGradientGetTypeID = Foreign.foreign ~stub:true "CGGradientGetTypeID" (void @-> returning ullong) +let _CGGradientRelease = Foreign.foreign ~stub:true "CGGradientRelease" ((ptr CGGradient.t) @-> returning void) +let _CGGradientRetain = Foreign.foreign ~stub:true "CGGradientRetain" ((ptr CGGradient.t) @-> returning (ptr CGGradient.t)) +let _CGImageCreate = Foreign.foreign ~stub:true "CGImageCreate" (ullong @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGColorSpace.t) @-> uint @-> (ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> int @-> returning (ptr CGImage.t)) +let _CGImageCreateCopy = Foreign.foreign ~stub:true "CGImageCreateCopy" ((ptr CGImage.t) @-> returning (ptr CGImage.t)) +let _CGImageCreateCopyWithColorSpace = Foreign.foreign ~stub:true "CGImageCreateCopyWithColorSpace" ((ptr CGImage.t) @-> (ptr CGColorSpace.t) @-> returning (ptr CGImage.t)) +let _CGImageCreateWithImageInRect = Foreign.foreign ~stub:true "CGImageCreateWithImageInRect" ((ptr CGImage.t) @-> CGRect.t @-> returning (ptr CGImage.t)) +let _CGImageCreateWithJPEGDataProvider = Foreign.foreign ~stub:true "CGImageCreateWithJPEGDataProvider" ((ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> int @-> returning (ptr CGImage.t)) +let _CGImageCreateWithMask = Foreign.foreign ~stub:true "CGImageCreateWithMask" ((ptr CGImage.t) @-> (ptr CGImage.t) @-> returning (ptr CGImage.t)) +let _CGImageCreateWithMaskingColors = Foreign.foreign ~stub:true "CGImageCreateWithMaskingColors" ((ptr CGImage.t) @-> (ptr double) @-> returning (ptr CGImage.t)) +let _CGImageCreateWithPNGDataProvider = Foreign.foreign ~stub:true "CGImageCreateWithPNGDataProvider" ((ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> int @-> returning (ptr CGImage.t)) +let _CGImageGetAlphaInfo = Foreign.foreign ~stub:true "CGImageGetAlphaInfo" ((ptr CGImage.t) @-> returning uint) +let _CGImageGetBitmapInfo = Foreign.foreign ~stub:true "CGImageGetBitmapInfo" ((ptr CGImage.t) @-> returning uint) +let _CGImageGetBitsPerComponent = Foreign.foreign ~stub:true "CGImageGetBitsPerComponent" ((ptr CGImage.t) @-> returning ullong) +let _CGImageGetBitsPerPixel = Foreign.foreign ~stub:true "CGImageGetBitsPerPixel" ((ptr CGImage.t) @-> returning ullong) +let _CGImageGetByteOrderInfo = Foreign.foreign ~stub:true "CGImageGetByteOrderInfo" ((ptr CGImage.t) @-> returning uint) +let _CGImageGetBytesPerRow = Foreign.foreign ~stub:true "CGImageGetBytesPerRow" ((ptr CGImage.t) @-> returning ullong) +let _CGImageGetColorSpace = Foreign.foreign ~stub:true "CGImageGetColorSpace" ((ptr CGImage.t) @-> returning (ptr CGColorSpace.t)) +let _CGImageGetDataProvider = Foreign.foreign ~stub:true "CGImageGetDataProvider" ((ptr CGImage.t) @-> returning (ptr CGDataProvider.t)) +let _CGImageGetDecode = Foreign.foreign ~stub:true "CGImageGetDecode" ((ptr CGImage.t) @-> returning (ptr double)) +let _CGImageGetHeight = Foreign.foreign ~stub:true "CGImageGetHeight" ((ptr CGImage.t) @-> returning ullong) +let _CGImageGetPixelFormatInfo = Foreign.foreign ~stub:true "CGImageGetPixelFormatInfo" ((ptr CGImage.t) @-> returning uint) +let _CGImageGetRenderingIntent = Foreign.foreign ~stub:true "CGImageGetRenderingIntent" ((ptr CGImage.t) @-> returning int) +let _CGImageGetShouldInterpolate = Foreign.foreign ~stub:true "CGImageGetShouldInterpolate" ((ptr CGImage.t) @-> returning bool) +let _CGImageGetTypeID = Foreign.foreign ~stub:true "CGImageGetTypeID" (void @-> returning ullong) +let _CGImageGetUTType = Foreign.foreign ~stub:true "CGImageGetUTType" ((ptr CGImage.t) @-> returning (ptr CFString.t)) +let _CGImageGetWidth = Foreign.foreign ~stub:true "CGImageGetWidth" ((ptr CGImage.t) @-> returning ullong) +let _CGImageIsMask = Foreign.foreign ~stub:true "CGImageIsMask" ((ptr CGImage.t) @-> returning bool) +let _CGImageMaskCreate = Foreign.foreign ~stub:true "CGImageMaskCreate" (ullong @-> ullong @-> ullong @-> ullong @-> ullong @-> (ptr CGDataProvider.t) @-> (ptr double) @-> bool @-> returning (ptr CGImage.t)) +let _CGImageRelease = Foreign.foreign ~stub:true "CGImageRelease" ((ptr CGImage.t) @-> returning void) +let _CGImageRetain = Foreign.foreign ~stub:true "CGImageRetain" ((ptr CGImage.t) @-> returning (ptr CGImage.t)) +let _CGInhibitLocalEvents = Foreign.foreign ~stub:true "CGInhibitLocalEvents" (uint @-> returning int) +let _CGLayerCreateWithContext = Foreign.foreign ~stub:true "CGLayerCreateWithContext" ((ptr CGContext.t) @-> CGSize.t @-> (ptr CFDictionary.t) @-> returning (ptr CGLayer.t)) +let _CGLayerGetContext = Foreign.foreign ~stub:true "CGLayerGetContext" ((ptr CGLayer.t) @-> returning (ptr CGContext.t)) +let _CGLayerGetSize = Foreign.foreign ~stub:true "CGLayerGetSize" ((ptr CGLayer.t) @-> returning CGSize.t) +let _CGLayerGetTypeID = Foreign.foreign ~stub:true "CGLayerGetTypeID" (void @-> returning ullong) +let _CGLayerRelease = Foreign.foreign ~stub:true "CGLayerRelease" ((ptr CGLayer.t) @-> returning void) +let _CGLayerRetain = Foreign.foreign ~stub:true "CGLayerRetain" ((ptr CGLayer.t) @-> returning (ptr CGLayer.t)) +let _CGMainDisplayID = Foreign.foreign ~stub:true "CGMainDisplayID" (void @-> returning uint) +let _CGOpenGLDisplayMaskToDisplayID = Foreign.foreign ~stub:true "CGOpenGLDisplayMaskToDisplayID" (uint @-> returning uint) +let _CGPDFArrayApplyBlock = Foreign.foreign ~stub:true "CGPDFArrayApplyBlock" ((ptr CGPDFArray.t) @-> Foreign.funptr (ullong @-> (ptr CGPDFObject.t) @-> (ptr void) @-> returning bool) @-> (ptr void) @-> returning void) +let _CGPDFArrayGetArray = Foreign.foreign ~stub:true "CGPDFArrayGetArray" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFArray.t)) @-> returning bool) +let _CGPDFArrayGetBoolean = Foreign.foreign ~stub:true "CGPDFArrayGetBoolean" ((ptr CGPDFArray.t) @-> ullong @-> string @-> returning bool) +let _CGPDFArrayGetCount = Foreign.foreign ~stub:true "CGPDFArrayGetCount" ((ptr CGPDFArray.t) @-> returning ullong) +let _CGPDFArrayGetDictionary = Foreign.foreign ~stub:true "CGPDFArrayGetDictionary" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFDictionary.t)) @-> returning bool) +let _CGPDFArrayGetInteger = Foreign.foreign ~stub:true "CGPDFArrayGetInteger" ((ptr CGPDFArray.t) @-> ullong @-> (ptr llong) @-> returning bool) +let _CGPDFArrayGetName = Foreign.foreign ~stub:true "CGPDFArrayGetName" ((ptr CGPDFArray.t) @-> ullong @-> (ptr string) @-> returning bool) +let _CGPDFArrayGetNull = Foreign.foreign ~stub:true "CGPDFArrayGetNull" ((ptr CGPDFArray.t) @-> ullong @-> returning bool) +let _CGPDFArrayGetNumber = Foreign.foreign ~stub:true "CGPDFArrayGetNumber" ((ptr CGPDFArray.t) @-> ullong @-> (ptr double) @-> returning bool) +let _CGPDFArrayGetObject = Foreign.foreign ~stub:true "CGPDFArrayGetObject" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFObject.t)) @-> returning bool) +let _CGPDFArrayGetStream = Foreign.foreign ~stub:true "CGPDFArrayGetStream" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFStream.t)) @-> returning bool) +let _CGPDFArrayGetString = Foreign.foreign ~stub:true "CGPDFArrayGetString" ((ptr CGPDFArray.t) @-> ullong @-> (ptr (ptr CGPDFString.t)) @-> returning bool) +let _CGPDFContentStreamCreateWithPage = Foreign.foreign ~stub:true "CGPDFContentStreamCreateWithPage" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFContentStream.t)) +let _CGPDFContentStreamCreateWithStream = Foreign.foreign ~stub:true "CGPDFContentStreamCreateWithStream" ((ptr CGPDFStream.t) @-> (ptr CGPDFDictionary.t) @-> (ptr CGPDFContentStream.t) @-> returning (ptr CGPDFContentStream.t)) +let _CGPDFContentStreamGetResource = Foreign.foreign ~stub:true "CGPDFContentStreamGetResource" ((ptr CGPDFContentStream.t) @-> string @-> string @-> returning (ptr CGPDFObject.t)) +let _CGPDFContentStreamGetStreams = Foreign.foreign ~stub:true "CGPDFContentStreamGetStreams" ((ptr CGPDFContentStream.t) @-> returning (ptr CFArray.t)) +let _CGPDFContentStreamRelease = Foreign.foreign ~stub:true "CGPDFContentStreamRelease" ((ptr CGPDFContentStream.t) @-> returning void) +let _CGPDFContentStreamRetain = Foreign.foreign ~stub:true "CGPDFContentStreamRetain" ((ptr CGPDFContentStream.t) @-> returning (ptr CGPDFContentStream.t)) +let _CGPDFContextAddDestinationAtPoint = Foreign.foreign ~stub:true "CGPDFContextAddDestinationAtPoint" ((ptr CGContext.t) @-> (ptr CFString.t) @-> CGPoint.t @-> returning void) +let _CGPDFContextAddDocumentMetadata = Foreign.foreign ~stub:true "CGPDFContextAddDocumentMetadata" ((ptr CGContext.t) @-> (ptr CFData.t) @-> returning void) +let _CGPDFContextBeginPage = Foreign.foreign ~stub:true "CGPDFContextBeginPage" ((ptr CGContext.t) @-> (ptr CFDictionary.t) @-> returning void) +let _CGPDFContextBeginTag = Foreign.foreign ~stub:true "CGPDFContextBeginTag" ((ptr CGContext.t) @-> int @-> (ptr CFDictionary.t) @-> returning void) +let _CGPDFContextClose = Foreign.foreign ~stub:true "CGPDFContextClose" ((ptr CGContext.t) @-> returning void) +let _CGPDFContextCreate = Foreign.foreign ~stub:true "CGPDFContextCreate" ((ptr CGDataConsumer.t) @-> (ptr CGRect.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGContext.t)) +let _CGPDFContextCreateWithURL = Foreign.foreign ~stub:true "CGPDFContextCreateWithURL" ((ptr CFURL.t) @-> (ptr CGRect.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGContext.t)) +let _CGPDFContextEndPage = Foreign.foreign ~stub:true "CGPDFContextEndPage" ((ptr CGContext.t) @-> returning void) +let _CGPDFContextEndTag = Foreign.foreign ~stub:true "CGPDFContextEndTag" ((ptr CGContext.t) @-> returning void) +let _CGPDFContextSetDestinationForRect = Foreign.foreign ~stub:true "CGPDFContextSetDestinationForRect" ((ptr CGContext.t) @-> (ptr CFString.t) @-> CGRect.t @-> returning void) +let _CGPDFContextSetOutline = Foreign.foreign ~stub:true "CGPDFContextSetOutline" ((ptr CGContext.t) @-> (ptr CFDictionary.t) @-> returning void) +let _CGPDFContextSetURLForRect = Foreign.foreign ~stub:true "CGPDFContextSetURLForRect" ((ptr CGContext.t) @-> (ptr CFURL.t) @-> CGRect.t @-> returning void) +let _CGPDFDictionaryApplyBlock = Foreign.foreign ~stub:true "CGPDFDictionaryApplyBlock" ((ptr CGPDFDictionary.t) @-> Foreign.funptr (string @-> (ptr CGPDFObject.t) @-> (ptr void) @-> returning bool) @-> (ptr void) @-> returning void) +let _CGPDFDictionaryApplyFunction = Foreign.foreign ~stub:true "CGPDFDictionaryApplyFunction" ((ptr CGPDFDictionary.t) @-> Foreign.funptr (string @-> (ptr CGPDFObject.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CGPDFDictionaryGetArray = Foreign.foreign ~stub:true "CGPDFDictionaryGetArray" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFArray.t)) @-> returning bool) +let _CGPDFDictionaryGetBoolean = Foreign.foreign ~stub:true "CGPDFDictionaryGetBoolean" ((ptr CGPDFDictionary.t) @-> string @-> string @-> returning bool) +let _CGPDFDictionaryGetCount = Foreign.foreign ~stub:true "CGPDFDictionaryGetCount" ((ptr CGPDFDictionary.t) @-> returning ullong) +let _CGPDFDictionaryGetDictionary = Foreign.foreign ~stub:true "CGPDFDictionaryGetDictionary" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFDictionary.t)) @-> returning bool) +let _CGPDFDictionaryGetInteger = Foreign.foreign ~stub:true "CGPDFDictionaryGetInteger" ((ptr CGPDFDictionary.t) @-> string @-> (ptr llong) @-> returning bool) +let _CGPDFDictionaryGetName = Foreign.foreign ~stub:true "CGPDFDictionaryGetName" ((ptr CGPDFDictionary.t) @-> string @-> (ptr string) @-> returning bool) +let _CGPDFDictionaryGetNumber = Foreign.foreign ~stub:true "CGPDFDictionaryGetNumber" ((ptr CGPDFDictionary.t) @-> string @-> (ptr double) @-> returning bool) +let _CGPDFDictionaryGetObject = Foreign.foreign ~stub:true "CGPDFDictionaryGetObject" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFObject.t)) @-> returning bool) +let _CGPDFDictionaryGetStream = Foreign.foreign ~stub:true "CGPDFDictionaryGetStream" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFStream.t)) @-> returning bool) +let _CGPDFDictionaryGetString = Foreign.foreign ~stub:true "CGPDFDictionaryGetString" ((ptr CGPDFDictionary.t) @-> string @-> (ptr (ptr CGPDFString.t)) @-> returning bool) +let _CGPDFDocumentAllowsCopying = Foreign.foreign ~stub:true "CGPDFDocumentAllowsCopying" ((ptr CGPDFDocument.t) @-> returning bool) +let _CGPDFDocumentAllowsPrinting = Foreign.foreign ~stub:true "CGPDFDocumentAllowsPrinting" ((ptr CGPDFDocument.t) @-> returning bool) +let _CGPDFDocumentCreateWithProvider = Foreign.foreign ~stub:true "CGPDFDocumentCreateWithProvider" ((ptr CGDataProvider.t) @-> returning (ptr CGPDFDocument.t)) +let _CGPDFDocumentCreateWithURL = Foreign.foreign ~stub:true "CGPDFDocumentCreateWithURL" ((ptr CFURL.t) @-> returning (ptr CGPDFDocument.t)) +let _CGPDFDocumentGetAccessPermissions = Foreign.foreign ~stub:true "CGPDFDocumentGetAccessPermissions" ((ptr CGPDFDocument.t) @-> returning uint) +let _CGPDFDocumentGetArtBox = Foreign.foreign ~stub:true "CGPDFDocumentGetArtBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) +let _CGPDFDocumentGetBleedBox = Foreign.foreign ~stub:true "CGPDFDocumentGetBleedBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) +let _CGPDFDocumentGetCatalog = Foreign.foreign ~stub:true "CGPDFDocumentGetCatalog" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFDictionary.t)) +let _CGPDFDocumentGetCropBox = Foreign.foreign ~stub:true "CGPDFDocumentGetCropBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) +let _CGPDFDocumentGetID = Foreign.foreign ~stub:true "CGPDFDocumentGetID" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFArray.t)) +let _CGPDFDocumentGetInfo = Foreign.foreign ~stub:true "CGPDFDocumentGetInfo" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFDictionary.t)) +let _CGPDFDocumentGetMediaBox = Foreign.foreign ~stub:true "CGPDFDocumentGetMediaBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) +let _CGPDFDocumentGetNumberOfPages = Foreign.foreign ~stub:true "CGPDFDocumentGetNumberOfPages" ((ptr CGPDFDocument.t) @-> returning ullong) +let _CGPDFDocumentGetOutline = Foreign.foreign ~stub:true "CGPDFDocumentGetOutline" ((ptr CGPDFDocument.t) @-> returning (ptr CFDictionary.t)) +let _CGPDFDocumentGetPage = Foreign.foreign ~stub:true "CGPDFDocumentGetPage" ((ptr CGPDFDocument.t) @-> ullong @-> returning (ptr CGPDFPage.t)) +let _CGPDFDocumentGetRotationAngle = Foreign.foreign ~stub:true "CGPDFDocumentGetRotationAngle" ((ptr CGPDFDocument.t) @-> int @-> returning int) +let _CGPDFDocumentGetTrimBox = Foreign.foreign ~stub:true "CGPDFDocumentGetTrimBox" ((ptr CGPDFDocument.t) @-> int @-> returning CGRect.t) +let _CGPDFDocumentGetTypeID = Foreign.foreign ~stub:true "CGPDFDocumentGetTypeID" (void @-> returning ullong) +let _CGPDFDocumentGetVersion = Foreign.foreign ~stub:true "CGPDFDocumentGetVersion" ((ptr CGPDFDocument.t) @-> (ptr int) @-> (ptr int) @-> returning void) +let _CGPDFDocumentIsEncrypted = Foreign.foreign ~stub:true "CGPDFDocumentIsEncrypted" ((ptr CGPDFDocument.t) @-> returning bool) +let _CGPDFDocumentIsUnlocked = Foreign.foreign ~stub:true "CGPDFDocumentIsUnlocked" ((ptr CGPDFDocument.t) @-> returning bool) +let _CGPDFDocumentRelease = Foreign.foreign ~stub:true "CGPDFDocumentRelease" ((ptr CGPDFDocument.t) @-> returning void) +let _CGPDFDocumentRetain = Foreign.foreign ~stub:true "CGPDFDocumentRetain" ((ptr CGPDFDocument.t) @-> returning (ptr CGPDFDocument.t)) +let _CGPDFDocumentUnlockWithPassword = Foreign.foreign ~stub:true "CGPDFDocumentUnlockWithPassword" ((ptr CGPDFDocument.t) @-> string @-> returning bool) +let _CGPDFObjectGetType = Foreign.foreign ~stub:true "CGPDFObjectGetType" ((ptr CGPDFObject.t) @-> returning int) +let _CGPDFObjectGetValue = Foreign.foreign ~stub:true "CGPDFObjectGetValue" ((ptr CGPDFObject.t) @-> int @-> (ptr void) @-> returning bool) +let _CGPDFOperatorTableCreate = Foreign.foreign ~stub:true "CGPDFOperatorTableCreate" (void @-> returning (ptr CGPDFOperatorTable.t)) +let _CGPDFOperatorTableRelease = Foreign.foreign ~stub:true "CGPDFOperatorTableRelease" ((ptr CGPDFOperatorTable.t) @-> returning void) +let _CGPDFOperatorTableRetain = Foreign.foreign ~stub:true "CGPDFOperatorTableRetain" ((ptr CGPDFOperatorTable.t) @-> returning (ptr CGPDFOperatorTable.t)) +let _CGPDFOperatorTableSetCallback = Foreign.foreign ~stub:true "CGPDFOperatorTableSetCallback" ((ptr CGPDFOperatorTable.t) @-> string @-> Foreign.funptr ((ptr CGPDFScanner.t) @-> (ptr void) @-> returning void) @-> returning void) +let _CGPDFPageGetBoxRect = Foreign.foreign ~stub:true "CGPDFPageGetBoxRect" ((ptr CGPDFPage.t) @-> int @-> returning CGRect.t) +let _CGPDFPageGetDictionary = Foreign.foreign ~stub:true "CGPDFPageGetDictionary" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFDictionary.t)) +let _CGPDFPageGetDocument = Foreign.foreign ~stub:true "CGPDFPageGetDocument" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFDocument.t)) +let _CGPDFPageGetDrawingTransform = Foreign.foreign ~stub:true "CGPDFPageGetDrawingTransform" ((ptr CGPDFPage.t) @-> int @-> CGRect.t @-> int @-> bool @-> returning CGAffineTransform.t) +let _CGPDFPageGetPageNumber = Foreign.foreign ~stub:true "CGPDFPageGetPageNumber" ((ptr CGPDFPage.t) @-> returning ullong) +let _CGPDFPageGetRotationAngle = Foreign.foreign ~stub:true "CGPDFPageGetRotationAngle" ((ptr CGPDFPage.t) @-> returning int) +let _CGPDFPageGetTypeID = Foreign.foreign ~stub:true "CGPDFPageGetTypeID" (void @-> returning ullong) +let _CGPDFPageRelease = Foreign.foreign ~stub:true "CGPDFPageRelease" ((ptr CGPDFPage.t) @-> returning void) +let _CGPDFPageRetain = Foreign.foreign ~stub:true "CGPDFPageRetain" ((ptr CGPDFPage.t) @-> returning (ptr CGPDFPage.t)) +let _CGPDFScannerCreate = Foreign.foreign ~stub:true "CGPDFScannerCreate" ((ptr CGPDFContentStream.t) @-> (ptr CGPDFOperatorTable.t) @-> (ptr void) @-> returning (ptr CGPDFScanner.t)) +let _CGPDFScannerGetContentStream = Foreign.foreign ~stub:true "CGPDFScannerGetContentStream" ((ptr CGPDFScanner.t) @-> returning (ptr CGPDFContentStream.t)) +let _CGPDFScannerPopArray = Foreign.foreign ~stub:true "CGPDFScannerPopArray" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFArray.t)) @-> returning bool) +let _CGPDFScannerPopBoolean = Foreign.foreign ~stub:true "CGPDFScannerPopBoolean" ((ptr CGPDFScanner.t) @-> string @-> returning bool) +let _CGPDFScannerPopDictionary = Foreign.foreign ~stub:true "CGPDFScannerPopDictionary" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFDictionary.t)) @-> returning bool) +let _CGPDFScannerPopInteger = Foreign.foreign ~stub:true "CGPDFScannerPopInteger" ((ptr CGPDFScanner.t) @-> (ptr llong) @-> returning bool) +let _CGPDFScannerPopName = Foreign.foreign ~stub:true "CGPDFScannerPopName" ((ptr CGPDFScanner.t) @-> (ptr string) @-> returning bool) +let _CGPDFScannerPopNumber = Foreign.foreign ~stub:true "CGPDFScannerPopNumber" ((ptr CGPDFScanner.t) @-> (ptr double) @-> returning bool) +let _CGPDFScannerPopObject = Foreign.foreign ~stub:true "CGPDFScannerPopObject" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFObject.t)) @-> returning bool) +let _CGPDFScannerPopStream = Foreign.foreign ~stub:true "CGPDFScannerPopStream" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFStream.t)) @-> returning bool) +let _CGPDFScannerPopString = Foreign.foreign ~stub:true "CGPDFScannerPopString" ((ptr CGPDFScanner.t) @-> (ptr (ptr CGPDFString.t)) @-> returning bool) +let _CGPDFScannerRelease = Foreign.foreign ~stub:true "CGPDFScannerRelease" ((ptr CGPDFScanner.t) @-> returning void) +let _CGPDFScannerRetain = Foreign.foreign ~stub:true "CGPDFScannerRetain" ((ptr CGPDFScanner.t) @-> returning (ptr CGPDFScanner.t)) +let _CGPDFScannerScan = Foreign.foreign ~stub:true "CGPDFScannerScan" ((ptr CGPDFScanner.t) @-> returning bool) +let _CGPDFStreamCopyData = Foreign.foreign ~stub:true "CGPDFStreamCopyData" ((ptr CGPDFStream.t) @-> (ptr int) @-> returning (ptr CFData.t)) +let _CGPDFStreamGetDictionary = Foreign.foreign ~stub:true "CGPDFStreamGetDictionary" ((ptr CGPDFStream.t) @-> returning (ptr CGPDFDictionary.t)) +let _CGPDFStringCopyDate = Foreign.foreign ~stub:true "CGPDFStringCopyDate" ((ptr CGPDFString.t) @-> returning (ptr CFDate.t)) +let _CGPDFStringCopyTextString = Foreign.foreign ~stub:true "CGPDFStringCopyTextString" ((ptr CGPDFString.t) @-> returning (ptr CFString.t)) +let _CGPDFStringGetBytePtr = Foreign.foreign ~stub:true "CGPDFStringGetBytePtr" ((ptr CGPDFString.t) @-> returning string) +let _CGPDFStringGetLength = Foreign.foreign ~stub:true "CGPDFStringGetLength" ((ptr CGPDFString.t) @-> returning ullong) +let _CGPDFTagTypeGetName = Foreign.foreign ~stub:true "CGPDFTagTypeGetName" (int @-> returning string) +let _CGPSConverterAbort = Foreign.foreign ~stub:true "CGPSConverterAbort" ((ptr CGPSConverter.t) @-> returning bool) +let _CGPSConverterConvert = Foreign.foreign ~stub:true "CGPSConverterConvert" ((ptr CGPSConverter.t) @-> (ptr CGDataProvider.t) @-> (ptr CGDataConsumer.t) @-> (ptr CFDictionary.t) @-> returning bool) +let _CGPSConverterCreate = Foreign.foreign ~stub:true "CGPSConverterCreate" ((ptr void) @-> (ptr CGPSConverterCallbacks.t) @-> (ptr CFDictionary.t) @-> returning (ptr CGPSConverter.t)) +let _CGPSConverterGetTypeID = Foreign.foreign ~stub:true "CGPSConverterGetTypeID" (void @-> returning ullong) +let _CGPSConverterIsConverting = Foreign.foreign ~stub:true "CGPSConverterIsConverting" ((ptr CGPSConverter.t) @-> returning bool) +let _CGPathAddArc = Foreign.foreign ~stub:true "CGPathAddArc" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> bool @-> returning void) +let _CGPathAddArcToPoint = Foreign.foreign ~stub:true "CGPathAddArcToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) +let _CGPathAddCurveToPoint = Foreign.foreign ~stub:true "CGPathAddCurveToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> double @-> returning void) +let _CGPathAddEllipseInRect = Foreign.foreign ~stub:true "CGPathAddEllipseInRect" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGRect.t @-> returning void) +let _CGPathAddLineToPoint = Foreign.foreign ~stub:true "CGPathAddLineToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> returning void) +let _CGPathAddLines = Foreign.foreign ~stub:true "CGPathAddLines" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> (ptr CGPoint.t) @-> ullong @-> returning void) +let _CGPathAddPath = Foreign.foreign ~stub:true "CGPathAddPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> (ptr CGPath.t) @-> returning void) +let _CGPathAddQuadCurveToPoint = Foreign.foreign ~stub:true "CGPathAddQuadCurveToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> returning void) +let _CGPathAddRect = Foreign.foreign ~stub:true "CGPathAddRect" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGRect.t @-> returning void) +let _CGPathAddRects = Foreign.foreign ~stub:true "CGPathAddRects" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> (ptr CGRect.t) @-> ullong @-> returning void) +let _CGPathAddRelativeArc = Foreign.foreign ~stub:true "CGPathAddRelativeArc" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> double @-> double @-> double @-> returning void) +let _CGPathAddRoundedRect = Foreign.foreign ~stub:true "CGPathAddRoundedRect" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGRect.t @-> double @-> double @-> returning void) +let _CGPathApply = Foreign.foreign ~stub:true "CGPathApply" ((ptr CGPath.t) @-> (ptr void) @-> Foreign.funptr ((ptr void) @-> (ptr CGPathElement.t) @-> returning void) @-> returning void) +let _CGPathApplyWithBlock = Foreign.foreign ~stub:true "CGPathApplyWithBlock" ((ptr CGPath.t) @-> Foreign.funptr ((ptr CGPathElement.t) @-> returning void) @-> returning void) +let _CGPathCloseSubpath = Foreign.foreign ~stub:true "CGPathCloseSubpath" ((ptr CGPath.t) @-> returning void) +let _CGPathContainsPoint = Foreign.foreign ~stub:true "CGPathContainsPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> CGPoint.t @-> bool @-> returning bool) +let _CGPathCreateCopy = Foreign.foreign ~stub:true "CGPathCreateCopy" ((ptr CGPath.t) @-> returning (ptr CGPath.t)) +let _CGPathCreateCopyByDashingPath = Foreign.foreign ~stub:true "CGPathCreateCopyByDashingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> (ptr double) @-> ullong @-> returning (ptr CGPath.t)) +let _CGPathCreateCopyByStrokingPath = Foreign.foreign ~stub:true "CGPathCreateCopyByStrokingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> int @-> int @-> double @-> returning (ptr CGPath.t)) +let _CGPathCreateCopyByTransformingPath = Foreign.foreign ~stub:true "CGPathCreateCopyByTransformingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) +let _CGPathCreateMutable = Foreign.foreign ~stub:true "CGPathCreateMutable" (void @-> returning (ptr CGPath.t)) +let _CGPathCreateMutableCopy = Foreign.foreign ~stub:true "CGPathCreateMutableCopy" ((ptr CGPath.t) @-> returning (ptr CGPath.t)) +let _CGPathCreateMutableCopyByTransformingPath = Foreign.foreign ~stub:true "CGPathCreateMutableCopyByTransformingPath" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) +let _CGPathCreateWithEllipseInRect = Foreign.foreign ~stub:true "CGPathCreateWithEllipseInRect" (CGRect.t @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) +let _CGPathCreateWithRect = Foreign.foreign ~stub:true "CGPathCreateWithRect" (CGRect.t @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) +let _CGPathCreateWithRoundedRect = Foreign.foreign ~stub:true "CGPathCreateWithRoundedRect" (CGRect.t @-> double @-> double @-> (ptr CGAffineTransform.t) @-> returning (ptr CGPath.t)) +let _CGPathEqualToPath = Foreign.foreign ~stub:true "CGPathEqualToPath" ((ptr CGPath.t) @-> (ptr CGPath.t) @-> returning bool) +let _CGPathGetBoundingBox = Foreign.foreign ~stub:true "CGPathGetBoundingBox" ((ptr CGPath.t) @-> returning CGRect.t) +let _CGPathGetCurrentPoint = Foreign.foreign ~stub:true "CGPathGetCurrentPoint" ((ptr CGPath.t) @-> returning CGPoint.t) +let _CGPathGetPathBoundingBox = Foreign.foreign ~stub:true "CGPathGetPathBoundingBox" ((ptr CGPath.t) @-> returning CGRect.t) +let _CGPathGetTypeID = Foreign.foreign ~stub:true "CGPathGetTypeID" (void @-> returning ullong) +let _CGPathIsEmpty = Foreign.foreign ~stub:true "CGPathIsEmpty" ((ptr CGPath.t) @-> returning bool) +let _CGPathIsRect = Foreign.foreign ~stub:true "CGPathIsRect" ((ptr CGPath.t) @-> (ptr CGRect.t) @-> returning bool) +let _CGPathMoveToPoint = Foreign.foreign ~stub:true "CGPathMoveToPoint" ((ptr CGPath.t) @-> (ptr CGAffineTransform.t) @-> double @-> double @-> returning void) +let _CGPathRelease = Foreign.foreign ~stub:true "CGPathRelease" ((ptr CGPath.t) @-> returning void) +let _CGPathRetain = Foreign.foreign ~stub:true "CGPathRetain" ((ptr CGPath.t) @-> returning (ptr CGPath.t)) +let _CGPatternCreate = Foreign.foreign ~stub:true "CGPatternCreate" ((ptr void) @-> CGRect.t @-> CGAffineTransform.t @-> double @-> double @-> int @-> bool @-> (ptr CGPatternCallbacks.t) @-> returning (ptr CGPattern.t)) +let _CGPatternGetTypeID = Foreign.foreign ~stub:true "CGPatternGetTypeID" (void @-> returning ullong) +let _CGPatternRelease = Foreign.foreign ~stub:true "CGPatternRelease" ((ptr CGPattern.t) @-> returning void) +let _CGPatternRetain = Foreign.foreign ~stub:true "CGPatternRetain" ((ptr CGPattern.t) @-> returning (ptr CGPattern.t)) +let _CGPointApplyAffineTransform = Foreign.foreign ~stub:true "CGPointApplyAffineTransform" (CGPoint.t @-> CGAffineTransform.t @-> returning CGPoint.t) +let _CGPointCreateDictionaryRepresentation = Foreign.foreign ~stub:true "CGPointCreateDictionaryRepresentation" (CGPoint.t @-> returning (ptr CFDictionary.t)) +let _CGPointEqualToPoint = Foreign.foreign ~stub:true "CGPointEqualToPoint" (CGPoint.t @-> CGPoint.t @-> returning bool) (* let _CGPointMake = Foreign.foreign "Camlkit_CGPointMake" (double @-> double @-> returning CGPoint.t) *) -let _CGPointMakeWithDictionaryRepresentation = Foreign.foreign "CGPointMakeWithDictionaryRepresentation" ((ptr CFDictionary.t) @-> (ptr CGPoint.t) @-> returning bool) -let _CGPostKeyboardEvent = Foreign.foreign "CGPostKeyboardEvent" (ushort @-> ushort @-> uint @-> returning int) -let _CGPostMouseEvent = Foreign.foreign "CGPostMouseEvent" (CGPoint.t @-> uint @-> uint @-> uint @-> returning int) -let _CGPostScrollWheelEvent = Foreign.foreign "CGPostScrollWheelEvent" (uint @-> int @-> returning int) -let _CGPreflightListenEventAccess = Foreign.foreign "CGPreflightListenEventAccess" (void @-> returning bool) -let _CGPreflightPostEventAccess = Foreign.foreign "CGPreflightPostEventAccess" (void @-> returning bool) -let _CGPreflightScreenCaptureAccess = Foreign.foreign "CGPreflightScreenCaptureAccess" (void @-> returning bool) -let _CGRectApplyAffineTransform = Foreign.foreign "CGRectApplyAffineTransform" (CGRect.t @-> CGAffineTransform.t @-> returning CGRect.t) -let _CGRectContainsPoint = Foreign.foreign "CGRectContainsPoint" (CGRect.t @-> CGPoint.t @-> returning bool) -let _CGRectContainsRect = Foreign.foreign "CGRectContainsRect" (CGRect.t @-> CGRect.t @-> returning bool) -let _CGRectCreateDictionaryRepresentation = Foreign.foreign "CGRectCreateDictionaryRepresentation" (CGRect.t @-> returning (ptr CFDictionary.t)) -let _CGRectDivide = Foreign.foreign "CGRectDivide" (CGRect.t @-> (ptr CGRect.t) @-> (ptr CGRect.t) @-> double @-> uint @-> returning void) -let _CGRectEqualToRect = Foreign.foreign "CGRectEqualToRect" (CGRect.t @-> CGRect.t @-> returning bool) -let _CGRectGetHeight = Foreign.foreign "CGRectGetHeight" (CGRect.t @-> returning double) -let _CGRectGetMaxX = Foreign.foreign "CGRectGetMaxX" (CGRect.t @-> returning double) -let _CGRectGetMaxY = Foreign.foreign "CGRectGetMaxY" (CGRect.t @-> returning double) -let _CGRectGetMidX = Foreign.foreign "CGRectGetMidX" (CGRect.t @-> returning double) -let _CGRectGetMidY = Foreign.foreign "CGRectGetMidY" (CGRect.t @-> returning double) -let _CGRectGetMinX = Foreign.foreign "CGRectGetMinX" (CGRect.t @-> returning double) -let _CGRectGetMinY = Foreign.foreign "CGRectGetMinY" (CGRect.t @-> returning double) -let _CGRectGetWidth = Foreign.foreign "CGRectGetWidth" (CGRect.t @-> returning double) -let _CGRectInset = Foreign.foreign "CGRectInset" (CGRect.t @-> double @-> double @-> returning CGRect.t) -let _CGRectIntegral = Foreign.foreign "CGRectIntegral" (CGRect.t @-> returning CGRect.t) -let _CGRectIntersection = Foreign.foreign "CGRectIntersection" (CGRect.t @-> CGRect.t @-> returning CGRect.t) -let _CGRectIntersectsRect = Foreign.foreign "CGRectIntersectsRect" (CGRect.t @-> CGRect.t @-> returning bool) -let _CGRectIsEmpty = Foreign.foreign "CGRectIsEmpty" (CGRect.t @-> returning bool) -let _CGRectIsInfinite = Foreign.foreign "CGRectIsInfinite" (CGRect.t @-> returning bool) -let _CGRectIsNull = Foreign.foreign "CGRectIsNull" (CGRect.t @-> returning bool) +let _CGPointMakeWithDictionaryRepresentation = Foreign.foreign ~stub:true "CGPointMakeWithDictionaryRepresentation" ((ptr CFDictionary.t) @-> (ptr CGPoint.t) @-> returning bool) +let _CGPostKeyboardEvent = Foreign.foreign ~stub:true "CGPostKeyboardEvent" (ushort @-> ushort @-> uint @-> returning int) +let _CGPostMouseEvent = Foreign.foreign ~stub:true "CGPostMouseEvent" (CGPoint.t @-> uint @-> uint @-> uint @-> returning int) +let _CGPostScrollWheelEvent = Foreign.foreign ~stub:true "CGPostScrollWheelEvent" (uint @-> int @-> returning int) +let _CGPreflightListenEventAccess = Foreign.foreign ~stub:true "CGPreflightListenEventAccess" (void @-> returning bool) +let _CGPreflightPostEventAccess = Foreign.foreign ~stub:true "CGPreflightPostEventAccess" (void @-> returning bool) +let _CGPreflightScreenCaptureAccess = Foreign.foreign ~stub:true "CGPreflightScreenCaptureAccess" (void @-> returning bool) +let _CGRectApplyAffineTransform = Foreign.foreign ~stub:true "CGRectApplyAffineTransform" (CGRect.t @-> CGAffineTransform.t @-> returning CGRect.t) +let _CGRectContainsPoint = Foreign.foreign ~stub:true "CGRectContainsPoint" (CGRect.t @-> CGPoint.t @-> returning bool) +let _CGRectContainsRect = Foreign.foreign ~stub:true "CGRectContainsRect" (CGRect.t @-> CGRect.t @-> returning bool) +let _CGRectCreateDictionaryRepresentation = Foreign.foreign ~stub:true "CGRectCreateDictionaryRepresentation" (CGRect.t @-> returning (ptr CFDictionary.t)) +let _CGRectDivide = Foreign.foreign ~stub:true "CGRectDivide" (CGRect.t @-> (ptr CGRect.t) @-> (ptr CGRect.t) @-> double @-> uint @-> returning void) +let _CGRectEqualToRect = Foreign.foreign ~stub:true "CGRectEqualToRect" (CGRect.t @-> CGRect.t @-> returning bool) +let _CGRectGetHeight = Foreign.foreign ~stub:true "CGRectGetHeight" (CGRect.t @-> returning double) +let _CGRectGetMaxX = Foreign.foreign ~stub:true "CGRectGetMaxX" (CGRect.t @-> returning double) +let _CGRectGetMaxY = Foreign.foreign ~stub:true "CGRectGetMaxY" (CGRect.t @-> returning double) +let _CGRectGetMidX = Foreign.foreign ~stub:true "CGRectGetMidX" (CGRect.t @-> returning double) +let _CGRectGetMidY = Foreign.foreign ~stub:true "CGRectGetMidY" (CGRect.t @-> returning double) +let _CGRectGetMinX = Foreign.foreign ~stub:true "CGRectGetMinX" (CGRect.t @-> returning double) +let _CGRectGetMinY = Foreign.foreign ~stub:true "CGRectGetMinY" (CGRect.t @-> returning double) +let _CGRectGetWidth = Foreign.foreign ~stub:true "CGRectGetWidth" (CGRect.t @-> returning double) +let _CGRectInset = Foreign.foreign ~stub:true "CGRectInset" (CGRect.t @-> double @-> double @-> returning CGRect.t) +let _CGRectIntegral = Foreign.foreign ~stub:true "CGRectIntegral" (CGRect.t @-> returning CGRect.t) +let _CGRectIntersection = Foreign.foreign ~stub:true "CGRectIntersection" (CGRect.t @-> CGRect.t @-> returning CGRect.t) +let _CGRectIntersectsRect = Foreign.foreign ~stub:true "CGRectIntersectsRect" (CGRect.t @-> CGRect.t @-> returning bool) +let _CGRectIsEmpty = Foreign.foreign ~stub:true "CGRectIsEmpty" (CGRect.t @-> returning bool) +let _CGRectIsInfinite = Foreign.foreign ~stub:true "CGRectIsInfinite" (CGRect.t @-> returning bool) +let _CGRectIsNull = Foreign.foreign ~stub:true "CGRectIsNull" (CGRect.t @-> returning bool) (* let _CGRectMake = Foreign.foreign "Camlkit_CGRectMake" (double @-> double @-> double @-> double @-> returning CGRect.t) *) -let _CGRectMakeWithDictionaryRepresentation = Foreign.foreign "CGRectMakeWithDictionaryRepresentation" ((ptr CFDictionary.t) @-> (ptr CGRect.t) @-> returning bool) -let _CGRectOffset = Foreign.foreign "CGRectOffset" (CGRect.t @-> double @-> double @-> returning CGRect.t) -let _CGRectStandardize = Foreign.foreign "CGRectStandardize" (CGRect.t @-> returning CGRect.t) -let _CGRectUnion = Foreign.foreign "CGRectUnion" (CGRect.t @-> CGRect.t @-> returning CGRect.t) -let _CGRegisterScreenRefreshCallback = Foreign.foreign "CGRegisterScreenRefreshCallback" (Foreign.funptr (uint @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) -let _CGReleaseAllDisplays = Foreign.foreign "CGReleaseAllDisplays" (void @-> returning int) -let _CGReleaseDisplayFadeReservation = Foreign.foreign "CGReleaseDisplayFadeReservation" (uint @-> returning int) -let _CGReleaseScreenRefreshRects = Foreign.foreign "CGReleaseScreenRefreshRects" ((ptr CGRect.t) @-> returning void) -let _CGRequestListenEventAccess = Foreign.foreign "CGRequestListenEventAccess" (void @-> returning bool) -let _CGRequestPostEventAccess = Foreign.foreign "CGRequestPostEventAccess" (void @-> returning bool) -let _CGRequestScreenCaptureAccess = Foreign.foreign "CGRequestScreenCaptureAccess" (void @-> returning bool) -let _CGRestorePermanentDisplayConfiguration = Foreign.foreign "CGRestorePermanentDisplayConfiguration" (void @-> returning void) -let _CGScreenRegisterMoveCallback = Foreign.foreign "CGScreenRegisterMoveCallback" (Foreign.funptr (CGScreenUpdateMoveDelta.t @-> ullong @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) -let _CGScreenUnregisterMoveCallback = Foreign.foreign "CGScreenUnregisterMoveCallback" (Foreign.funptr (CGScreenUpdateMoveDelta.t @-> ullong @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) -let _CGSessionCopyCurrentDictionary = Foreign.foreign "CGSessionCopyCurrentDictionary" (void @-> returning (ptr CFDictionary.t)) -let _CGSetDisplayTransferByByteTable = Foreign.foreign "CGSetDisplayTransferByByteTable" (uint @-> uint @-> string @-> string @-> string @-> returning int) -let _CGSetDisplayTransferByFormula = Foreign.foreign "CGSetDisplayTransferByFormula" (uint @-> float @-> float @-> float @-> float @-> float @-> float @-> float @-> float @-> float @-> returning int) -let _CGSetDisplayTransferByTable = Foreign.foreign "CGSetDisplayTransferByTable" (uint @-> uint @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> returning int) -let _CGSetLocalEventsFilterDuringSuppressionState = Foreign.foreign "CGSetLocalEventsFilterDuringSuppressionState" (uint @-> uint @-> returning int) -let _CGSetLocalEventsSuppressionInterval = Foreign.foreign "CGSetLocalEventsSuppressionInterval" (double @-> returning int) -let _CGShadingCreateAxial = Foreign.foreign "CGShadingCreateAxial" ((ptr CGColorSpace.t) @-> CGPoint.t @-> CGPoint.t @-> (ptr CGFunction.t) @-> bool @-> bool @-> returning (ptr CGShading.t)) -let _CGShadingCreateRadial = Foreign.foreign "CGShadingCreateRadial" ((ptr CGColorSpace.t) @-> CGPoint.t @-> double @-> CGPoint.t @-> double @-> (ptr CGFunction.t) @-> bool @-> bool @-> returning (ptr CGShading.t)) -let _CGShadingGetTypeID = Foreign.foreign "CGShadingGetTypeID" (void @-> returning ullong) -let _CGShadingRelease = Foreign.foreign "CGShadingRelease" ((ptr CGShading.t) @-> returning void) -let _CGShadingRetain = Foreign.foreign "CGShadingRetain" ((ptr CGShading.t) @-> returning (ptr CGShading.t)) -let _CGShieldingWindowID = Foreign.foreign "CGShieldingWindowID" (uint @-> returning uint) -let _CGShieldingWindowLevel = Foreign.foreign "CGShieldingWindowLevel" (void @-> returning int) -let _CGSizeApplyAffineTransform = Foreign.foreign "CGSizeApplyAffineTransform" (CGSize.t @-> CGAffineTransform.t @-> returning CGSize.t) -let _CGSizeCreateDictionaryRepresentation = Foreign.foreign "CGSizeCreateDictionaryRepresentation" (CGSize.t @-> returning (ptr CFDictionary.t)) -let _CGSizeEqualToSize = Foreign.foreign "CGSizeEqualToSize" (CGSize.t @-> CGSize.t @-> returning bool) +let _CGRectMakeWithDictionaryRepresentation = Foreign.foreign ~stub:true "CGRectMakeWithDictionaryRepresentation" ((ptr CFDictionary.t) @-> (ptr CGRect.t) @-> returning bool) +let _CGRectOffset = Foreign.foreign ~stub:true "CGRectOffset" (CGRect.t @-> double @-> double @-> returning CGRect.t) +let _CGRectStandardize = Foreign.foreign ~stub:true "CGRectStandardize" (CGRect.t @-> returning CGRect.t) +let _CGRectUnion = Foreign.foreign ~stub:true "CGRectUnion" (CGRect.t @-> CGRect.t @-> returning CGRect.t) +let _CGRegisterScreenRefreshCallback = Foreign.foreign ~stub:true "CGRegisterScreenRefreshCallback" (Foreign.funptr (uint @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) +let _CGReleaseAllDisplays = Foreign.foreign ~stub:true "CGReleaseAllDisplays" (void @-> returning int) +let _CGReleaseDisplayFadeReservation = Foreign.foreign ~stub:true "CGReleaseDisplayFadeReservation" (uint @-> returning int) +let _CGReleaseScreenRefreshRects = Foreign.foreign ~stub:true "CGReleaseScreenRefreshRects" ((ptr CGRect.t) @-> returning void) +let _CGRequestListenEventAccess = Foreign.foreign ~stub:true "CGRequestListenEventAccess" (void @-> returning bool) +let _CGRequestPostEventAccess = Foreign.foreign ~stub:true "CGRequestPostEventAccess" (void @-> returning bool) +let _CGRequestScreenCaptureAccess = Foreign.foreign ~stub:true "CGRequestScreenCaptureAccess" (void @-> returning bool) +let _CGRestorePermanentDisplayConfiguration = Foreign.foreign ~stub:true "CGRestorePermanentDisplayConfiguration" (void @-> returning void) +let _CGScreenRegisterMoveCallback = Foreign.foreign ~stub:true "CGScreenRegisterMoveCallback" (Foreign.funptr (CGScreenUpdateMoveDelta.t @-> ullong @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning int) +let _CGScreenUnregisterMoveCallback = Foreign.foreign ~stub:true "CGScreenUnregisterMoveCallback" (Foreign.funptr (CGScreenUpdateMoveDelta.t @-> ullong @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CGSessionCopyCurrentDictionary = Foreign.foreign ~stub:true "CGSessionCopyCurrentDictionary" (void @-> returning (ptr CFDictionary.t)) +let _CGSetDisplayTransferByByteTable = Foreign.foreign ~stub:true "CGSetDisplayTransferByByteTable" (uint @-> uint @-> string @-> string @-> string @-> returning int) +let _CGSetDisplayTransferByFormula = Foreign.foreign ~stub:true "CGSetDisplayTransferByFormula" (uint @-> float @-> float @-> float @-> float @-> float @-> float @-> float @-> float @-> float @-> returning int) +let _CGSetDisplayTransferByTable = Foreign.foreign ~stub:true "CGSetDisplayTransferByTable" (uint @-> uint @-> (ptr float) @-> (ptr float) @-> (ptr float) @-> returning int) +let _CGSetLocalEventsFilterDuringSuppressionState = Foreign.foreign ~stub:true "CGSetLocalEventsFilterDuringSuppressionState" (uint @-> uint @-> returning int) +let _CGSetLocalEventsSuppressionInterval = Foreign.foreign ~stub:true "CGSetLocalEventsSuppressionInterval" (double @-> returning int) +let _CGShadingCreateAxial = Foreign.foreign ~stub:true "CGShadingCreateAxial" ((ptr CGColorSpace.t) @-> CGPoint.t @-> CGPoint.t @-> (ptr CGFunction.t) @-> bool @-> bool @-> returning (ptr CGShading.t)) +let _CGShadingCreateRadial = Foreign.foreign ~stub:true "CGShadingCreateRadial" ((ptr CGColorSpace.t) @-> CGPoint.t @-> double @-> CGPoint.t @-> double @-> (ptr CGFunction.t) @-> bool @-> bool @-> returning (ptr CGShading.t)) +let _CGShadingGetTypeID = Foreign.foreign ~stub:true "CGShadingGetTypeID" (void @-> returning ullong) +let _CGShadingRelease = Foreign.foreign ~stub:true "CGShadingRelease" ((ptr CGShading.t) @-> returning void) +let _CGShadingRetain = Foreign.foreign ~stub:true "CGShadingRetain" ((ptr CGShading.t) @-> returning (ptr CGShading.t)) +let _CGShieldingWindowID = Foreign.foreign ~stub:true "CGShieldingWindowID" (uint @-> returning uint) +let _CGShieldingWindowLevel = Foreign.foreign ~stub:true "CGShieldingWindowLevel" (void @-> returning int) +let _CGSizeApplyAffineTransform = Foreign.foreign ~stub:true "CGSizeApplyAffineTransform" (CGSize.t @-> CGAffineTransform.t @-> returning CGSize.t) +let _CGSizeCreateDictionaryRepresentation = Foreign.foreign ~stub:true "CGSizeCreateDictionaryRepresentation" (CGSize.t @-> returning (ptr CFDictionary.t)) +let _CGSizeEqualToSize = Foreign.foreign ~stub:true "CGSizeEqualToSize" (CGSize.t @-> CGSize.t @-> returning bool) (* let _CGSizeMake = Foreign.foreign "Camlkit_CGSizeMake" (double @-> double @-> returning CGSize.t) *) -let _CGSizeMakeWithDictionaryRepresentation = Foreign.foreign "CGSizeMakeWithDictionaryRepresentation" ((ptr CFDictionary.t) @-> (ptr CGSize.t) @-> returning bool) -let _CGUnregisterScreenRefreshCallback = Foreign.foreign "CGUnregisterScreenRefreshCallback" (Foreign.funptr (uint @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) +let _CGSizeMakeWithDictionaryRepresentation = Foreign.foreign ~stub:true "CGSizeMakeWithDictionaryRepresentation" ((ptr CFDictionary.t) @-> (ptr CGSize.t) @-> returning bool) +let _CGUnregisterScreenRefreshCallback = Foreign.foreign ~stub:true "CGUnregisterScreenRefreshCallback" (Foreign.funptr (uint @-> (ptr CGRect.t) @-> (ptr void) @-> returning void) @-> (ptr void) @-> returning void) (* let _CGVectorMake = Foreign.foreign "Camlkit_CGVectorMake" (double @-> double @-> returning CGVector.t) *) -let _CGWaitForScreenRefreshRects = Foreign.foreign "CGWaitForScreenRefreshRects" ((ptr (ptr CGRect.t)) @-> (ptr uint) @-> returning int) -let _CGWaitForScreenUpdateRects = Foreign.foreign "CGWaitForScreenUpdateRects" (uint @-> (ptr uint) @-> (ptr (ptr CGRect.t)) @-> (ptr ullong) @-> (ptr CGScreenUpdateMoveDelta.t) @-> returning int) -let _CGWarpMouseCursorPosition = Foreign.foreign "CGWarpMouseCursorPosition" (CGPoint.t @-> returning int) -let _CGWindowLevelForKey = Foreign.foreign "CGWindowLevelForKey" (int @-> returning int) -let _CGWindowListCopyWindowInfo = Foreign.foreign "CGWindowListCopyWindowInfo" (uint @-> uint @-> returning (ptr CFArray.t)) -let _CGWindowListCreate = Foreign.foreign "CGWindowListCreate" (uint @-> uint @-> returning (ptr CFArray.t)) -let _CGWindowListCreateDescriptionFromArray = Foreign.foreign "CGWindowListCreateDescriptionFromArray" ((ptr CFArray.t) @-> returning (ptr CFArray.t)) -let _CGWindowListCreateImage = Foreign.foreign "CGWindowListCreateImage" (CGRect.t @-> uint @-> uint @-> uint @-> returning (ptr CGImage.t)) -let _CGWindowListCreateImageFromArray = Foreign.foreign "CGWindowListCreateImageFromArray" (CGRect.t @-> (ptr CFArray.t) @-> uint @-> returning (ptr CGImage.t)) -let _CGWindowServerCFMachPort = Foreign.foreign "CGWindowServerCFMachPort" (void @-> returning (ptr CFMachPort.t)) -let _CGWindowServerCreateServerPort = Foreign.foreign "CGWindowServerCreateServerPort" (void @-> returning (ptr CFMachPort.t)) +let _CGWaitForScreenRefreshRects = Foreign.foreign ~stub:true "CGWaitForScreenRefreshRects" ((ptr (ptr CGRect.t)) @-> (ptr uint) @-> returning int) +let _CGWaitForScreenUpdateRects = Foreign.foreign ~stub:true "CGWaitForScreenUpdateRects" (uint @-> (ptr uint) @-> (ptr (ptr CGRect.t)) @-> (ptr ullong) @-> (ptr CGScreenUpdateMoveDelta.t) @-> returning int) +let _CGWarpMouseCursorPosition = Foreign.foreign ~stub:true "CGWarpMouseCursorPosition" (CGPoint.t @-> returning int) +let _CGWindowLevelForKey = Foreign.foreign ~stub:true "CGWindowLevelForKey" (int @-> returning int) +let _CGWindowListCopyWindowInfo = Foreign.foreign ~stub:true "CGWindowListCopyWindowInfo" (uint @-> uint @-> returning (ptr CFArray.t)) +let _CGWindowListCreate = Foreign.foreign ~stub:true "CGWindowListCreate" (uint @-> uint @-> returning (ptr CFArray.t)) +let _CGWindowListCreateDescriptionFromArray = Foreign.foreign ~stub:true "CGWindowListCreateDescriptionFromArray" ((ptr CFArray.t) @-> returning (ptr CFArray.t)) +let _CGWindowListCreateImage = Foreign.foreign ~stub:true "CGWindowListCreateImage" (CGRect.t @-> uint @-> uint @-> uint @-> returning (ptr CGImage.t)) +let _CGWindowListCreateImageFromArray = Foreign.foreign ~stub:true "CGWindowListCreateImageFromArray" (CGRect.t @-> (ptr CFArray.t) @-> uint @-> returning (ptr CGImage.t)) +let _CGWindowServerCFMachPort = Foreign.foreign ~stub:true "CGWindowServerCFMachPort" (void @-> returning (ptr CFMachPort.t)) +let _CGWindowServerCreateServerPort = Foreign.foreign ~stub:true "CGWindowServerCreateServerPort" (void @-> returning (ptr CFMachPort.t)) diff --git a/CoreGraphics/CoreGraphics_globals.ml b/CoreGraphics/CoreGraphics_globals.ml index 67eaa16eb..967d52264 100644 --- a/CoreGraphics/CoreGraphics_globals.ml +++ b/CoreGraphics/CoreGraphics_globals.ml @@ -1,9 +1,9 @@ (* auto-generated, do not modify *) +[@@@ocaml.warning "-33"] open Runtime open Objc -[@@@ocaml.warning "-33"] open CoreFoundation module CGPathRef = struct @@ -184,118 +184,118 @@ module IOSurfaceRef = struct let t = (ptr IOSurface.t) end -let _CGAffineTransformIdentity = !@ (Foreign.foreign_value "CGAffineTransformIdentity" CGAffineTransform.t) -let _CGPointZero = !@ (Foreign.foreign_value "CGPointZero" CGPoint.t) -let _CGRectInfinite = !@ (Foreign.foreign_value "CGRectInfinite" CGRect.t) -let _CGRectNull = !@ (Foreign.foreign_value "CGRectNull" CGRect.t) -let _CGRectZero = !@ (Foreign.foreign_value "CGRectZero" CGRect.t) -let _CGSizeZero = !@ (Foreign.foreign_value "CGSizeZero" CGSize.t) -let kCGColorBlack = !@ (Foreign.foreign_value "kCGColorBlack" (ptr CFString.t)) -let kCGColorClear = !@ (Foreign.foreign_value "kCGColorClear" (ptr CFString.t)) -let kCGColorConversionBlackPointCompensation = !@ (Foreign.foreign_value "kCGColorConversionBlackPointCompensation" (ptr CFString.t)) -let kCGColorConversionTRCSize = !@ (Foreign.foreign_value "kCGColorConversionTRCSize" (ptr CFString.t)) -let kCGColorSpaceACESCGLinear = !@ (Foreign.foreign_value "kCGColorSpaceACESCGLinear" (ptr CFString.t)) -let kCGColorSpaceAdobeRGB1998 = !@ (Foreign.foreign_value "kCGColorSpaceAdobeRGB1998" (ptr CFString.t)) -let kCGColorSpaceDCIP3 = !@ (Foreign.foreign_value "kCGColorSpaceDCIP3" (ptr CFString.t)) -let kCGColorSpaceDisplayP3 = !@ (Foreign.foreign_value "kCGColorSpaceDisplayP3" (ptr CFString.t)) -let kCGColorSpaceDisplayP3_HLG = !@ (Foreign.foreign_value "kCGColorSpaceDisplayP3_HLG" (ptr CFString.t)) -let kCGColorSpaceDisplayP3_PQ = !@ (Foreign.foreign_value "kCGColorSpaceDisplayP3_PQ" (ptr CFString.t)) -let kCGColorSpaceDisplayP3_PQ_EOTF = !@ (Foreign.foreign_value "kCGColorSpaceDisplayP3_PQ_EOTF" (ptr CFString.t)) -let kCGColorSpaceExtendedDisplayP3 = !@ (Foreign.foreign_value "kCGColorSpaceExtendedDisplayP3" (ptr CFString.t)) -let kCGColorSpaceExtendedGray = !@ (Foreign.foreign_value "kCGColorSpaceExtendedGray" (ptr CFString.t)) -let kCGColorSpaceExtendedITUR_2020 = !@ (Foreign.foreign_value "kCGColorSpaceExtendedITUR_2020" (ptr CFString.t)) -let kCGColorSpaceExtendedLinearDisplayP3 = !@ (Foreign.foreign_value "kCGColorSpaceExtendedLinearDisplayP3" (ptr CFString.t)) -let kCGColorSpaceExtendedLinearGray = !@ (Foreign.foreign_value "kCGColorSpaceExtendedLinearGray" (ptr CFString.t)) -let kCGColorSpaceExtendedLinearITUR_2020 = !@ (Foreign.foreign_value "kCGColorSpaceExtendedLinearITUR_2020" (ptr CFString.t)) -let kCGColorSpaceExtendedLinearSRGB = !@ (Foreign.foreign_value "kCGColorSpaceExtendedLinearSRGB" (ptr CFString.t)) -let kCGColorSpaceExtendedRange = !@ (Foreign.foreign_value "kCGColorSpaceExtendedRange" (ptr CFString.t)) -let kCGColorSpaceExtendedSRGB = !@ (Foreign.foreign_value "kCGColorSpaceExtendedSRGB" (ptr CFString.t)) -let kCGColorSpaceGenericCMYK = !@ (Foreign.foreign_value "kCGColorSpaceGenericCMYK" (ptr CFString.t)) -let kCGColorSpaceGenericGray = !@ (Foreign.foreign_value "kCGColorSpaceGenericGray" (ptr CFString.t)) -let kCGColorSpaceGenericGrayGamma2_2 = !@ (Foreign.foreign_value "kCGColorSpaceGenericGrayGamma2_2" (ptr CFString.t)) -let kCGColorSpaceGenericLab = !@ (Foreign.foreign_value "kCGColorSpaceGenericLab" (ptr CFString.t)) -let kCGColorSpaceGenericRGB = !@ (Foreign.foreign_value "kCGColorSpaceGenericRGB" (ptr CFString.t)) -let kCGColorSpaceGenericRGBLinear = !@ (Foreign.foreign_value "kCGColorSpaceGenericRGBLinear" (ptr CFString.t)) -let kCGColorSpaceGenericXYZ = !@ (Foreign.foreign_value "kCGColorSpaceGenericXYZ" (ptr CFString.t)) -let kCGColorSpaceITUR_2020 = !@ (Foreign.foreign_value "kCGColorSpaceITUR_2020" (ptr CFString.t)) -let kCGColorSpaceITUR_2020_HLG = !@ (Foreign.foreign_value "kCGColorSpaceITUR_2020_HLG" (ptr CFString.t)) -let kCGColorSpaceITUR_2020_PQ = !@ (Foreign.foreign_value "kCGColorSpaceITUR_2020_PQ" (ptr CFString.t)) -let kCGColorSpaceITUR_2020_PQ_EOTF = !@ (Foreign.foreign_value "kCGColorSpaceITUR_2020_PQ_EOTF" (ptr CFString.t)) -let kCGColorSpaceITUR_2020_sRGBGamma = !@ (Foreign.foreign_value "kCGColorSpaceITUR_2020_sRGBGamma" (ptr CFString.t)) -let kCGColorSpaceITUR_2100_HLG = !@ (Foreign.foreign_value "kCGColorSpaceITUR_2100_HLG" (ptr CFString.t)) -let kCGColorSpaceITUR_2100_PQ = !@ (Foreign.foreign_value "kCGColorSpaceITUR_2100_PQ" (ptr CFString.t)) -let kCGColorSpaceITUR_709 = !@ (Foreign.foreign_value "kCGColorSpaceITUR_709" (ptr CFString.t)) -let kCGColorSpaceITUR_709_PQ = !@ (Foreign.foreign_value "kCGColorSpaceITUR_709_PQ" (ptr CFString.t)) -let kCGColorSpaceLinearDisplayP3 = !@ (Foreign.foreign_value "kCGColorSpaceLinearDisplayP3" (ptr CFString.t)) -let kCGColorSpaceLinearGray = !@ (Foreign.foreign_value "kCGColorSpaceLinearGray" (ptr CFString.t)) -let kCGColorSpaceLinearITUR_2020 = !@ (Foreign.foreign_value "kCGColorSpaceLinearITUR_2020" (ptr CFString.t)) -let kCGColorSpaceLinearSRGB = !@ (Foreign.foreign_value "kCGColorSpaceLinearSRGB" (ptr CFString.t)) -let kCGColorSpaceROMMRGB = !@ (Foreign.foreign_value "kCGColorSpaceROMMRGB" (ptr CFString.t)) -let kCGColorSpaceSRGB = !@ (Foreign.foreign_value "kCGColorSpaceSRGB" (ptr CFString.t)) -let kCGColorWhite = !@ (Foreign.foreign_value "kCGColorWhite" (ptr CFString.t)) -let kCGDisplayShowDuplicateLowResolutionModes = !@ (Foreign.foreign_value "kCGDisplayShowDuplicateLowResolutionModes" (ptr CFString.t)) -let kCGDisplayStreamColorSpace = !@ (Foreign.foreign_value "kCGDisplayStreamColorSpace" (ptr CFString.t)) -let kCGDisplayStreamDestinationRect = !@ (Foreign.foreign_value "kCGDisplayStreamDestinationRect" (ptr CFString.t)) -let kCGDisplayStreamMinimumFrameTime = !@ (Foreign.foreign_value "kCGDisplayStreamMinimumFrameTime" (ptr CFString.t)) -let kCGDisplayStreamPreserveAspectRatio = !@ (Foreign.foreign_value "kCGDisplayStreamPreserveAspectRatio" (ptr CFString.t)) -let kCGDisplayStreamQueueDepth = !@ (Foreign.foreign_value "kCGDisplayStreamQueueDepth" (ptr CFString.t)) -let kCGDisplayStreamShowCursor = !@ (Foreign.foreign_value "kCGDisplayStreamShowCursor" (ptr CFString.t)) -let kCGDisplayStreamSourceRect = !@ (Foreign.foreign_value "kCGDisplayStreamSourceRect" (ptr CFString.t)) -let kCGDisplayStreamYCbCrMatrix = !@ (Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix" (ptr CFString.t)) -let kCGDisplayStreamYCbCrMatrix_ITU_R_601_4 = !@ (Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix_ITU_R_601_4" (ptr CFString.t)) -let kCGDisplayStreamYCbCrMatrix_ITU_R_709_2 = !@ (Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix_ITU_R_709_2" (ptr CFString.t)) -let kCGDisplayStreamYCbCrMatrix_SMPTE_240M_1995 = !@ (Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix_SMPTE_240M_1995" (ptr CFString.t)) -let kCGFontVariationAxisDefaultValue = !@ (Foreign.foreign_value "kCGFontVariationAxisDefaultValue" (ptr CFString.t)) -let kCGFontVariationAxisMaxValue = !@ (Foreign.foreign_value "kCGFontVariationAxisMaxValue" (ptr CFString.t)) -let kCGFontVariationAxisMinValue = !@ (Foreign.foreign_value "kCGFontVariationAxisMinValue" (ptr CFString.t)) -let kCGFontVariationAxisName = !@ (Foreign.foreign_value "kCGFontVariationAxisName" (ptr CFString.t)) -let kCGPDFContextAccessPermissions = !@ (Foreign.foreign_value "kCGPDFContextAccessPermissions" (ptr CFString.t)) -let kCGPDFContextAllowsCopying = !@ (Foreign.foreign_value "kCGPDFContextAllowsCopying" (ptr CFString.t)) -let kCGPDFContextAllowsPrinting = !@ (Foreign.foreign_value "kCGPDFContextAllowsPrinting" (ptr CFString.t)) -let kCGPDFContextArtBox = !@ (Foreign.foreign_value "kCGPDFContextArtBox" (ptr CFString.t)) -let kCGPDFContextAuthor = !@ (Foreign.foreign_value "kCGPDFContextAuthor" (ptr CFString.t)) -let kCGPDFContextBleedBox = !@ (Foreign.foreign_value "kCGPDFContextBleedBox" (ptr CFString.t)) -let kCGPDFContextCreateLinearizedPDF = !@ (Foreign.foreign_value "kCGPDFContextCreateLinearizedPDF" (ptr CFString.t)) -let kCGPDFContextCreatePDFA = !@ (Foreign.foreign_value "kCGPDFContextCreatePDFA" (ptr CFString.t)) -let kCGPDFContextCreator = !@ (Foreign.foreign_value "kCGPDFContextCreator" (ptr CFString.t)) -let kCGPDFContextCropBox = !@ (Foreign.foreign_value "kCGPDFContextCropBox" (ptr CFString.t)) -let kCGPDFContextEncryptionKeyLength = !@ (Foreign.foreign_value "kCGPDFContextEncryptionKeyLength" (ptr CFString.t)) -let kCGPDFContextKeywords = !@ (Foreign.foreign_value "kCGPDFContextKeywords" (ptr CFString.t)) -let kCGPDFContextMediaBox = !@ (Foreign.foreign_value "kCGPDFContextMediaBox" (ptr CFString.t)) -let kCGPDFContextOutputIntent = !@ (Foreign.foreign_value "kCGPDFContextOutputIntent" (ptr CFString.t)) -let kCGPDFContextOutputIntents = !@ (Foreign.foreign_value "kCGPDFContextOutputIntents" (ptr CFString.t)) -let kCGPDFContextOwnerPassword = !@ (Foreign.foreign_value "kCGPDFContextOwnerPassword" (ptr CFString.t)) -let kCGPDFContextSubject = !@ (Foreign.foreign_value "kCGPDFContextSubject" (ptr CFString.t)) -let kCGPDFContextTitle = !@ (Foreign.foreign_value "kCGPDFContextTitle" (ptr CFString.t)) -let kCGPDFContextTrimBox = !@ (Foreign.foreign_value "kCGPDFContextTrimBox" (ptr CFString.t)) -let kCGPDFContextUserPassword = !@ (Foreign.foreign_value "kCGPDFContextUserPassword" (ptr CFString.t)) -let kCGPDFOutlineChildren = !@ (Foreign.foreign_value "kCGPDFOutlineChildren" (ptr CFString.t)) -let kCGPDFOutlineDestination = !@ (Foreign.foreign_value "kCGPDFOutlineDestination" (ptr CFString.t)) -let kCGPDFOutlineDestinationRect = !@ (Foreign.foreign_value "kCGPDFOutlineDestinationRect" (ptr CFString.t)) -let kCGPDFOutlineTitle = !@ (Foreign.foreign_value "kCGPDFOutlineTitle" (ptr CFString.t)) -let kCGPDFTagPropertyActualText = !@ (Foreign.foreign_value "kCGPDFTagPropertyActualText" (ptr CFString.t)) -let kCGPDFTagPropertyAlternativeText = !@ (Foreign.foreign_value "kCGPDFTagPropertyAlternativeText" (ptr CFString.t)) -let kCGPDFTagPropertyLanguageText = !@ (Foreign.foreign_value "kCGPDFTagPropertyLanguageText" (ptr CFString.t)) -let kCGPDFTagPropertyTitleText = !@ (Foreign.foreign_value "kCGPDFTagPropertyTitleText" (ptr CFString.t)) -let kCGPDFXDestinationOutputProfile = !@ (Foreign.foreign_value "kCGPDFXDestinationOutputProfile" (ptr CFString.t)) -let kCGPDFXInfo = !@ (Foreign.foreign_value "kCGPDFXInfo" (ptr CFString.t)) -let kCGPDFXOutputCondition = !@ (Foreign.foreign_value "kCGPDFXOutputCondition" (ptr CFString.t)) -let kCGPDFXOutputConditionIdentifier = !@ (Foreign.foreign_value "kCGPDFXOutputConditionIdentifier" (ptr CFString.t)) -let kCGPDFXOutputIntentSubtype = !@ (Foreign.foreign_value "kCGPDFXOutputIntentSubtype" (ptr CFString.t)) -let kCGPDFXRegistryName = !@ (Foreign.foreign_value "kCGPDFXRegistryName" (ptr CFString.t)) -let kCGWindowAlpha = !@ (Foreign.foreign_value "kCGWindowAlpha" (ptr CFString.t)) -let kCGWindowBackingLocationVideoMemory = !@ (Foreign.foreign_value "kCGWindowBackingLocationVideoMemory" (ptr CFString.t)) -let kCGWindowBounds = !@ (Foreign.foreign_value "kCGWindowBounds" (ptr CFString.t)) -let kCGWindowIsOnscreen = !@ (Foreign.foreign_value "kCGWindowIsOnscreen" (ptr CFString.t)) -let kCGWindowLayer = !@ (Foreign.foreign_value "kCGWindowLayer" (ptr CFString.t)) -let kCGWindowMemoryUsage = !@ (Foreign.foreign_value "kCGWindowMemoryUsage" (ptr CFString.t)) -let kCGWindowName = !@ (Foreign.foreign_value "kCGWindowName" (ptr CFString.t)) -let kCGWindowNumber = !@ (Foreign.foreign_value "kCGWindowNumber" (ptr CFString.t)) -let kCGWindowOwnerName = !@ (Foreign.foreign_value "kCGWindowOwnerName" (ptr CFString.t)) -let kCGWindowOwnerPID = !@ (Foreign.foreign_value "kCGWindowOwnerPID" (ptr CFString.t)) -let kCGWindowSharingState = !@ (Foreign.foreign_value "kCGWindowSharingState" (ptr CFString.t)) -let kCGWindowStoreType = !@ (Foreign.foreign_value "kCGWindowStoreType" (ptr CFString.t)) -let kCGWindowWorkspace = !@ (Foreign.foreign_value "kCGWindowWorkspace" (ptr CFString.t)) +let _CGAffineTransformIdentity = Foreign.foreign_value "CGAffineTransformIdentity" CGAffineTransform.t +let _CGPointZero = Foreign.foreign_value "CGPointZero" CGPoint.t +let _CGRectInfinite = Foreign.foreign_value "CGRectInfinite" CGRect.t +let _CGRectNull = Foreign.foreign_value "CGRectNull" CGRect.t +let _CGRectZero = Foreign.foreign_value "CGRectZero" CGRect.t +let _CGSizeZero = Foreign.foreign_value "CGSizeZero" CGSize.t +let kCGColorBlack = Foreign.foreign_value "kCGColorBlack" (ptr CFString.t) +let kCGColorClear = Foreign.foreign_value "kCGColorClear" (ptr CFString.t) +let kCGColorConversionBlackPointCompensation = Foreign.foreign_value "kCGColorConversionBlackPointCompensation" (ptr CFString.t) +let kCGColorConversionTRCSize = Foreign.foreign_value "kCGColorConversionTRCSize" (ptr CFString.t) +let kCGColorSpaceACESCGLinear = Foreign.foreign_value "kCGColorSpaceACESCGLinear" (ptr CFString.t) +let kCGColorSpaceAdobeRGB1998 = Foreign.foreign_value "kCGColorSpaceAdobeRGB1998" (ptr CFString.t) +let kCGColorSpaceDCIP3 = Foreign.foreign_value "kCGColorSpaceDCIP3" (ptr CFString.t) +let kCGColorSpaceDisplayP3 = Foreign.foreign_value "kCGColorSpaceDisplayP3" (ptr CFString.t) +let kCGColorSpaceDisplayP3_HLG = Foreign.foreign_value "kCGColorSpaceDisplayP3_HLG" (ptr CFString.t) +let kCGColorSpaceDisplayP3_PQ = Foreign.foreign_value "kCGColorSpaceDisplayP3_PQ" (ptr CFString.t) +let kCGColorSpaceDisplayP3_PQ_EOTF = Foreign.foreign_value "kCGColorSpaceDisplayP3_PQ_EOTF" (ptr CFString.t) +let kCGColorSpaceExtendedDisplayP3 = Foreign.foreign_value "kCGColorSpaceExtendedDisplayP3" (ptr CFString.t) +let kCGColorSpaceExtendedGray = Foreign.foreign_value "kCGColorSpaceExtendedGray" (ptr CFString.t) +let kCGColorSpaceExtendedITUR_2020 = Foreign.foreign_value "kCGColorSpaceExtendedITUR_2020" (ptr CFString.t) +let kCGColorSpaceExtendedLinearDisplayP3 = Foreign.foreign_value "kCGColorSpaceExtendedLinearDisplayP3" (ptr CFString.t) +let kCGColorSpaceExtendedLinearGray = Foreign.foreign_value "kCGColorSpaceExtendedLinearGray" (ptr CFString.t) +let kCGColorSpaceExtendedLinearITUR_2020 = Foreign.foreign_value "kCGColorSpaceExtendedLinearITUR_2020" (ptr CFString.t) +let kCGColorSpaceExtendedLinearSRGB = Foreign.foreign_value "kCGColorSpaceExtendedLinearSRGB" (ptr CFString.t) +let kCGColorSpaceExtendedRange = Foreign.foreign_value "kCGColorSpaceExtendedRange" (ptr CFString.t) +let kCGColorSpaceExtendedSRGB = Foreign.foreign_value "kCGColorSpaceExtendedSRGB" (ptr CFString.t) +let kCGColorSpaceGenericCMYK = Foreign.foreign_value "kCGColorSpaceGenericCMYK" (ptr CFString.t) +let kCGColorSpaceGenericGray = Foreign.foreign_value "kCGColorSpaceGenericGray" (ptr CFString.t) +let kCGColorSpaceGenericGrayGamma2_2 = Foreign.foreign_value "kCGColorSpaceGenericGrayGamma2_2" (ptr CFString.t) +let kCGColorSpaceGenericLab = Foreign.foreign_value "kCGColorSpaceGenericLab" (ptr CFString.t) +let kCGColorSpaceGenericRGB = Foreign.foreign_value "kCGColorSpaceGenericRGB" (ptr CFString.t) +let kCGColorSpaceGenericRGBLinear = Foreign.foreign_value "kCGColorSpaceGenericRGBLinear" (ptr CFString.t) +let kCGColorSpaceGenericXYZ = Foreign.foreign_value "kCGColorSpaceGenericXYZ" (ptr CFString.t) +let kCGColorSpaceITUR_2020 = Foreign.foreign_value "kCGColorSpaceITUR_2020" (ptr CFString.t) +let kCGColorSpaceITUR_2020_HLG = Foreign.foreign_value "kCGColorSpaceITUR_2020_HLG" (ptr CFString.t) +let kCGColorSpaceITUR_2020_PQ = Foreign.foreign_value "kCGColorSpaceITUR_2020_PQ" (ptr CFString.t) +let kCGColorSpaceITUR_2020_PQ_EOTF = Foreign.foreign_value "kCGColorSpaceITUR_2020_PQ_EOTF" (ptr CFString.t) +let kCGColorSpaceITUR_2020_sRGBGamma = Foreign.foreign_value "kCGColorSpaceITUR_2020_sRGBGamma" (ptr CFString.t) +let kCGColorSpaceITUR_2100_HLG = Foreign.foreign_value "kCGColorSpaceITUR_2100_HLG" (ptr CFString.t) +let kCGColorSpaceITUR_2100_PQ = Foreign.foreign_value "kCGColorSpaceITUR_2100_PQ" (ptr CFString.t) +let kCGColorSpaceITUR_709 = Foreign.foreign_value "kCGColorSpaceITUR_709" (ptr CFString.t) +let kCGColorSpaceITUR_709_PQ = Foreign.foreign_value "kCGColorSpaceITUR_709_PQ" (ptr CFString.t) +let kCGColorSpaceLinearDisplayP3 = Foreign.foreign_value "kCGColorSpaceLinearDisplayP3" (ptr CFString.t) +let kCGColorSpaceLinearGray = Foreign.foreign_value "kCGColorSpaceLinearGray" (ptr CFString.t) +let kCGColorSpaceLinearITUR_2020 = Foreign.foreign_value "kCGColorSpaceLinearITUR_2020" (ptr CFString.t) +let kCGColorSpaceLinearSRGB = Foreign.foreign_value "kCGColorSpaceLinearSRGB" (ptr CFString.t) +let kCGColorSpaceROMMRGB = Foreign.foreign_value "kCGColorSpaceROMMRGB" (ptr CFString.t) +let kCGColorSpaceSRGB = Foreign.foreign_value "kCGColorSpaceSRGB" (ptr CFString.t) +let kCGColorWhite = Foreign.foreign_value "kCGColorWhite" (ptr CFString.t) +let kCGDisplayShowDuplicateLowResolutionModes = Foreign.foreign_value "kCGDisplayShowDuplicateLowResolutionModes" (ptr CFString.t) +let kCGDisplayStreamColorSpace = Foreign.foreign_value "kCGDisplayStreamColorSpace" (ptr CFString.t) +let kCGDisplayStreamDestinationRect = Foreign.foreign_value "kCGDisplayStreamDestinationRect" (ptr CFString.t) +let kCGDisplayStreamMinimumFrameTime = Foreign.foreign_value "kCGDisplayStreamMinimumFrameTime" (ptr CFString.t) +let kCGDisplayStreamPreserveAspectRatio = Foreign.foreign_value "kCGDisplayStreamPreserveAspectRatio" (ptr CFString.t) +let kCGDisplayStreamQueueDepth = Foreign.foreign_value "kCGDisplayStreamQueueDepth" (ptr CFString.t) +let kCGDisplayStreamShowCursor = Foreign.foreign_value "kCGDisplayStreamShowCursor" (ptr CFString.t) +let kCGDisplayStreamSourceRect = Foreign.foreign_value "kCGDisplayStreamSourceRect" (ptr CFString.t) +let kCGDisplayStreamYCbCrMatrix = Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix" (ptr CFString.t) +let kCGDisplayStreamYCbCrMatrix_ITU_R_601_4 = Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix_ITU_R_601_4" (ptr CFString.t) +let kCGDisplayStreamYCbCrMatrix_ITU_R_709_2 = Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix_ITU_R_709_2" (ptr CFString.t) +let kCGDisplayStreamYCbCrMatrix_SMPTE_240M_1995 = Foreign.foreign_value "kCGDisplayStreamYCbCrMatrix_SMPTE_240M_1995" (ptr CFString.t) +let kCGFontVariationAxisDefaultValue = Foreign.foreign_value "kCGFontVariationAxisDefaultValue" (ptr CFString.t) +let kCGFontVariationAxisMaxValue = Foreign.foreign_value "kCGFontVariationAxisMaxValue" (ptr CFString.t) +let kCGFontVariationAxisMinValue = Foreign.foreign_value "kCGFontVariationAxisMinValue" (ptr CFString.t) +let kCGFontVariationAxisName = Foreign.foreign_value "kCGFontVariationAxisName" (ptr CFString.t) +let kCGPDFContextAccessPermissions = Foreign.foreign_value "kCGPDFContextAccessPermissions" (ptr CFString.t) +let kCGPDFContextAllowsCopying = Foreign.foreign_value "kCGPDFContextAllowsCopying" (ptr CFString.t) +let kCGPDFContextAllowsPrinting = Foreign.foreign_value "kCGPDFContextAllowsPrinting" (ptr CFString.t) +let kCGPDFContextArtBox = Foreign.foreign_value "kCGPDFContextArtBox" (ptr CFString.t) +let kCGPDFContextAuthor = Foreign.foreign_value "kCGPDFContextAuthor" (ptr CFString.t) +let kCGPDFContextBleedBox = Foreign.foreign_value "kCGPDFContextBleedBox" (ptr CFString.t) +let kCGPDFContextCreateLinearizedPDF = Foreign.foreign_value "kCGPDFContextCreateLinearizedPDF" (ptr CFString.t) +let kCGPDFContextCreatePDFA = Foreign.foreign_value "kCGPDFContextCreatePDFA" (ptr CFString.t) +let kCGPDFContextCreator = Foreign.foreign_value "kCGPDFContextCreator" (ptr CFString.t) +let kCGPDFContextCropBox = Foreign.foreign_value "kCGPDFContextCropBox" (ptr CFString.t) +let kCGPDFContextEncryptionKeyLength = Foreign.foreign_value "kCGPDFContextEncryptionKeyLength" (ptr CFString.t) +let kCGPDFContextKeywords = Foreign.foreign_value "kCGPDFContextKeywords" (ptr CFString.t) +let kCGPDFContextMediaBox = Foreign.foreign_value "kCGPDFContextMediaBox" (ptr CFString.t) +let kCGPDFContextOutputIntent = Foreign.foreign_value "kCGPDFContextOutputIntent" (ptr CFString.t) +let kCGPDFContextOutputIntents = Foreign.foreign_value "kCGPDFContextOutputIntents" (ptr CFString.t) +let kCGPDFContextOwnerPassword = Foreign.foreign_value "kCGPDFContextOwnerPassword" (ptr CFString.t) +let kCGPDFContextSubject = Foreign.foreign_value "kCGPDFContextSubject" (ptr CFString.t) +let kCGPDFContextTitle = Foreign.foreign_value "kCGPDFContextTitle" (ptr CFString.t) +let kCGPDFContextTrimBox = Foreign.foreign_value "kCGPDFContextTrimBox" (ptr CFString.t) +let kCGPDFContextUserPassword = Foreign.foreign_value "kCGPDFContextUserPassword" (ptr CFString.t) +let kCGPDFOutlineChildren = Foreign.foreign_value "kCGPDFOutlineChildren" (ptr CFString.t) +let kCGPDFOutlineDestination = Foreign.foreign_value "kCGPDFOutlineDestination" (ptr CFString.t) +let kCGPDFOutlineDestinationRect = Foreign.foreign_value "kCGPDFOutlineDestinationRect" (ptr CFString.t) +let kCGPDFOutlineTitle = Foreign.foreign_value "kCGPDFOutlineTitle" (ptr CFString.t) +let kCGPDFTagPropertyActualText = Foreign.foreign_value "kCGPDFTagPropertyActualText" (ptr CFString.t) +let kCGPDFTagPropertyAlternativeText = Foreign.foreign_value "kCGPDFTagPropertyAlternativeText" (ptr CFString.t) +let kCGPDFTagPropertyLanguageText = Foreign.foreign_value "kCGPDFTagPropertyLanguageText" (ptr CFString.t) +let kCGPDFTagPropertyTitleText = Foreign.foreign_value "kCGPDFTagPropertyTitleText" (ptr CFString.t) +let kCGPDFXDestinationOutputProfile = Foreign.foreign_value "kCGPDFXDestinationOutputProfile" (ptr CFString.t) +let kCGPDFXInfo = Foreign.foreign_value "kCGPDFXInfo" (ptr CFString.t) +let kCGPDFXOutputCondition = Foreign.foreign_value "kCGPDFXOutputCondition" (ptr CFString.t) +let kCGPDFXOutputConditionIdentifier = Foreign.foreign_value "kCGPDFXOutputConditionIdentifier" (ptr CFString.t) +let kCGPDFXOutputIntentSubtype = Foreign.foreign_value "kCGPDFXOutputIntentSubtype" (ptr CFString.t) +let kCGPDFXRegistryName = Foreign.foreign_value "kCGPDFXRegistryName" (ptr CFString.t) +let kCGWindowAlpha = Foreign.foreign_value "kCGWindowAlpha" (ptr CFString.t) +let kCGWindowBackingLocationVideoMemory = Foreign.foreign_value "kCGWindowBackingLocationVideoMemory" (ptr CFString.t) +let kCGWindowBounds = Foreign.foreign_value "kCGWindowBounds" (ptr CFString.t) +let kCGWindowIsOnscreen = Foreign.foreign_value "kCGWindowIsOnscreen" (ptr CFString.t) +let kCGWindowLayer = Foreign.foreign_value "kCGWindowLayer" (ptr CFString.t) +let kCGWindowMemoryUsage = Foreign.foreign_value "kCGWindowMemoryUsage" (ptr CFString.t) +let kCGWindowName = Foreign.foreign_value "kCGWindowName" (ptr CFString.t) +let kCGWindowNumber = Foreign.foreign_value "kCGWindowNumber" (ptr CFString.t) +let kCGWindowOwnerName = Foreign.foreign_value "kCGWindowOwnerName" (ptr CFString.t) +let kCGWindowOwnerPID = Foreign.foreign_value "kCGWindowOwnerPID" (ptr CFString.t) +let kCGWindowSharingState = Foreign.foreign_value "kCGWindowSharingState" (ptr CFString.t) +let kCGWindowStoreType = Foreign.foreign_value "kCGWindowStoreType" (ptr CFString.t) +let kCGWindowWorkspace = Foreign.foreign_value "kCGWindowWorkspace" (ptr CFString.t) let _CGGlyphMax = 1 let _CGGlyphMin = 0 let _CGPDFDataFormatJPEG2000 = 2 diff --git a/test/test_CoreFoundation/test_CoreFoundation.ml b/test/test_CoreFoundation/test_CoreFoundation.ml index 471938c2d..f1710d6b1 100644 --- a/test/test_CoreFoundation/test_CoreFoundation.ml +++ b/test/test_CoreFoundation/test_CoreFoundation.ml @@ -8,7 +8,7 @@ module A = Alcotest let test_CFString () = let str = _CFStringCreateWithCString - kCFAllocatorDefault + (!@ kCFAllocatorDefault) "Hello" (UInt.of_int kCFStringEncodingUTF8) in