factor/basis/core-foundation/core-foundation.factor

! Copyright (C) 2006, 2008 Slava Pestov
! See http://factorcode.org/license.txt for BSD license.
USING: alien.c-types alien.destructors alien.syntax
classes.struct ;
IN: core-foundation

TYPEDEF: void* CFTypeRef

TYPEDEF: void* CFAllocatorRef
CONSTANT: kCFAllocatorDefault f

TYPEDEF: bool Boolean
TYPEDEF: long CFIndex
TYPEDEF: uchar UInt8
TYPEDEF: ushort UInt16
TYPEDEF: uint UInt32
TYPEDEF: ulonglong UInt64
TYPEDEF: char SInt8
TYPEDEF: short SInt16
TYPEDEF: int SInt32
TYPEDEF: longlong SInt64
TYPEDEF: ulong CFTypeID
TYPEDEF: UInt32 CFOptionFlags
TYPEDEF: void* CFUUIDRef
TYPEDEF: SInt32 OSStatus
TYPEDEF: uchar[4] FourCharCode
TYPEDEF: FourCharCode OSType

STRUCT: FSRef
    { opaque uchar[80] } ;

STRUCT: CFRange
    { location CFIndex }
    { length CFIndex } ;

: <CFRange> ( location length -- range )
    CFRange <struct-boa> ;

FUNCTION: CFTypeRef CFRetain ( CFTypeRef cf )

FUNCTION: void CFRelease ( CFTypeRef cf )

DESTRUCTOR: CFRelease
Mac OS X monitors work in progress 2008-02-12 03:21:47 -05:00			`! Copyright (C) 2006, 2008 Slava Pestov`
Initial import 2007-09-20 18:09:08 -04:00			`! See http://factorcode.org/license.txt for BSD license.`
Trim down a few using lists 2011-09-26 16:42:32 -04:00			`USING: alien.c-types alien.destructors alien.syntax`
			`classes.struct ;`
Initial import 2007-09-20 18:09:08 -04:00			`IN: core-foundation`

replace limited assoc>NSDictionary word with a >plist word that can convert any structure of numbers, strings, byte-arrays, hashtables, and sequences into the equivalent Cocoa objects 2008-07-13 22:19:16 -04:00			`TYPEDEF: void* CFTypeRef`
Split up core-foundation vocabulary since it was getting out of hand 2008-12-12 01:33:05 -05:00
			`TYPEDEF: void* CFAllocatorRef`
Fix <CFString> and CF>string to allow null bytes 2009-01-25 20:02:59 -05:00			`CONSTANT: kCFAllocatorDefault f`
Split up core-foundation vocabulary since it was getting out of hand 2008-12-12 01:33:05 -05:00
Updating code to use with-out-parameters 2010-05-23 03:07:47 -04:00			`TYPEDEF: bool Boolean`
			`TYPEDEF: long CFIndex`
			`TYPEDEF: uchar UInt8`
			`TYPEDEF: ushort UInt16`
			`TYPEDEF: uint UInt32`
add full complement of [SU]Int[0-9]+ typedefs to core-foundation 2009-09-12 20:43:57 -04:00			`TYPEDEF: ulonglong UInt64`
Updating code to use with-out-parameters 2010-05-23 03:07:47 -04:00			`TYPEDEF: char SInt8`
			`TYPEDEF: short SInt16`
			`TYPEDEF: int SInt32`
			`TYPEDEF: longlong SInt64`
change cocoa and core foundation types to be 64-bit clean 2008-09-09 22:19:59 -04:00			`TYPEDEF: ulong CFTypeID`
Add some CFFileDescriptor-related functions 2008-12-06 18:35:04 -05:00			`TYPEDEF: UInt32 CFOptionFlags`
Updating unit tests for I/O re-organization 2008-12-14 22:21:44 -05:00			`TYPEDEF: void* CFUUIDRef`
Add core-foundation.launch-services for finding the path of a bundle. Add a new standard-paths vocabulary for finding files. 2011-10-30 18:13:50 -04:00			`TYPEDEF: SInt32 OSStatus`
			`TYPEDEF: uchar[4] FourCharCode`
			`TYPEDEF: FourCharCode OSType`

			`STRUCT: FSRef`
			`{ opaque uchar[80] } ;`
Initial import 2007-09-20 18:09:08 -04:00
update cocoa and core-foundation stuff to use classes.struct and boxed malloc-arrays 2009-08-29 13:22:55 -04:00			`STRUCT: CFRange`
			`{ location CFIndex }`
			`{ length CFIndex } ;`
Fix <CFString> and CF>string to allow null bytes 2009-01-25 20:02:59 -05:00
			`: <CFRange> ( location length -- range )`
update cocoa and core-foundation stuff to use classes.struct and boxed malloc-arrays 2009-08-29 13:22:55 -04:00			`CFRange <struct-boa> ;`
Fix <CFString> and CF>string to allow null bytes 2009-01-25 20:02:59 -05:00
factor: actual patch to remove ; from all c/fortran functions 2015-07-19 19:25:30 -04:00			`FUNCTION: CFTypeRef CFRetain ( CFTypeRef cf )`
Initial import 2007-09-20 18:09:08 -04:00
factor: actual patch to remove ; from all c/fortran functions 2015-07-19 19:25:30 -04:00			`FUNCTION: void CFRelease ( CFTypeRef cf )`
HID manager callback convenience words. CFRunLoop function bindings 2008-07-14 23:12:06 -04:00
update cocoa and core-foundation stuff to use classes.struct and boxed malloc-arrays 2009-08-29 13:22:55 -04:00			`DESTRUCTOR: CFRelease`