1 { 2 * Accessibility.h 3 * 4 * Copyright (c) 2002 Apple Computer, Inc. All rights reserved. 5 * 6 } 7 { Pascal Translation: Jonas Maebe, <jonas@freepascal.org>, October 2009 } 8 { Pascal Translation Updated: Jonas Maebe, <jonas@freepascal.org>, October 2012 } 9 { 10 Modified for use with Free Pascal 11 Version 308 12 Please report any bugs to <gpc@microbizz.nl> 13 } 14 15 {$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE} 16 {$mode macpas} 17 {$modeswitch cblocks} 18 {$packenum 1} 19 {$macro on} 20 {$inline on} 21 {$calling mwpascal} 22 23 unit Accessibility; 24 interface 25 {$setc UNIVERSAL_INTERFACES_VERSION := $0400} 26 {$setc GAP_INTERFACES_VERSION := $0308} 27 28 {$ifc not defined USE_CFSTR_CONSTANT_MACROS} 29 {$setc USE_CFSTR_CONSTANT_MACROS := TRUE} 30 {$endc} 31 32 {$ifc defined CPUPOWERPC and defined CPUI386} 33 {$error Conflicting initial definitions for CPUPOWERPC and CPUI386} 34 {$endc} 35 {$ifc defined FPC_BIG_ENDIAN and defined FPC_LITTLE_ENDIAN} 36 {$error Conflicting initial definitions for FPC_BIG_ENDIAN and FPC_LITTLE_ENDIAN} 37 {$endc} 38 39 {$ifc not defined __ppc__ and defined CPUPOWERPC32} 40 {$setc __ppc__ := 1} 41 {$elsec} 42 {$setc __ppc__ := 0} 43 {$endc} 44 {$ifc not defined __ppc64__ and defined CPUPOWERPC64} 45 {$setc __ppc64__ := 1} 46 {$elsec} 47 {$setc __ppc64__ := 0} 48 {$endc} 49 {$ifc not defined __i386__ and defined CPUI386} 50 {$setc __i386__ := 1} 51 {$elsec} 52 {$setc __i386__ := 0} 53 {$endc} 54 {$ifc not defined __x86_64__ and defined CPUX86_64} 55 {$setc __x86_64__ := 1} 56 {$elsec} 57 {$setc __x86_64__ := 0} 58 {$endc} 59 {$ifc not defined __arm__ and defined CPUARM} 60 {$setc __arm__ := 1} 61 {$elsec} 62 {$setc __arm__ := 0} 63 {$endc} 64 {$ifc not defined __arm64__ and defined CPUAARCH64} 65 {$setc __arm64__ := 1} 66 {$elsec} 67 {$setc __arm64__ := 0} 68 {$endc} 69 70 {$ifc defined cpu64} 71 {$setc __LP64__ := 1} 72 {$elsec} 73 {$setc __LP64__ := 0} 74 {$endc} 75 76 77 {$ifc defined __ppc__ and __ppc__ and defined __i386__ and __i386__} 78 {$error Conflicting definitions for __ppc__ and __i386__} 79 {$endc} 80 81 {$ifc defined __ppc__ and __ppc__} 82 {$setc TARGET_CPU_PPC := TRUE} 83 {$setc TARGET_CPU_PPC64 := FALSE} 84 {$setc TARGET_CPU_X86 := FALSE} 85 {$setc TARGET_CPU_X86_64 := FALSE} 86 {$setc TARGET_CPU_ARM := FALSE} 87 {$setc TARGET_CPU_ARM64 := FALSE} 88 {$setc TARGET_OS_MAC := TRUE} 89 {$setc TARGET_OS_IPHONE := FALSE} 90 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 91 {$setc TARGET_OS_EMBEDDED := FALSE} 92 {$elifc defined __ppc64__ and __ppc64__} 93 {$setc TARGET_CPU_PPC := FALSE} 94 {$setc TARGET_CPU_PPC64 := TRUE} 95 {$setc TARGET_CPU_X86 := FALSE} 96 {$setc TARGET_CPU_X86_64 := FALSE} 97 {$setc TARGET_CPU_ARM := FALSE} 98 {$setc TARGET_CPU_ARM64 := FALSE} 99 {$setc TARGET_OS_MAC := TRUE} 100 {$setc TARGET_OS_IPHONE := FALSE} 101 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 102 {$setc TARGET_OS_EMBEDDED := FALSE} 103 {$elifc defined __i386__ and __i386__} 104 {$setc TARGET_CPU_PPC := FALSE} 105 {$setc TARGET_CPU_PPC64 := FALSE} 106 {$setc TARGET_CPU_X86 := TRUE} 107 {$setc TARGET_CPU_X86_64 := FALSE} 108 {$setc TARGET_CPU_ARM := FALSE} 109 {$setc TARGET_CPU_ARM64 := FALSE} 110 {$ifc defined iphonesim} 111 {$setc TARGET_OS_MAC := FALSE} 112 {$setc TARGET_OS_IPHONE := TRUE} 113 {$setc TARGET_IPHONE_SIMULATOR := TRUE} 114 {$elsec} 115 {$setc TARGET_OS_MAC := TRUE} 116 {$setc TARGET_OS_IPHONE := FALSE} 117 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 118 {$endc} 119 {$setc TARGET_OS_EMBEDDED := FALSE} 120 {$elifc defined __x86_64__ and __x86_64__} 121 {$setc TARGET_CPU_PPC := FALSE} 122 {$setc TARGET_CPU_PPC64 := FALSE} 123 {$setc TARGET_CPU_X86 := FALSE} 124 {$setc TARGET_CPU_X86_64 := TRUE} 125 {$setc TARGET_CPU_ARM := FALSE} 126 {$setc TARGET_CPU_ARM64 := FALSE} 127 {$ifc defined iphonesim} 128 {$setc TARGET_OS_MAC := FALSE} 129 {$setc TARGET_OS_IPHONE := TRUE} 130 {$setc TARGET_IPHONE_SIMULATOR := TRUE} 131 {$elsec} 132 {$setc TARGET_OS_MAC := TRUE} 133 {$setc TARGET_OS_IPHONE := FALSE} 134 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 135 {$endc} 136 {$setc TARGET_OS_EMBEDDED := FALSE} 137 {$elifc defined __arm__ and __arm__} 138 {$setc TARGET_CPU_PPC := FALSE} 139 {$setc TARGET_CPU_PPC64 := FALSE} 140 {$setc TARGET_CPU_X86 := FALSE} 141 {$setc TARGET_CPU_X86_64 := FALSE} 142 {$setc TARGET_CPU_ARM := TRUE} 143 {$setc TARGET_CPU_ARM64 := FALSE} 144 {$setc TARGET_OS_MAC := FALSE} 145 {$setc TARGET_OS_IPHONE := TRUE} 146 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 147 {$setc TARGET_OS_EMBEDDED := TRUE} 148 {$elifc defined __arm64__ and __arm64__} 149 {$setc TARGET_CPU_PPC := FALSE} 150 {$setc TARGET_CPU_PPC64 := FALSE} 151 {$setc TARGET_CPU_X86 := FALSE} 152 {$setc TARGET_CPU_X86_64 := FALSE} 153 {$setc TARGET_CPU_ARM := FALSE} 154 {$setc TARGET_CPU_ARM64 := TRUE} 155 {$ifc defined ios} 156 {$setc TARGET_OS_MAC := FALSE} 157 {$setc TARGET_OS_IPHONE := TRUE} 158 {$setc TARGET_OS_EMBEDDED := TRUE} 159 {$elsec} 160 {$setc TARGET_OS_MAC := TRUE} 161 {$setc TARGET_OS_IPHONE := FALSE} 162 {$setc TARGET_OS_EMBEDDED := FALSE} 163 {$endc} 164 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 165 {$elsec} 166 {$error __ppc__ nor __ppc64__ nor __i386__ nor __x86_64__ nor __arm__ nor __arm64__ is defined.} 167 {$endc} 168 169 {$ifc defined __LP64__ and __LP64__ } 170 {$setc TARGET_CPU_64 := TRUE} 171 {$elsec} 172 {$setc TARGET_CPU_64 := FALSE} 173 {$endc} 174 175 {$ifc defined FPC_BIG_ENDIAN} 176 {$setc TARGET_RT_BIG_ENDIAN := TRUE} 177 {$setc TARGET_RT_LITTLE_ENDIAN := FALSE} 178 {$elifc defined FPC_LITTLE_ENDIAN} 179 {$setc TARGET_RT_BIG_ENDIAN := FALSE} 180 {$setc TARGET_RT_LITTLE_ENDIAN := TRUE} 181 {$elsec} 182 {$error Neither FPC_BIG_ENDIAN nor FPC_LITTLE_ENDIAN are defined.} 183 {$endc} 184 {$setc ACCESSOR_CALLS_ARE_FUNCTIONS := TRUE} 185 {$setc CALL_NOT_IN_CARBON := FALSE} 186 {$setc OLDROUTINENAMES := FALSE} 187 {$setc OPAQUE_TOOLBOX_STRUCTS := TRUE} 188 {$setc OPAQUE_UPP_TYPES := TRUE} 189 {$setc OTCARBONAPPLICATION := TRUE} 190 {$setc OTKERNEL := FALSE} 191 {$setc PM_USE_SESSION_APIS := TRUE} 192 {$setc TARGET_API_MAC_CARBON := TRUE} 193 {$setc TARGET_API_MAC_OS8 := FALSE} 194 {$setc TARGET_API_MAC_OSX := TRUE} 195 {$setc TARGET_CARBON := TRUE} 196 {$setc TARGET_CPU_68K := FALSE} 197 {$setc TARGET_CPU_MIPS := FALSE} 198 {$setc TARGET_CPU_SPARC := FALSE} 199 {$setc TARGET_OS_UNIX := FALSE} 200 {$setc TARGET_OS_WIN32 := FALSE} 201 {$setc TARGET_RT_MAC_68881 := FALSE} 202 {$setc TARGET_RT_MAC_CFM := FALSE} 203 {$setc TARGET_RT_MAC_MACHO := TRUE} 204 {$setc TYPED_FUNCTION_POINTERS := TRUE} 205 {$setc TYPE_BOOL := FALSE} 206 {$setc TYPE_EXTENDED := FALSE} 207 {$setc TYPE_LONGLONG := TRUE} 208 uses MacTypes,AXErrors,AXConstants,AXUIElement,AXValue,AXTextAttributedString; 209 {$endc} {not MACOSALLINCLUDE} 210 211 212 213 214 {$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE} 215 216 end. 217 {$endc} {not MACOSALLINCLUDE} 218