1 ! Copyright (C) 2006, 2009 Slava Pestov
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: alien.c-types alien.syntax combinators kernel layouts
4 classes.struct core-graphics.types ;
7 TYPEDEF: long NSInteger
8 TYPEDEF: ulong NSUInteger
10 TYPEDEF: CGPoint NSPoint
11 TYPEDEF: NSPoint _NSPoint
13 TYPEDEF: CGSize NSSize
14 TYPEDEF: NSSize _NSSize
16 TYPEDEF: CGRect NSRect
17 TYPEDEF: NSRect _NSRect
20 { location NSUInteger }
21 { length NSUInteger } ;
23 TYPEDEF: NSRange _NSRange
25 ! The "lL" type encodings refer to 32-bit values even in 64-bit mode
28 TYPEDEF: void* unknown_type
30 : <NSRange> ( location length -- size )
31 NSRange <struct-boa> ;
33 STRUCT: NSFastEnumerationState
36 { mutationsPtr ulong* }