2008-12-12 01:33:05 -05:00
|
|
|
! Copyright (C) 2008 Joe Groff.
|
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
2009-05-16 11:45:17 -04:00
|
|
|
USING: alien.c-types alien.syntax kernel math sequences ;
|
2008-12-12 01:33:05 -05:00
|
|
|
IN: core-foundation.data
|
|
|
|
|
|
|
|
TYPEDEF: void* CFDataRef
|
|
|
|
TYPEDEF: void* CFSetRef
|
|
|
|
|
|
|
|
TYPEDEF: int CFPropertyListMutabilityOptions
|
2009-01-16 19:41:21 -05:00
|
|
|
CONSTANT: kCFPropertyListImmutable 0
|
|
|
|
CONSTANT: kCFPropertyListMutableContainers 1
|
|
|
|
CONSTANT: kCFPropertyListMutableContainersAndLeaves 2
|
2008-12-12 01:33:05 -05:00
|
|
|
|
|
|
|
FUNCTION: CFDataRef CFDataCreate ( CFAllocatorRef allocator, uchar* bytes, CFIndex length ) ;
|
|
|
|
|
|
|
|
FUNCTION: CFTypeID CFGetTypeID ( CFTypeRef cf ) ;
|
|
|
|
|
|
|
|
: <CFData> ( byte-array -- alien )
|
2009-01-21 00:06:23 -05:00
|
|
|
[ f ] dip dup length CFDataCreate ;
|