* renamed objcbase.BOOL type to objc.ObjCBOOL to prevent name clashes

  * fixed some signatures in CocoaInt that should refer to ctypes.cbool
    but instead used objcbase.(ObjC)BOOL

git-svn-id: trunk@42483 -

packages/cocoaint/src/CocoaAll.pas

@@ -85,8 +85,8 @@ type
 function NSSTR (inString: PChar): NSString;
 function NSMakeRange (loc: NSUInteger; len: NSUInteger): NSRange;
 function NSMaxRange (range: NSRange): NSUInteger;
-function NSLocationInRange (loc: NSUInteger; range: NSRange): BOOL;
-function NSEqualRanges (range1, range2: NSRange): BOOL;
+function NSLocationInRange (loc: NSUInteger; range: NSRange): ObjCBOOL;
+function NSEqualRanges (range1, range2: NSRange): ObjCBOOL;
 function NSMakePoint (x: CGFloat; y: CGFloat): NSPoint;
 function NSMakeSize(w: CGFloat; h: CGFloat): NSSize;
 function NSMakeRect(x, y: CGFloat; w, h: CGFloat): NSRect;

packages/cocoaint/src/InlineFunctions.inc

@@ -10,7 +10,7 @@ begin
  result := range.location + range.length;
 end;
 
-function NSLocationInRange (loc: NSUInteger; range: NSRange): BOOL;
+function NSLocationInRange (loc: NSUInteger; range: NSRange): ObjCBOOL;
 begin
  if (loc <= range.location + range.length) and (loc >= range.location) then
   result := true
@@ -18,7 +18,7 @@ begin
   result := false;
 end;
 
-function NSEqualRanges (range1, range2: NSRange): BOOL;
+function NSEqualRanges (range1, range2: NSRange): ObjCBOOL;
 begin
  if (range1.location = range2.location) and (range1.length = range2.length) then
   result := true

packages/cocoaint/src/appkit/NSATSTypesetter.inc

@@ -66,8 +66,8 @@
 
 { NSPrimitiveInterfaceCategory }
   NSPrimitiveInterfaceCategory = objccategory external (NSATSTypesetter)
-    function usesFontLeading: BOOL; message 'usesFontLeading';
-    procedure setUsesFontLeading(flag: BOOL); message 'setUsesFontLeading:';
+    function usesFontLeading: ObjCBOOL; message 'usesFontLeading';
+    procedure setUsesFontLeading(flag: ObjCBOOL); message 'setUsesFontLeading:';
     function typesetterBehavior: NSTypesetterBehavior; message 'typesetterBehavior';
     procedure setTypesetterBehavior(behavior: NSTypesetterBehavior); message 'setTypesetterBehavior:';
     function hyphenationFactor: single; message 'hyphenationFactor';
@@ -76,8 +76,8 @@
     procedure setLineFragmentPadding(padding: CGFloat); message 'setLineFragmentPadding:';
     function substituteFontForFont(originalFont: NSFont): NSFont; message 'substituteFontForFont:';
     function textTabForGlyphLocation_writingDirection_maxLocation(glyphLocation: CGFloat; direction: NSWritingDirection; maxLocation: CGFloat): NSTextTab; message 'textTabForGlyphLocation:writingDirection:maxLocation:';
-    function bidiProcessingEnabled: BOOL; message 'bidiProcessingEnabled';
-    procedure setBidiProcessingEnabled(flag: BOOL); message 'setBidiProcessingEnabled:';
+    function bidiProcessingEnabled: ObjCBOOL; message 'bidiProcessingEnabled';
+    procedure setBidiProcessingEnabled(flag: ObjCBOOL); message 'setBidiProcessingEnabled:';
     procedure setAttributedString(attrString: NSAttributedString); message 'setAttributedString:';
     function attributedString: NSAttributedString; message 'attributedString';
     procedure setParagraphGlyphRange_separatorGlyphRange(paragraphRange: NSRange; paragraphSeparatorRange: NSRange); message 'setParagraphGlyphRange:separatorGlyphRange:';
@@ -89,15 +89,15 @@
     function paragraphSpacingAfterGlyphAtIndex_withProposedLineFragmentRect(glyphIndex: NSUInteger; rect: NSRect): CGFloat; message 'paragraphSpacingAfterGlyphAtIndex:withProposedLineFragmentRect:';
     function layoutManager: NSLayoutManager; message 'layoutManager';
     function currentTextContainer: NSTextContainer; message 'currentTextContainer';
-    procedure setHardInvalidation_forGlyphRange(flag: BOOL; glyphRange: NSRange); message 'setHardInvalidation:forGlyphRange:';
+    procedure setHardInvalidation_forGlyphRange(flag: ObjCBOOL; glyphRange: NSRange); message 'setHardInvalidation:forGlyphRange:';
     procedure getLineFragmentRect_usedRect_forParagraphSeparatorGlyphRange_atProposedOrigin(lineFragmentRect: NSRectPtr; lineFragmentUsedRect: NSRectPtr; paragraphSeparatorGlyphRange_: NSRange; lineOrigin: NSPoint); message 'getLineFragmentRect:usedRect:forParagraphSeparatorGlyphRange:atProposedOrigin:';
   end;
 
 { NSLayoutPhaseInterface_NSATSTypesetterCategory }
   NSLayoutPhaseInterface_NSATSTypesetterCategory = objccategory external name 'NSLayoutPhaseInterface' (NSATSTypesetter)
     procedure willSetLineFragmentRect_forGlyphRange_usedRect_baselineOffset(lineRect: NSRectPtr; glyphRange: NSRange; usedRect: NSRectPtr; baselineOffset: CGFloatPtr); message 'willSetLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
-    function shouldBreakLineByWordBeforeCharacterAtIndex(charIndex: NSUInteger): BOOL; message 'shouldBreakLineByWordBeforeCharacterAtIndex:';
-    function shouldBreakLineByHyphenatingBeforeCharacterAtIndex(charIndex: NSUInteger): BOOL; message 'shouldBreakLineByHyphenatingBeforeCharacterAtIndex:';
+    function shouldBreakLineByWordBeforeCharacterAtIndex(charIndex: NSUInteger): ObjCBOOL; message 'shouldBreakLineByWordBeforeCharacterAtIndex:';
+    function shouldBreakLineByHyphenatingBeforeCharacterAtIndex(charIndex: NSUInteger): ObjCBOOL; message 'shouldBreakLineByHyphenatingBeforeCharacterAtIndex:';
     function hyphenationFactorForGlyphAtIndex(glyphIndex: NSUInteger): single; message 'hyphenationFactorForGlyphAtIndex:';
     function hyphenCharacterForGlyphAtIndex(glyphIndex: NSUInteger): UTF32Char; message 'hyphenCharacterForGlyphAtIndex:';
     function boundingBoxForControlGlyphAtIndex_forTextContainer_proposedLineFragment_glyphPosition_characterIndex(glyphIndex: NSUInteger; textContainer: NSTextContainer; proposedRect: NSRect; glyphPosition: NSPoint; charIndex: NSUInteger): NSRect; message 'boundingBoxForControlGlyphAtIndex:forTextContainer:proposedLineFragment:glyphPosition:characterIndex:';
@@ -107,13 +107,13 @@
   NSGlyphStorageInterface_NSATSTypesetterCategory = objccategory external name 'NSGlyphStorageInterface' (NSATSTypesetter)
     function characterRangeForGlyphRange_actualGlyphRange(glyphRange: NSRange; actualGlyphRange: NSRangePointer): NSRange; message 'characterRangeForGlyphRange:actualGlyphRange:';
     function glyphRangeForCharacterRange_actualCharacterRange(charRange: NSRange; actualCharRange: NSRangePointer): NSRange; message 'glyphRangeForCharacterRange:actualCharacterRange:';
-    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphsRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pBOOL): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphsRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pObjCBOOL): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
     procedure setLineFragmentRect_forGlyphRange_usedRect_baselineOffset(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect; baselineOffset: CGFloat); message 'setLineFragmentRect:forGlyphRange:usedRect:baselineOffset:';
     procedure substituteGlyphsInRange_withGlyphs(glyphRange: NSRange; glyphs: NSGlyphPtr); message 'substituteGlyphsInRange:withGlyphs:';
     procedure insertGlyph_atGlyphIndex_characterIndex(glyph: NSGlyph; glyphIndex: NSUInteger; characterIndex: NSUInteger); message 'insertGlyph:atGlyphIndex:characterIndex:';
     procedure deleteGlyphsInRange(glyphRange: NSRange); message 'deleteGlyphsInRange:';
-    procedure setNotShownAttribute_forGlyphRange(flag: BOOL; glyphRange: NSRange); message 'setNotShownAttribute:forGlyphRange:';
-    procedure setDrawsOutsideLineFragment_forGlyphRange(flag: BOOL; glyphRange: NSRange); message 'setDrawsOutsideLineFragment:forGlyphRange:';
+    procedure setNotShownAttribute_forGlyphRange(flag: ObjCBOOL; glyphRange: NSRange); message 'setNotShownAttribute:forGlyphRange:';
+    procedure setDrawsOutsideLineFragment_forGlyphRange(flag: ObjCBOOL; glyphRange: NSRange); message 'setDrawsOutsideLineFragment:forGlyphRange:';
     procedure setLocation_withAdvancements_forStartOfGlyphRange(location: NSPoint; advancements: CGFloatPtr; glyphRange: NSRange); message 'setLocation:withAdvancements:forStartOfGlyphRange:';
     procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
     procedure setBidiLevels_forGlyphRange(levels: pbyte; glyphRange: NSRange); message 'setBidiLevels:forGlyphRange:';

packages/cocoaint/src/appkit/NSAccessibility.inc

@@ -338,14 +338,14 @@ var
   NSAccessibilityCategory = objccategory external (NSObject)
     function accessibilityAttributeNames: NSArray; message 'accessibilityAttributeNames';
     function accessibilityAttributeValue(attribute: NSString): id; message 'accessibilityAttributeValue:';
-    function accessibilityIsAttributeSettable(attribute: NSString): BOOL; message 'accessibilityIsAttributeSettable:';
+    function accessibilityIsAttributeSettable(attribute: NSString): ObjCBOOL; message 'accessibilityIsAttributeSettable:';
     procedure accessibilitySetValue_forAttribute(value: id; attribute: NSString); message 'accessibilitySetValue:forAttribute:';
     function accessibilityParameterizedAttributeNames: NSArray; message 'accessibilityParameterizedAttributeNames';
     function accessibilityAttributeValue_forParameter(attribute: NSString; parameter: id): id; message 'accessibilityAttributeValue:forParameter:';
     function accessibilityActionNames: NSArray; message 'accessibilityActionNames';
     function accessibilityActionDescription(action: NSString): NSString; message 'accessibilityActionDescription:';
     procedure accessibilityPerformAction(action: NSString); message 'accessibilityPerformAction:';
-    function accessibilityIsIgnored: BOOL; message 'accessibilityIsIgnored';
+    function accessibilityIsIgnored: ObjCBOOL; message 'accessibilityIsIgnored';
     function accessibilityHitTest(point: NSPoint): id; message 'accessibilityHitTest:';
     function accessibilityFocusedUIElement: id; message 'accessibilityFocusedUIElement';
     function accessibilityIndexOfChild(child: id): NSUInteger; message 'accessibilityIndexOfChild:';
@@ -355,7 +355,7 @@ var
 
 { NSAccessibilityAdditionsCategory }
   NSAccessibilityAdditionsCategory = objccategory external (NSObject)
-    function accessibilitySetOverrideValue_forAttribute(value: id; attribute: NSString): BOOL; message 'accessibilitySetOverrideValue:forAttribute:';
+    function accessibilitySetOverrideValue_forAttribute(value: id; attribute: NSString): ObjCBOOL; message 'accessibilitySetOverrideValue:forAttribute:';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSAlert.inc

@@ -84,10 +84,10 @@ type
     _delegate: id;
     _alertStyle: NSAlertStyle;
     _helpAnchor: id;
-    _layoutDone: BOOL;
-    _showsHelp: BOOL;
-    _showsSuppressionButton: BOOL;
-    reserved: BOOL;
+    _layoutDone: ObjCBOOL;
+    _showsHelp: ObjCBOOL;
+    _showsSuppressionButton: ObjCBOOL;
+    reserved: ObjCBOOL;
     _suppressionButton: id;
     _accessoryView: id;
     
@@ -102,16 +102,16 @@ type
     function icon: NSImage; message 'icon';
     function addButtonWithTitle(title: NSString): NSButton; message 'addButtonWithTitle:';
     function buttons: NSArray; message 'buttons';
-    procedure setShowsHelp(showsHelp_: BOOL); message 'setShowsHelp:';
-    function showsHelp: BOOL; message 'showsHelp';
+    procedure setShowsHelp(showsHelp_: ObjCBOOL); message 'setShowsHelp:';
+    function showsHelp: ObjCBOOL; message 'showsHelp';
     procedure setHelpAnchor(anchor: NSString); message 'setHelpAnchor:';
     function helpAnchor: NSString; message 'helpAnchor';
     procedure setAlertStyle(style: NSAlertStyle); message 'setAlertStyle:';
     function alertStyle: NSAlertStyle; message 'alertStyle';
     procedure setDelegate(delegate_: NSAlertDelegateProtocol); message 'setDelegate:';
     function delegate: NSAlertDelegateProtocol; message 'delegate';
-    procedure setShowsSuppressionButton(flag: BOOL); message 'setShowsSuppressionButton:';
-    function showsSuppressionButton: BOOL; message 'showsSuppressionButton';
+    procedure setShowsSuppressionButton(flag: ObjCBOOL); message 'setShowsSuppressionButton:';
+    function showsSuppressionButton: ObjCBOOL; message 'showsSuppressionButton';
     function suppressionButton: NSButton; message 'suppressionButton';
     procedure setAccessoryView(view: NSView); message 'setAccessoryView:';
     function accessoryView: NSView; message 'accessoryView';
@@ -131,7 +131,7 @@ type
 { NSAlertDelegate Protocol }
   NSAlertDelegateProtocol = objcprotocol external name 'NSAlertDelegate'
   optional
-    function alertShowHelp(alert: NSAlert): BOOL; message 'alertShowHelp:';
+    function alertShowHelp(alert: NSAlert): ObjCBOOL; message 'alertShowHelp:';
   end;
 {$endif}
 {$endif}

packages/cocoaint/src/appkit/NSAnimation.inc

@@ -126,7 +126,7 @@ var
     function initWithDuration_animationCurve(duration_: NSTimeInterval; animationCurve_: NSAnimationCurve): id; message 'initWithDuration:animationCurve:';
     procedure startAnimation; message 'startAnimation';
     procedure stopAnimation; message 'stopAnimation';
-    function isAnimating: BOOL; message 'isAnimating';
+    function isAnimating: ObjCBOOL; message 'isAnimating';
     function currentProgress: NSAnimationProgress; message 'currentProgress';
     procedure setCurrentProgress(progress: NSAnimationProgress); message 'setCurrentProgress:';
     procedure setDuration(duration_: NSTimeInterval); message 'setDuration:';
@@ -193,7 +193,7 @@ var
 { NSAnimationDelegate Protocol }
   NSAnimationDelegateProtocol = objcprotocol external name 'NSAnimationDelegate'
   optional
-    function animationShouldStart(animation: NSAnimation): BOOL; message 'animationShouldStart:';
+    function animationShouldStart(animation: NSAnimation): ObjCBOOL; message 'animationShouldStart:';
     procedure animationDidStop(animation: NSAnimation); message 'animationDidStop:';
     procedure animationDidEnd(animation: NSAnimation); message 'animationDidEnd:';
     function animation_valueForProgress(animation: NSAnimation; progress: NSAnimationProgress): single; message 'animation:valueForProgress:';

packages/cocoaint/src/appkit/NSApplication.inc

@@ -108,11 +108,11 @@ type
 
 { Functions }
 function NSApplicationMain(argc: cint; argv: PPChar {array of PChar}): cint; cdecl; external;
-function NSApplicationLoad: BOOL; cdecl; external;
-function NSShowsServicesMenuItem(itemName: NSString): BOOL; cdecl; external;
-function NSSetShowsServicesMenuItem(itemName: NSString; enabled: BOOL): NSInteger; cdecl; external;
+function NSApplicationLoad: ObjCBOOL; cdecl; external;
+function NSShowsServicesMenuItem(itemName: NSString): ObjCBOOL; cdecl; external;
+function NSSetShowsServicesMenuItem(itemName: NSString; enabled: ObjCBOOL): NSInteger; cdecl; external;
 procedure NSUpdateDynamicServices; cdecl; external;
-function NSPerformService(itemName: NSString; pboard: NSPasteboard): BOOL; cdecl; external;
+function NSPerformService(itemName: NSString; pboard: NSPasteboard): ObjCBOOL; cdecl; external;
 procedure NSRegisterServicesProvider(provider: id; name: NSString); cdecl; external;
 procedure NSUnregisterServicesProvider(name: NSString); cdecl; external;
 
@@ -229,11 +229,11 @@ var
     function windowWithWindowNumber(windowNum: NSInteger): NSWindow; message 'windowWithWindowNumber:';
     function mainWindow: NSWindow; message 'mainWindow';
     function keyWindow: NSWindow; message 'keyWindow';
-    function isActive: BOOL; message 'isActive';
-    function isHidden: BOOL; message 'isHidden';
-    function isRunning: BOOL; message 'isRunning';
+    function isActive: ObjCBOOL; message 'isActive';
+    function isHidden: ObjCBOOL; message 'isHidden';
+    function isRunning: ObjCBOOL; message 'isRunning';
     procedure deactivate; message 'deactivate';
-    procedure activateIgnoringOtherApps(flag: BOOL); message 'activateIgnoringOtherApps:';
+    procedure activateIgnoringOtherApps(flag: ObjCBOOL); message 'activateIgnoringOtherApps:';
     procedure hideOtherApplications(sender: id); message 'hideOtherApplications:';
     procedure unhideAllApplications(sender: id); message 'unhideAllApplications:';
     procedure finishLaunching; message 'finishLaunching';
@@ -253,15 +253,15 @@ var
     procedure beginSheet_modalForWindow_modalDelegate_didEndSelector_contextInfo(sheet: NSWindow; docWindow: NSWindow; modalDelegate: id; didEndSelector: SEL; contextInfo: Pointer); message 'beginSheet:modalForWindow:modalDelegate:didEndSelector:contextInfo:';
     procedure endSheet(sheet: NSWindow); message 'endSheet:';
     procedure endSheet_returnCode(sheet: NSWindow; returnCode: NSInteger); message 'endSheet:returnCode:';
-    function nextEventMatchingMask_untilDate_inMode_dequeue(mask: NSUInteger; expiration: NSDate; mode: NSString; deqFlag: BOOL): NSEvent; message 'nextEventMatchingMask:untilDate:inMode:dequeue:';
+    function nextEventMatchingMask_untilDate_inMode_dequeue(mask: NSUInteger; expiration: NSDate; mode: NSString; deqFlag: ObjCBOOL): NSEvent; message 'nextEventMatchingMask:untilDate:inMode:dequeue:';
     procedure discardEventsMatchingMask_beforeEvent(mask: NSUInteger; lastEvent: NSEvent); message 'discardEventsMatchingMask:beforeEvent:';
-    procedure postEvent_atStart(event: NSEvent; flag: BOOL); message 'postEvent:atStart:';
+    procedure postEvent_atStart(event: NSEvent; flag: ObjCBOOL); message 'postEvent:atStart:';
     function currentEvent: NSEvent; message 'currentEvent';
     procedure sendEvent(theEvent: NSEvent); message 'sendEvent:';
     procedure preventWindowOrdering; message 'preventWindowOrdering';
-    function makeWindowsPerform_inOrder(aSelector: SEL; flag: BOOL): NSWindow; message 'makeWindowsPerform:inOrder:';
+    function makeWindowsPerform_inOrder(aSelector: SEL; flag: ObjCBOOL): NSWindow; message 'makeWindowsPerform:inOrder:';
     function windows: NSArray; message 'windows';
-    procedure setWindowsNeedUpdate(needUpdate: BOOL); message 'setWindowsNeedUpdate:';
+    procedure setWindowsNeedUpdate(needUpdate: ObjCBOOL); message 'setWindowsNeedUpdate:';
     procedure updateWindows; message 'updateWindows';
     procedure setMainMenu(aMenu: NSMenu); message 'setMainMenu:';
     function mainMenu: NSMenu; message 'mainMenu';
@@ -270,16 +270,16 @@ var
     procedure setApplicationIconImage(image: NSImage); message 'setApplicationIconImage:';
     function applicationIconImage: NSImage; message 'applicationIconImage';
     function activationPolicy: NSApplicationActivationPolicy; message 'activationPolicy';
-    function setActivationPolicy(activationPolicy_: NSApplicationActivationPolicy): BOOL; message 'setActivationPolicy:';
+    function setActivationPolicy(activationPolicy_: NSApplicationActivationPolicy): ObjCBOOL; message 'setActivationPolicy:';
     function dockTile: NSDockTile; message 'dockTile';
-    function sendAction_to_from(theAction: SEL; theTarget: id; sender: id): BOOL; message 'sendAction:to:from:';
+    function sendAction_to_from(theAction: SEL; theTarget: id; sender: id): ObjCBOOL; message 'sendAction:to:from:';
     function targetForAction(theAction: SEL): id; message 'targetForAction:';
     function targetForAction_to_from(theAction: SEL; theTarget: id; sender: id): id; message 'targetForAction:to:from:';
-    function tryToPerform_with(anAction: SEL; anObject: id): BOOL; message 'tryToPerform:with:';
+    function tryToPerform_with(anAction: SEL; anObject: id): ObjCBOOL; message 'tryToPerform:with:';
     function validRequestorForSendType_returnType(sendType: NSString; returnType: NSString): id; message 'validRequestorForSendType:returnType:';
     procedure reportException(theException: NSException); message 'reportException:';
     class procedure detachDrawingThread_toTarget_withObject(selector: SEL; target: id; argument: id); message 'detachDrawingThread:toTarget:withObject:';
-    procedure replyToApplicationShouldTerminate(shouldTerminate: BOOL); message 'replyToApplicationShouldTerminate:';
+    procedure replyToApplicationShouldTerminate(shouldTerminate: ObjCBOOL); message 'replyToApplicationShouldTerminate:';
     procedure replyToOpenOrPrint(reply: NSApplicationDelegateReply); message 'replyToOpenOrPrint:';
     procedure orderFrontCharacterPalette(sender: id); message 'orderFrontCharacterPalette:';
     function presentationOptions: NSApplicationPresentationOptions; message 'presentationOptions';
@@ -287,7 +287,7 @@ var
     function currentSystemPresentationOptions: NSApplicationPresentationOptions; message 'currentSystemPresentationOptions';
 
     { Adopted Protocols }
-    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): BOOL;
+    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): ObjCBOOL;
   end;
 
 { NSWindowsMenuCategory }
@@ -296,15 +296,15 @@ var
     function windowsMenu: NSMenu; message 'windowsMenu';
     procedure arrangeInFront(sender: id); message 'arrangeInFront:';
     procedure removeWindowsItem(win: NSWindow); message 'removeWindowsItem:';
-    procedure addWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: BOOL); message 'addWindowsItem:title:filename:';
-    procedure changeWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: BOOL); message 'changeWindowsItem:title:filename:';
+    procedure addWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: ObjCBOOL); message 'addWindowsItem:title:filename:';
+    procedure changeWindowsItem_title_filename(win: NSWindow; aString: NSString; isFilename: ObjCBOOL); message 'changeWindowsItem:title:filename:';
     procedure updateWindowsItem(win: NSWindow); message 'updateWindowsItem:';
     procedure miniaturizeAll(sender: id); message 'miniaturizeAll:';
   end;
 
 { NSFullKeyboardAccessCategory }
   NSFullKeyboardAccessCategory = objccategory external (NSApplication)
-    function isFullKeyboardAccessEnabled: BOOL; message 'isFullKeyboardAccessEnabled';
+    function isFullKeyboardAccessEnabled: ObjCBOOL; message 'isFullKeyboardAccessEnabled';
   end;
 
 { NSServicesMenuCategory }
@@ -316,8 +316,8 @@ var
 
 { NSServicesRequestsCategory }
   NSServicesRequestsCategory = objccategory external (NSObject)
-    function writeSelectionToPasteboard_types(pboard: NSPasteboard; types: NSArray): BOOL; message 'writeSelectionToPasteboard:types:';
-    function readSelectionFromPasteboard(pboard: NSPasteboard): BOOL; message 'readSelectionFromPasteboard:';
+    function writeSelectionToPasteboard_types(pboard: NSPasteboard; types: NSArray): ObjCBOOL; message 'writeSelectionToPasteboard:types:';
+    function readSelectionFromPasteboard(pboard: NSPasteboard): ObjCBOOL; message 'readSelectionFromPasteboard:';
   end;
 
 { NSServicesHandlingCategory }
@@ -354,16 +354,16 @@ var
   NSApplicationDelegateProtocol = objcprotocol external name 'NSApplicationDelegate'
   optional
     function applicationShouldTerminate(sender: NSApplication): NSApplicationTerminateReply; message 'applicationShouldTerminate:';
-    function application_openFile(sender: NSApplication; filename: NSString): BOOL; message 'application:openFile:';
+    function application_openFile(sender: NSApplication; filename: NSString): ObjCBOOL; message 'application:openFile:';
     procedure application_openFiles(sender: NSApplication; filenames: NSArray); message 'application:openFiles:';
-    function application_openTempFile(sender: NSApplication; filename: NSString): BOOL; message 'application:openTempFile:';
-    function applicationShouldOpenUntitledFile(sender: NSApplication): BOOL; message 'applicationShouldOpenUntitledFile:';
-    function applicationOpenUntitledFile(sender: NSApplication): BOOL; message 'applicationOpenUntitledFile:';
-    function application_openFileWithoutUI(sender: id; filename: NSString): BOOL; message 'application:openFileWithoutUI:';
-    function application_printFile(sender: NSApplication; filename: NSString): BOOL; message 'application:printFile:';
-    function application_printFiles_withSettings_showPrintPanels(application: NSApplication; fileNames: NSArray; printSettings: NSDictionary; showPrintPanels: BOOL): NSApplicationPrintReply; message 'application:printFiles:withSettings:showPrintPanels:';
-    function applicationShouldTerminateAfterLastWindowClosed(sender: NSApplication): BOOL; message 'applicationShouldTerminateAfterLastWindowClosed:';
-    function applicationShouldHandleReopen_hasVisibleWindows(sender: NSApplication; flag: BOOL): BOOL; message 'applicationShouldHandleReopen:hasVisibleWindows:';
+    function application_openTempFile(sender: NSApplication; filename: NSString): ObjCBOOL; message 'application:openTempFile:';
+    function applicationShouldOpenUntitledFile(sender: NSApplication): ObjCBOOL; message 'applicationShouldOpenUntitledFile:';
+    function applicationOpenUntitledFile(sender: NSApplication): ObjCBOOL; message 'applicationOpenUntitledFile:';
+    function application_openFileWithoutUI(sender: id; filename: NSString): ObjCBOOL; message 'application:openFileWithoutUI:';
+    function application_printFile(sender: NSApplication; filename: NSString): ObjCBOOL; message 'application:printFile:';
+    function application_printFiles_withSettings_showPrintPanels(application: NSApplication; fileNames: NSArray; printSettings: NSDictionary; showPrintPanels: ObjCBOOL): NSApplicationPrintReply; message 'application:printFiles:withSettings:showPrintPanels:';
+    function applicationShouldTerminateAfterLastWindowClosed(sender: NSApplication): ObjCBOOL; message 'applicationShouldTerminateAfterLastWindowClosed:';
+    function applicationShouldHandleReopen_hasVisibleWindows(sender: NSApplication; flag: ObjCBOOL): ObjCBOOL; message 'applicationShouldHandleReopen:hasVisibleWindows:';
     function applicationDockMenu(sender: NSApplication): NSMenu; message 'applicationDockMenu:';
     function application_willPresentError(application: NSApplication; error: NSError): NSError; message 'application:willPresentError:';
     procedure applicationWillFinishLaunching(notification: NSNotification); message 'applicationWillFinishLaunching:';

packages/cocoaint/src/appkit/NSApplicationScripting.inc

@@ -44,7 +44,7 @@
 
 { NSApplicationScriptingDelegationCategory }
   NSApplicationScriptingDelegationCategory = objccategory external (NSObject)
-    function application_delegateHandlesKey(sender: NSApplication; key: NSString): BOOL; message 'application:delegateHandlesKey:';
+    function application_delegateHandlesKey(sender: NSApplication; key: NSString): ObjCBOOL; message 'application:delegateHandlesKey:';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSArrayController.inc

@@ -77,44 +77,44 @@
     
   public
     procedure rearrangeObjects; message 'rearrangeObjects';
-    procedure setAutomaticallyRearrangesObjects(flag: BOOL); message 'setAutomaticallyRearrangesObjects:';
-    function automaticallyRearrangesObjects: BOOL; message 'automaticallyRearrangesObjects';
+    procedure setAutomaticallyRearrangesObjects(flag: ObjCBOOL); message 'setAutomaticallyRearrangesObjects:';
+    function automaticallyRearrangesObjects: ObjCBOOL; message 'automaticallyRearrangesObjects';
     function automaticRearrangementKeyPaths: NSArray; message 'automaticRearrangementKeyPaths';
     procedure didChangeArrangementCriteria; message 'didChangeArrangementCriteria';
     procedure setSortDescriptors(sortDescriptors_: NSArray); message 'setSortDescriptors:';
     function sortDescriptors: NSArray; message 'sortDescriptors';
     procedure setFilterPredicate(filterPredicate_: NSPredicate); message 'setFilterPredicate:';
     function filterPredicate: NSPredicate; message 'filterPredicate';
-    procedure setClearsFilterPredicateOnInsertion(flag: BOOL); message 'setClearsFilterPredicateOnInsertion:';
-    function clearsFilterPredicateOnInsertion: BOOL; message 'clearsFilterPredicateOnInsertion';
+    procedure setClearsFilterPredicateOnInsertion(flag: ObjCBOOL); message 'setClearsFilterPredicateOnInsertion:';
+    function clearsFilterPredicateOnInsertion: ObjCBOOL; message 'clearsFilterPredicateOnInsertion';
     function arrangeObjects(objects: NSArray): NSArray; message 'arrangeObjects:';
     function arrangedObjects: id; message 'arrangedObjects';
-    procedure setAvoidsEmptySelection(flag: BOOL); message 'setAvoidsEmptySelection:';
-    function avoidsEmptySelection: BOOL; message 'avoidsEmptySelection';
-    procedure setPreservesSelection(flag: BOOL); message 'setPreservesSelection:';
-    function preservesSelection: BOOL; message 'preservesSelection';
-    procedure setSelectsInsertedObjects(flag: BOOL); message 'setSelectsInsertedObjects:';
-    function selectsInsertedObjects: BOOL; message 'selectsInsertedObjects';
-    procedure setAlwaysUsesMultipleValuesMarker(flag: BOOL); message 'setAlwaysUsesMultipleValuesMarker:';
-    function alwaysUsesMultipleValuesMarker: BOOL; message 'alwaysUsesMultipleValuesMarker';
-    function setSelectionIndexes(indexes: NSIndexSet): BOOL; message 'setSelectionIndexes:';
+    procedure setAvoidsEmptySelection(flag: ObjCBOOL); message 'setAvoidsEmptySelection:';
+    function avoidsEmptySelection: ObjCBOOL; message 'avoidsEmptySelection';
+    procedure setPreservesSelection(flag: ObjCBOOL); message 'setPreservesSelection:';
+    function preservesSelection: ObjCBOOL; message 'preservesSelection';
+    procedure setSelectsInsertedObjects(flag: ObjCBOOL); message 'setSelectsInsertedObjects:';
+    function selectsInsertedObjects: ObjCBOOL; message 'selectsInsertedObjects';
+    procedure setAlwaysUsesMultipleValuesMarker(flag: ObjCBOOL); message 'setAlwaysUsesMultipleValuesMarker:';
+    function alwaysUsesMultipleValuesMarker: ObjCBOOL; message 'alwaysUsesMultipleValuesMarker';
+    function setSelectionIndexes(indexes: NSIndexSet): ObjCBOOL; message 'setSelectionIndexes:';
     function selectionIndexes: NSIndexSet; message 'selectionIndexes';
-    function setSelectionIndex(index: NSUInteger): BOOL; message 'setSelectionIndex:';
+    function setSelectionIndex(index: NSUInteger): ObjCBOOL; message 'setSelectionIndex:';
     function selectionIndex: NSUInteger; message 'selectionIndex';
-    function addSelectionIndexes(indexes: NSIndexSet): BOOL; message 'addSelectionIndexes:';
-    function removeSelectionIndexes(indexes: NSIndexSet): BOOL; message 'removeSelectionIndexes:';
-    function setSelectedObjects(objects: NSArray): BOOL; message 'setSelectedObjects:';
+    function addSelectionIndexes(indexes: NSIndexSet): ObjCBOOL; message 'addSelectionIndexes:';
+    function removeSelectionIndexes(indexes: NSIndexSet): ObjCBOOL; message 'removeSelectionIndexes:';
+    function setSelectedObjects(objects: NSArray): ObjCBOOL; message 'setSelectedObjects:';
     function selectedObjects: NSArray; message 'selectedObjects';
-    function addSelectedObjects(objects: NSArray): BOOL; message 'addSelectedObjects:';
-    function removeSelectedObjects(objects: NSArray): BOOL; message 'removeSelectedObjects:';
+    function addSelectedObjects(objects: NSArray): ObjCBOOL; message 'addSelectedObjects:';
+    function removeSelectedObjects(objects: NSArray): ObjCBOOL; message 'removeSelectedObjects:';
     procedure add(sender: id); message 'add:';
     procedure remove(sender: id); message 'remove:';
     procedure insert(sender: id); message 'insert:';
-    function canInsert: BOOL; message 'canInsert';
+    function canInsert: ObjCBOOL; message 'canInsert';
     procedure selectNext(sender: id); message 'selectNext:';
     procedure selectPrevious(sender: id); message 'selectPrevious:';
-    function canSelectNext: BOOL; message 'canSelectNext';
-    function canSelectPrevious: BOOL; message 'canSelectPrevious';
+    function canSelectNext: ObjCBOOL; message 'canSelectNext';
+    function canSelectPrevious: ObjCBOOL; message 'canSelectPrevious';
     procedure addObject(object_: id); message 'addObject:';
     procedure addObjects(objects: NSArray); message 'addObjects:';
     procedure insertObject_atArrangedObjectIndex(object_: id; index: NSUInteger); message 'insertObject:atArrangedObjectIndex:';

packages/cocoaint/src/appkit/NSAttributedString.inc

@@ -180,7 +180,7 @@ var
     function attributedSubstringFromRange(range: NSRange): NSAttributedString; message 'attributedSubstringFromRange:';
     function attributesAtIndex_longestEffectiveRange_inRange(location: NSUInteger; range: NSRangePointer; rangeLimit: NSRange): NSDictionary; message 'attributesAtIndex:longestEffectiveRange:inRange:';
     function attribute_atIndex_longestEffectiveRange_inRange(attrName: NSString; location: NSUInteger; range: NSRangePointer; rangeLimit: NSRange): id; message 'attribute:atIndex:longestEffectiveRange:inRange:';
-    function isEqualToAttributedString(other: NSAttributedString): BOOL; message 'isEqualToAttributedString:';
+    function isEqualToAttributedString(other: NSAttributedString): ObjCBOOL; message 'isEqualToAttributedString:';
     function initWithString(str: NSString): id; message 'initWithString:';
     function initWithString_attributes(str: NSString; attrs: NSDictionary): id; message 'initWithString:attributes:';
     function initWithAttributedString(attrStr: NSAttributedString): id; message 'initWithAttributedString:';
@@ -205,11 +205,11 @@ var
   NSAttributedStringKitAdditionsCategory = objccategory external (NSAttributedString)
     function fontAttributesInRange(range: NSRange): NSDictionary; message 'fontAttributesInRange:';
     function rulerAttributesInRange(range: NSRange): NSDictionary; message 'rulerAttributesInRange:';
-    function containsAttachments: BOOL; message 'containsAttachments';
+    function containsAttachments: ObjCBOOL; message 'containsAttachments';
     function lineBreakBeforeIndex_withinRange(location: NSUInteger; aRange: NSRange): NSUInteger; message 'lineBreakBeforeIndex:withinRange:';
     function lineBreakByHyphenatingBeforeIndex_withinRange(location: NSUInteger; aRange: NSRange): NSUInteger; message 'lineBreakByHyphenatingBeforeIndex:withinRange:';
     function doubleClickAtIndex(location: NSUInteger): NSRange; message 'doubleClickAtIndex:';
-    function nextWordFromIndex_forward(location: NSUInteger; isForward: BOOL): NSUInteger; message 'nextWordFromIndex:forward:';
+    function nextWordFromIndex_forward(location: NSUInteger; isForward: ObjCBOOL): NSUInteger; message 'nextWordFromIndex:forward:';
     function URLAtIndex_effectiveRange(location: NSUInteger; effectiveRange: NSRangePointer): NSURL; message 'URLAtIndex:effectiveRange:';
     class function textTypes: NSArray; message 'textTypes';
     class function textUnfilteredTypes: NSArray; message 'textUnfilteredTypes';
@@ -246,10 +246,10 @@ var
 
 { NSMutableAttributedStringKitAdditionsCategory }
   NSMutableAttributedStringKitAdditionsCategory = objccategory external (NSMutableAttributedString)
-    function readFromURL_options_documentAttributes_error(url: NSURL; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): BOOL; message 'readFromURL:options:documentAttributes:error:';
-    function readFromData_options_documentAttributes_error(data: NSData; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): BOOL; message 'readFromData:options:documentAttributes:error:';
-    function readFromURL_options_documentAttributes(url: NSURL; options: NSDictionary; dict: NSDictionaryPointer): BOOL; message 'readFromURL:options:documentAttributes:';
-    function readFromData_options_documentAttributes(data: NSData; options: NSDictionary; dict: NSDictionaryPointer): BOOL; message 'readFromData:options:documentAttributes:';
+    function readFromURL_options_documentAttributes_error(url: NSURL; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): ObjCBOOL; message 'readFromURL:options:documentAttributes:error:';
+    function readFromData_options_documentAttributes_error(data: NSData; opts: NSDictionary; dict: NSDictionaryPointer; error: NSErrorPointer): ObjCBOOL; message 'readFromData:options:documentAttributes:error:';
+    function readFromURL_options_documentAttributes(url: NSURL; options: NSDictionary; dict: NSDictionaryPointer): ObjCBOOL; message 'readFromURL:options:documentAttributes:';
+    function readFromData_options_documentAttributes(data: NSData; options: NSDictionary; dict: NSDictionaryPointer): ObjCBOOL; message 'readFromData:options:documentAttributes:';
     procedure superscriptRange(range: NSRange); message 'superscriptRange:';
     procedure subscriptRange(range: NSRange); message 'subscriptRange:';
     procedure unscriptRange(range: NSRange); message 'unscriptRange:';

packages/cocoaint/src/appkit/NSBezierPath.inc

@@ -154,7 +154,7 @@ type
     function bezierPathByFlatteningPath: NSBezierPath; message 'bezierPathByFlatteningPath';
     function bezierPathByReversingPath: NSBezierPath; message 'bezierPathByReversingPath';
     procedure transformUsingAffineTransform(transform: NSAffineTransform); message 'transformUsingAffineTransform:';
-    function isEmpty: BOOL; message 'isEmpty';
+    function isEmpty: ObjCBOOL; message 'isEmpty';
     function currentPoint: NSPoint; message 'currentPoint';
     function controlPointBounds: NSRect; message 'controlPointBounds';
     function bounds: NSRect; message 'bounds';
@@ -166,14 +166,14 @@ type
     procedure appendBezierPathWithRect(rect: NSRect); message 'appendBezierPathWithRect:';
     procedure appendBezierPathWithPoints_count(points: NSPointArray; count: NSInteger); message 'appendBezierPathWithPoints:count:';
     procedure appendBezierPathWithOvalInRect(rect: NSRect); message 'appendBezierPathWithOvalInRect:';
-    procedure appendBezierPathWithArcWithCenter_radius_startAngle_endAngle_clockwise(center: NSPoint; radius: CGFloat; startAngle: CGFloat; endAngle: CGFloat; clockwise: BOOL); message 'appendBezierPathWithArcWithCenter:radius:startAngle:endAngle:clockwise:';
+    procedure appendBezierPathWithArcWithCenter_radius_startAngle_endAngle_clockwise(center: NSPoint; radius: CGFloat; startAngle: CGFloat; endAngle: CGFloat; clockwise: ObjCBOOL); message 'appendBezierPathWithArcWithCenter:radius:startAngle:endAngle:clockwise:';
     procedure appendBezierPathWithArcWithCenter_radius_startAngle_endAngle(center: NSPoint; radius: CGFloat; startAngle: CGFloat; endAngle: CGFloat); message 'appendBezierPathWithArcWithCenter:radius:startAngle:endAngle:';
     procedure appendBezierPathWithArcFromPoint_toPoint_radius(point: NSPoint; point1: NSPoint; radius: CGFloat); message 'appendBezierPathWithArcFromPoint:toPoint:radius:';
     procedure appendBezierPathWithGlyph_inFont(glyph: NSGlyph; font: NSFont); message 'appendBezierPathWithGlyph:inFont:';
     procedure appendBezierPathWithGlyphs_count_inFont(glyphs: NSGlyphPtr; count: NSInteger; font: NSFont); message 'appendBezierPathWithGlyphs:count:inFont:';
     procedure appendBezierPathWithPackedGlyphs(packedGlyphs: PChar); message 'appendBezierPathWithPackedGlyphs:';
     procedure appendBezierPathWithRoundedRect_xRadius_yRadius(rect: NSRect; xRadius: CGFloat; yRadius: CGFloat); message 'appendBezierPathWithRoundedRect:xRadius:yRadius:';
-    function containsPoint(point: NSPoint): BOOL; message 'containsPoint:';
+    function containsPoint(point: NSPoint): ObjCBOOL; message 'containsPoint:';
 
     { Adopted Protocols }
     function copyWithZone(zone_: NSZonePtr): id;
@@ -183,8 +183,8 @@ type
 
 { NSBezierPathDeprecatedCategory }
   NSBezierPathDeprecatedCategory = objccategory external (NSBezierPath)
-    function cachesBezierPath: BOOL; message 'cachesBezierPath'; deprecated 'in Mac OS X 10 and later';
-    procedure setCachesBezierPath(flag: BOOL); message 'setCachesBezierPath:'; deprecated 'in Mac OS X 10 and later';
+    function cachesBezierPath: ObjCBOOL; message 'cachesBezierPath'; deprecated 'in Mac OS X 10 and later';
+    procedure setCachesBezierPath(flag: ObjCBOOL); message 'setCachesBezierPath:'; deprecated 'in Mac OS X 10 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSBitmapImageRep.inc

@@ -130,8 +130,8 @@ var
     
   public
     function initWithFocusedViewRect(rect: NSRect): id; message 'initWithFocusedViewRect:';
-    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bytesPerRow_bitsPerPixel(planes: PChar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: BOOL; isPlanar_: BOOL; colorSpaceName_: NSString; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bytesPerRow:bitsPerPixel:';
-    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bitmapFormat_bytesPerRow_bitsPerPixel(planes: PChar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: BOOL; isPlanar_: BOOL; colorSpaceName_: NSString; bitmapFormat_: NSBitmapFormat; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bitmapFormat:bytesPerRow:bitsPerPixel:';
+    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bytesPerRow_bitsPerPixel(planes: PChar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: ObjCBOOL; isPlanar_: ObjCBOOL; colorSpaceName_: NSString; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bytesPerRow:bitsPerPixel:';
+    function initWithBitmapDataPlanes_pixelsWide_pixelsHigh_bitsPerSample_samplesPerPixel_hasAlpha_isPlanar_colorSpaceName_bitmapFormat_bytesPerRow_bitsPerPixel(planes: PChar; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; alpha: ObjCBOOL; isPlanar_: ObjCBOOL; colorSpaceName_: NSString; bitmapFormat_: NSBitmapFormat; rBytes: NSInteger; pBits: NSInteger): id; message 'initWithBitmapDataPlanes:pixelsWide:pixelsHigh:bitsPerSample:samplesPerPixel:hasAlpha:isPlanar:colorSpaceName:bitmapFormat:bytesPerRow:bitsPerPixel:';
     function initWithCGImage(cgImage_: CGImageRef): id; message 'initWithCGImage:';
     function initWithCIImage(ciImage_: CIImage): id; message 'initWithCIImage:';
     class function imageRepsWithData(data: NSData): NSArray; message 'imageRepsWithData:';
@@ -139,7 +139,7 @@ var
     function initWithData(data: NSData): id; message 'initWithData:';
     function bitmapData: PChar; message 'bitmapData';
     procedure getBitmapDataPlanes(data: PChar); message 'getBitmapDataPlanes:';
-    function isPlanar: BOOL; message 'isPlanar';
+    function isPlanar: ObjCBOOL; message 'isPlanar';
     function samplesPerPixel: NSInteger; message 'samplesPerPixel';
     function bitsPerPixel: NSInteger; message 'bitsPerPixel';
     function bytesPerRow: NSInteger; message 'bytesPerRow';
@@ -154,10 +154,10 @@ var
     class function TIFFRepresentationOfImageRepsInArray_usingCompression_factor(array_: NSArray; comp: NSTIFFCompression; factor: single): NSData; message 'TIFFRepresentationOfImageRepsInArray:usingCompression:factor:';
     class procedure getTIFFCompressionTypes_count(list: NSTIFFCompressionPtr; numTypes: NSIntegerPtr); message 'getTIFFCompressionTypes:count:';
     class function localizedNameForTIFFCompressionType(compression: NSTIFFCompression): NSString; message 'localizedNameForTIFFCompressionType:';
-    function canBeCompressedUsing(compression: NSTIFFCompression): BOOL; message 'canBeCompressedUsing:';
+    function canBeCompressedUsing(compression: NSTIFFCompression): ObjCBOOL; message 'canBeCompressedUsing:';
     procedure colorizeByMappingGray_toColor_blackMapping_whiteMapping(midPoint: CGFloat; midPointColor: NSColor; shadowColor: NSColor; lightColor: NSColor); message 'colorizeByMappingGray:toColor:blackMapping:whiteMapping:';
     function initForIncrementalLoad: id; message 'initForIncrementalLoad';
-    function incrementalLoadFromData_complete(data: NSData; complete: BOOL): NSInteger; message 'incrementalLoadFromData:complete:';
+    function incrementalLoadFromData_complete(data: NSData; complete: ObjCBOOL): NSInteger; message 'incrementalLoadFromData:complete:';
     procedure setColor_atX_y(color: NSColor; x: NSInteger; y: NSInteger); message 'setColor:atX:y:';
     function colorAtX_y(x: NSInteger; y: NSInteger): NSColor; message 'colorAtX:y:';
     procedure getPixel_atX_y(p: NSUInteger; x: NSInteger; y: NSInteger); message 'getPixel:atX:y:';

packages/cocoaint/src/appkit/NSBox.inc

@@ -110,8 +110,8 @@ type
     procedure setFrameFromContentFrame(contentFrame: NSRect); message 'setFrameFromContentFrame:';
     function contentView: id; message 'contentView';
     procedure setContentView(aView: NSView); message 'setContentView:';
-    function isTransparent: BOOL; message 'isTransparent';
-    procedure setTransparent(flag: BOOL); message 'setTransparent:';
+    function isTransparent: ObjCBOOL; message 'isTransparent';
+    procedure setTransparent(flag: ObjCBOOL); message 'setTransparent:';
   end;
 
 { NSKeyboardUI_NSBoxCategory }

packages/cocoaint/src/appkit/NSBrowser.inc

@@ -162,7 +162,7 @@ var
   public
     class function cellClass: Pobjc_class; message 'cellClass';
     procedure loadColumnZero; message 'loadColumnZero';
-    function isLoaded: BOOL; message 'isLoaded';
+    function isLoaded: ObjCBOOL; message 'isLoaded';
     procedure setDoubleAction(aSelector: SEL); message 'setDoubleAction:';
     function doubleAction: SEL; message 'doubleAction';
     procedure setMatrixClass(factoryId: Pobjc_class); message 'setMatrixClass:';
@@ -172,34 +172,34 @@ var
     function cellPrototype: id; message 'cellPrototype';
     procedure setDelegate(anObject: NSBrowserDelegateProtocol); message 'setDelegate:';
     function delegate: NSBrowserDelegateProtocol; message 'delegate';
-    procedure setReusesColumns(flag: BOOL); message 'setReusesColumns:';
-    function reusesColumns: BOOL; message 'reusesColumns';
-    procedure setHasHorizontalScroller(flag: BOOL); message 'setHasHorizontalScroller:';
-    function hasHorizontalScroller: BOOL; message 'hasHorizontalScroller';
-    procedure setAutohidesScroller(flag: BOOL); message 'setAutohidesScroller:';
-    function autohidesScroller: BOOL; message 'autohidesScroller';
-    procedure setSeparatesColumns(flag: BOOL); message 'setSeparatesColumns:';
-    function separatesColumns: BOOL; message 'separatesColumns';
-    procedure setTitled(flag: BOOL); message 'setTitled:';
-    function isTitled: BOOL; message 'isTitled';
+    procedure setReusesColumns(flag: ObjCBOOL); message 'setReusesColumns:';
+    function reusesColumns: ObjCBOOL; message 'reusesColumns';
+    procedure setHasHorizontalScroller(flag: ObjCBOOL); message 'setHasHorizontalScroller:';
+    function hasHorizontalScroller: ObjCBOOL; message 'hasHorizontalScroller';
+    procedure setAutohidesScroller(flag: ObjCBOOL); message 'setAutohidesScroller:';
+    function autohidesScroller: ObjCBOOL; message 'autohidesScroller';
+    procedure setSeparatesColumns(flag: ObjCBOOL); message 'setSeparatesColumns:';
+    function separatesColumns: ObjCBOOL; message 'separatesColumns';
+    procedure setTitled(flag: ObjCBOOL); message 'setTitled:';
+    function isTitled: ObjCBOOL; message 'isTitled';
     procedure setMinColumnWidth(columnWidth: CGFloat); message 'setMinColumnWidth:';
     function minColumnWidth: CGFloat; message 'minColumnWidth';
     procedure setMaxVisibleColumns(columnCount: NSInteger); message 'setMaxVisibleColumns:';
     function maxVisibleColumns: NSInteger; message 'maxVisibleColumns';
-    procedure setAllowsMultipleSelection(flag: BOOL); message 'setAllowsMultipleSelection:';
-    function allowsMultipleSelection: BOOL; message 'allowsMultipleSelection';
-    procedure setAllowsBranchSelection(flag: BOOL); message 'setAllowsBranchSelection:';
-    function allowsBranchSelection: BOOL; message 'allowsBranchSelection';
-    procedure setAllowsEmptySelection(flag: BOOL); message 'setAllowsEmptySelection:';
-    function allowsEmptySelection: BOOL; message 'allowsEmptySelection';
-    procedure setTakesTitleFromPreviousColumn(flag: BOOL); message 'setTakesTitleFromPreviousColumn:';
-    function takesTitleFromPreviousColumn: BOOL; message 'takesTitleFromPreviousColumn';
-    procedure setSendsActionOnArrowKeys(flag: BOOL); message 'setSendsActionOnArrowKeys:';
-    function sendsActionOnArrowKeys: BOOL; message 'sendsActionOnArrowKeys';
+    procedure setAllowsMultipleSelection(flag: ObjCBOOL); message 'setAllowsMultipleSelection:';
+    function allowsMultipleSelection: ObjCBOOL; message 'allowsMultipleSelection';
+    procedure setAllowsBranchSelection(flag: ObjCBOOL); message 'setAllowsBranchSelection:';
+    function allowsBranchSelection: ObjCBOOL; message 'allowsBranchSelection';
+    procedure setAllowsEmptySelection(flag: ObjCBOOL); message 'setAllowsEmptySelection:';
+    function allowsEmptySelection: ObjCBOOL; message 'allowsEmptySelection';
+    procedure setTakesTitleFromPreviousColumn(flag: ObjCBOOL); message 'setTakesTitleFromPreviousColumn:';
+    function takesTitleFromPreviousColumn: ObjCBOOL; message 'takesTitleFromPreviousColumn';
+    procedure setSendsActionOnArrowKeys(flag: ObjCBOOL); message 'setSendsActionOnArrowKeys:';
+    function sendsActionOnArrowKeys: ObjCBOOL; message 'sendsActionOnArrowKeys';
     function itemAtIndexPath(indexPath: NSIndexPath): id; message 'itemAtIndexPath:';
     function itemAtRow_inColumn(row: NSInteger; column: NSInteger): id; message 'itemAtRow:inColumn:';
     function indexPathForColumn(column: NSInteger): NSIndexPath; message 'indexPathForColumn:';
-    function isLeafItem(item: id): BOOL; message 'isLeafItem:';
+    function isLeafItem(item: id): ObjCBOOL; message 'isLeafItem:';
     procedure reloadDataForRowIndexes_inColumn(rowIndexes: NSIndexSet; column: NSInteger); message 'reloadDataForRowIndexes:inColumn:';
     function parentForItemsInColumn(column: NSInteger): id; message 'parentForItemsInColumn:';
     procedure scrollRowToVisible_inColumn(row: NSInteger; column: NSInteger); message 'scrollRowToVisible:inColumn:';
@@ -207,7 +207,7 @@ var
     function titleOfColumn(column: NSInteger): NSString; message 'titleOfColumn:';
     procedure setPathSeparator(newString: NSString); message 'setPathSeparator:';
     function pathSeparator: NSString; message 'pathSeparator';
-    function setPath(path_: NSString): BOOL; message 'setPath:';
+    function setPath(path_: NSString): ObjCBOOL; message 'setPath:';
     function path: NSString; message 'path';
     function pathToColumn(column: NSInteger): NSString; message 'pathToColumn:';
     function clickedColumn: NSInteger; message 'clickedColumn';
@@ -242,20 +242,20 @@ var
     procedure tile; message 'tile';
     procedure doClick(sender: id); message 'doClick:';
     procedure doDoubleClick(sender: id); message 'doDoubleClick:';
-    function sendAction: BOOL; message 'sendAction';
+    function sendAction: ObjCBOOL; message 'sendAction';
     function titleFrameOfColumn(column: NSInteger): NSRect; message 'titleFrameOfColumn:';
     procedure drawTitleOfColumn_inRect(column: NSInteger; aRect: NSRect); message 'drawTitleOfColumn:inRect:';
     function titleHeight: CGFloat; message 'titleHeight';
     function frameOfColumn(column: NSInteger): NSRect; message 'frameOfColumn:';
     function frameOfInsideOfColumn(column: NSInteger): NSRect; message 'frameOfInsideOfColumn:';
     function frameOfRow_inColumn(row: NSInteger; column: NSInteger): NSRect; message 'frameOfRow:inColumn:';
-    function getRow_column_forPoint(row: NSIntegerPtr; column: NSIntegerPtr; point: NSPoint): BOOL; message 'getRow:column:forPoint:';
+    function getRow_column_forPoint(row: NSIntegerPtr; column: NSIntegerPtr; point: NSPoint): ObjCBOOL; message 'getRow:column:forPoint:';
     function columnWidthForColumnContentWidth(columnContentWidth: CGFloat): CGFloat; message 'columnWidthForColumnContentWidth:';
     function columnContentWidthForColumnWidth(columnWidth: CGFloat): CGFloat; message 'columnContentWidthForColumnWidth:';
     procedure setColumnResizingType(columnResizingType_: NSBrowserColumnResizingType); message 'setColumnResizingType:';
     function columnResizingType: NSBrowserColumnResizingType; message 'columnResizingType';
-    procedure setPrefersAllColumnUserResizing(prefersAllColumnResizing: BOOL); message 'setPrefersAllColumnUserResizing:';
-    function prefersAllColumnUserResizing: BOOL; message 'prefersAllColumnUserResizing';
+    procedure setPrefersAllColumnUserResizing(prefersAllColumnResizing: ObjCBOOL); message 'setPrefersAllColumnUserResizing:';
+    function prefersAllColumnUserResizing: ObjCBOOL; message 'prefersAllColumnUserResizing';
     procedure setWidth_ofColumn(columnWidth: CGFloat; columnIndex: NSInteger); message 'setWidth:ofColumn:';
     function widthOfColumn(column: NSInteger): CGFloat; message 'widthOfColumn:';
     procedure setRowHeight(height: CGFloat); message 'setRowHeight:';
@@ -266,20 +266,20 @@ var
     procedure setColumnsAutosaveName(name: NSString); message 'setColumnsAutosaveName:';
     function columnsAutosaveName: NSString; message 'columnsAutosaveName';
     class procedure removeSavedColumnsWithAutosaveName(name: NSString); message 'removeSavedColumnsWithAutosaveName:';
-    function canDragRowsWithIndexes_inColumn_withEvent(rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent): BOOL; message 'canDragRowsWithIndexes:inColumn:withEvent:';
+    function canDragRowsWithIndexes_inColumn_withEvent(rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent): ObjCBOOL; message 'canDragRowsWithIndexes:inColumn:withEvent:';
     function draggingImageForRowsWithIndexes_inColumn_withEvent_offset(rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'draggingImageForRowsWithIndexes:inColumn:withEvent:offset:';
-    procedure setDraggingSourceOperationMask_forLocal(mask: NSDragOperation; isLocal: BOOL); message 'setDraggingSourceOperationMask:forLocal:';
-    function allowsTypeSelect: BOOL; message 'allowsTypeSelect';
-    procedure setAllowsTypeSelect(value: BOOL); message 'setAllowsTypeSelect:';
+    procedure setDraggingSourceOperationMask_forLocal(mask: NSDragOperation; isLocal: ObjCBOOL); message 'setDraggingSourceOperationMask:forLocal:';
+    function allowsTypeSelect: ObjCBOOL; message 'allowsTypeSelect';
+    procedure setAllowsTypeSelect(value: ObjCBOOL); message 'setAllowsTypeSelect:';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     function backgroundColor: NSColor; message 'backgroundColor';
-    procedure editItemAtIndexPath_withEvent_select(indexPath: NSIndexPath; theEvent: NSEvent; select: BOOL); message 'editItemAtIndexPath:withEvent:select:';
+    procedure editItemAtIndexPath_withEvent_select(indexPath: NSIndexPath; theEvent: NSEvent; select: ObjCBOOL); message 'editItemAtIndexPath:withEvent:select:';
   end;
 
 { NSDeprecated_NSBrowserCategory }
   NSDeprecated_NSBrowserCategory = objccategory external name 'NSDeprecated' (NSBrowser)
-    procedure setAcceptsArrowKeys(flag: BOOL); message 'setAcceptsArrowKeys:'; deprecated 'in Mac OS X 10.6 and later';
-    function acceptsArrowKeys: BOOL; message 'acceptsArrowKeys'; deprecated 'in Mac OS X 10.6 and later';
+    procedure setAcceptsArrowKeys(flag: ObjCBOOL); message 'setAcceptsArrowKeys:'; deprecated 'in Mac OS X 10.6 and later';
+    function acceptsArrowKeys: ObjCBOOL; message 'acceptsArrowKeys'; deprecated 'in Mac OS X 10.6 and later';
     procedure displayColumn(column: NSInteger); message 'displayColumn:'; deprecated 'in Mac OS X 10.3 and later';
     procedure displayAllColumns; message 'displayAllColumns'; deprecated 'in Mac OS X 10.3 and later';
     procedure scrollViaScroller(sender: NSScroller); message 'scrollViaScroller:'; deprecated 'in Mac OS X 10.3 and later';
@@ -299,31 +299,31 @@ var
     procedure browser_createRowsForColumn_inMatrix(sender: NSBrowser; column: NSInteger; matrix: NSMatrix); message 'browser:createRowsForColumn:inMatrix:';
     function browser_numberOfChildrenOfItem(browser: NSBrowser; item: id): NSInteger; message 'browser:numberOfChildrenOfItem:';
     function browser_child_ofItem(browser: NSBrowser; index: NSInteger; item: id): id; message 'browser:child:ofItem:';
-    function browser_isLeafItem(browser: NSBrowser; item: id): BOOL; message 'browser:isLeafItem:';
+    function browser_isLeafItem(browser: NSBrowser; item: id): ObjCBOOL; message 'browser:isLeafItem:';
     function browser_objectValueForItem(browser: NSBrowser; item: id): id; message 'browser:objectValueForItem:';
     function browser_heightOfRow_inColumn(browser: NSBrowser; row: NSInteger; columnIndex: NSInteger): CGFloat; message 'browser:heightOfRow:inColumn:';
     function rootItemForBrowser(browser: NSBrowser): id; message 'rootItemForBrowser:';
     procedure browser_setObjectValue_forItem(browser: NSBrowser; object_: id; item: id); message 'browser:setObjectValue:forItem:';
-    function browser_shouldEditItem(browser: NSBrowser; item: id): BOOL; message 'browser:shouldEditItem:';
+    function browser_shouldEditItem(browser: NSBrowser; item: id): ObjCBOOL; message 'browser:shouldEditItem:';
     procedure browser_willDisplayCell_atRow_column(sender: NSBrowser; cell: id; row: NSInteger; column: NSInteger); message 'browser:willDisplayCell:atRow:column:';
     function browser_titleOfColumn(sender: NSBrowser; column: NSInteger): NSString; message 'browser:titleOfColumn:';
-    function browser_selectCellWithString_inColumn(sender: NSBrowser; title: NSString; column: NSInteger): BOOL; message 'browser:selectCellWithString:inColumn:';
-    function browser_selectRow_inColumn(sender: NSBrowser; row: NSInteger; column: NSInteger): BOOL; message 'browser:selectRow:inColumn:';
-    function browser_isColumnValid(sender: NSBrowser; column: NSInteger): BOOL; message 'browser:isColumnValid:';
+    function browser_selectCellWithString_inColumn(sender: NSBrowser; title: NSString; column: NSInteger): ObjCBOOL; message 'browser:selectCellWithString:inColumn:';
+    function browser_selectRow_inColumn(sender: NSBrowser; row: NSInteger; column: NSInteger): ObjCBOOL; message 'browser:selectRow:inColumn:';
+    function browser_isColumnValid(sender: NSBrowser; column: NSInteger): ObjCBOOL; message 'browser:isColumnValid:';
     procedure browserWillScroll(sender: NSBrowser); message 'browserWillScroll:';
     procedure browserDidScroll(sender: NSBrowser); message 'browserDidScroll:';
-    function browser_shouldSizeColumn_forUserResize_toWidth(browser: NSBrowser; columnIndex: NSInteger; forUserResize: BOOL; suggestedWidth: CGFloat): CGFloat; message 'browser:shouldSizeColumn:forUserResize:toWidth:';
+    function browser_shouldSizeColumn_forUserResize_toWidth(browser: NSBrowser; columnIndex: NSInteger; forUserResize: ObjCBOOL; suggestedWidth: CGFloat): CGFloat; message 'browser:shouldSizeColumn:forUserResize:toWidth:';
     function browser_sizeToFitWidthOfColumn(browser: NSBrowser; columnIndex: NSInteger): CGFloat; message 'browser:sizeToFitWidthOfColumn:';
     procedure browserColumnConfigurationDidChange(notification: NSNotification); message 'browserColumnConfigurationDidChange:';
-    function browser_shouldShowCellExpansionForRow_column(browser: NSBrowser; row: NSInteger; column: NSInteger): BOOL; message 'browser:shouldShowCellExpansionForRow:column:';
-    function browser_writeRowsWithIndexes_inColumn_toPasteboard(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; pasteboard: NSPasteboard): BOOL; message 'browser:writeRowsWithIndexes:inColumn:toPasteboard:';
+    function browser_shouldShowCellExpansionForRow_column(browser: NSBrowser; row: NSInteger; column: NSInteger): ObjCBOOL; message 'browser:shouldShowCellExpansionForRow:column:';
+    function browser_writeRowsWithIndexes_inColumn_toPasteboard(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; pasteboard: NSPasteboard): ObjCBOOL; message 'browser:writeRowsWithIndexes:inColumn:toPasteboard:';
     function browser_namesOfPromisedFilesDroppedAtDestination_forDraggedRowsWithIndexes_inColumn(browser: NSBrowser; dropDestination: NSURL; rowIndexes: NSIndexSet; column: NSInteger): NSArray; message 'browser:namesOfPromisedFilesDroppedAtDestination:forDraggedRowsWithIndexes:inColumn:';
-    function browser_canDragRowsWithIndexes_inColumn_withEvent(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent): BOOL; message 'browser:canDragRowsWithIndexes:inColumn:withEvent:';
+    function browser_canDragRowsWithIndexes_inColumn_withEvent(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent): ObjCBOOL; message 'browser:canDragRowsWithIndexes:inColumn:withEvent:';
     function browser_draggingImageForRowsWithIndexes_inColumn_withEvent_offset(browser: NSBrowser; rowIndexes: NSIndexSet; column: NSInteger; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'browser:draggingImageForRowsWithIndexes:inColumn:withEvent:offset:';
     function browser_validateDrop_proposedRow_column_dropOperation(browser: NSBrowser; info: NSDraggingInfoProtocol; row: NSIntegerPtr; column: NSIntegerPtr; dropOperation: NSBrowserDropOperationPtr): NSDragOperation; message 'browser:validateDrop:proposedRow:column:dropOperation:';
-    function browser_acceptDrop_atRow_column_dropOperation(browser: NSBrowser; info: NSDraggingInfoProtocol; row: NSInteger; column: NSInteger; dropOperation: NSBrowserDropOperation): BOOL; message 'browser:acceptDrop:atRow:column:dropOperation:';
+    function browser_acceptDrop_atRow_column_dropOperation(browser: NSBrowser; info: NSDraggingInfoProtocol; row: NSInteger; column: NSInteger; dropOperation: NSBrowserDropOperation): ObjCBOOL; message 'browser:acceptDrop:atRow:column:dropOperation:';
     function browser_typeSelectStringForRow_inColumn(browser: NSBrowser; row: NSInteger; column: NSInteger): NSString; message 'browser:typeSelectStringForRow:inColumn:';
-    function browser_shouldTypeSelectForEvent_withCurrentSearchString(browser: NSBrowser; event: NSEvent; searchString: NSString): BOOL; message 'browser:shouldTypeSelectForEvent:withCurrentSearchString:';
+    function browser_shouldTypeSelectForEvent_withCurrentSearchString(browser: NSBrowser; event: NSEvent; searchString: NSString): ObjCBOOL; message 'browser:shouldTypeSelectForEvent:withCurrentSearchString:';
     function browser_nextTypeSelectMatchFromRow_toRow_inColumn_forString(browser: NSBrowser; startRow: NSInteger; endRow: NSInteger; column: NSInteger; searchString: NSString): NSInteger; message 'browser:nextTypeSelectMatchFromRow:toRow:inColumn:forString:';
     function browser_previewViewControllerForLeafItem(browser: NSBrowser; item: id): NSViewController; message 'browser:previewViewControllerForLeafItem:';
     function browser_headerViewControllerForItem(browser: NSBrowser; item: id): NSViewController; message 'browser:headerViewControllerForItem:';

packages/cocoaint/src/appkit/NSBrowserCell.inc

@@ -46,10 +46,10 @@
     class function branchImage: NSImage; message 'branchImage';
     class function highlightedBranchImage: NSImage; message 'highlightedBranchImage';
     function highlightColorInView(controlView_: NSView): NSColor; message 'highlightColorInView:';
-    function isLeaf: BOOL; message 'isLeaf';
-    procedure setLeaf(flag: BOOL); message 'setLeaf:';
-    function isLoaded: BOOL; message 'isLoaded';
-    procedure setLoaded(flag: BOOL); message 'setLoaded:';
+    function isLeaf: ObjCBOOL; message 'isLeaf';
+    procedure setLeaf(flag: ObjCBOOL); message 'setLeaf:';
+    function isLoaded: ObjCBOOL; message 'isLoaded';
+    procedure setLoaded(flag: ObjCBOOL); message 'setLoaded:';
     procedure reset; message 'reset';
     procedure set_; message 'set';
     procedure setImage(image_: NSImage); message 'setImage:';

packages/cocoaint/src/appkit/NSButton.inc

@@ -56,21 +56,21 @@
     procedure setButtonType(aType: NSButtonType); message 'setButtonType:';
     function state: NSInteger; message 'state';
     procedure setState(value: NSInteger); message 'setState:';
-    function isBordered: BOOL; message 'isBordered';
-    procedure setBordered(flag: BOOL); message 'setBordered:';
-    function isTransparent: BOOL; message 'isTransparent';
-    procedure setTransparent(flag: BOOL); message 'setTransparent:';
+    function isBordered: ObjCBOOL; message 'isBordered';
+    procedure setBordered(flag: ObjCBOOL); message 'setBordered:';
+    function isTransparent: ObjCBOOL; message 'isTransparent';
+    procedure setTransparent(flag: ObjCBOOL); message 'setTransparent:';
     procedure setPeriodicDelay_interval(delay: single; interval: single); message 'setPeriodicDelay:interval:';
     procedure getPeriodicDelay_interval(delay: psingle; interval: psingle); message 'getPeriodicDelay:interval:';
     function keyEquivalent: NSString; message 'keyEquivalent';
     procedure setKeyEquivalent(charCode: NSString); message 'setKeyEquivalent:';
     function keyEquivalentModifierMask: NSUInteger; message 'keyEquivalentModifierMask';
     procedure setKeyEquivalentModifierMask(mask: NSUInteger); message 'setKeyEquivalentModifierMask:';
-    procedure highlight(flag: BOOL); message 'highlight:';
-    function performKeyEquivalent(key: NSEvent): BOOL; message 'performKeyEquivalent:';
+    procedure highlight(flag: ObjCBOOL); message 'highlight:';
+    function performKeyEquivalent(key: NSEvent): ObjCBOOL; message 'performKeyEquivalent:';
 
     { Adopted Protocols }
-    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): BOOL;
+    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): ObjCBOOL;
   end;
 
 { NSKeyboardUI_NSButtonCategory }
@@ -94,15 +94,15 @@
 
 { NSButtonMixedStateCategory }
   NSButtonMixedStateCategory = objccategory external (NSButton)
-    procedure setAllowsMixedState(flag: BOOL); message 'setAllowsMixedState:';
-    function allowsMixedState: BOOL; message 'allowsMixedState';
+    procedure setAllowsMixedState(flag: ObjCBOOL); message 'setAllowsMixedState:';
+    function allowsMixedState: ObjCBOOL; message 'allowsMixedState';
     procedure setNextState; message 'setNextState';
   end;
 
 { NSButtonBorderCategory }
   NSButtonBorderCategory = objccategory external (NSButton)
-    procedure setShowsBorderOnlyWhileMouseInside(show: BOOL); message 'setShowsBorderOnlyWhileMouseInside:';
-    function showsBorderOnlyWhileMouseInside: BOOL; message 'showsBorderOnlyWhileMouseInside';
+    procedure setShowsBorderOnlyWhileMouseInside(show: ObjCBOOL); message 'setShowsBorderOnlyWhileMouseInside:';
+    function showsBorderOnlyWhileMouseInside: ObjCBOOL; message 'showsBorderOnlyWhileMouseInside';
   end;
 
 { NSButtonSoundExtensionsCategory }

packages/cocoaint/src/appkit/NSButtonCell.inc

@@ -203,10 +203,10 @@ __BCFlags2Ptr = ^__BCFlags2;
     function showsStateBy: NSInteger; message 'showsStateBy';
     procedure setShowsStateBy(aType: NSInteger); message 'setShowsStateBy:';
     procedure setButtonType(aType: NSButtonType); message 'setButtonType:';
-    function isOpaque: BOOL; message 'isOpaque';
+    function isOpaque: ObjCBOOL; message 'isOpaque';
     procedure setFont(fontObj: NSFont); message 'setFont:';
-    function isTransparent: BOOL; message 'isTransparent';
-    procedure setTransparent(flag: BOOL); message 'setTransparent:';
+    function isTransparent: ObjCBOOL; message 'isTransparent';
+    procedure setTransparent(flag: ObjCBOOL); message 'setTransparent:';
     procedure setPeriodicDelay_interval(delay: single; interval: single); message 'setPeriodicDelay:interval:';
     procedure getPeriodicDelay_interval(delay: psingle; interval: psingle); message 'getPeriodicDelay:interval:';
     function keyEquivalent: NSString; message 'keyEquivalent';
@@ -235,10 +235,10 @@ __BCFlags2Ptr = ^__BCFlags2;
   NSButtonCellExtensionsCategory = objccategory external (NSButtonCell)
     function gradientType: NSGradientType; message 'gradientType';
     procedure setGradientType(type__: NSGradientType); message 'setGradientType:';
-    procedure setImageDimsWhenDisabled(flag: BOOL); message 'setImageDimsWhenDisabled:';
-    function imageDimsWhenDisabled: BOOL; message 'imageDimsWhenDisabled';
-    procedure setShowsBorderOnlyWhileMouseInside(show: BOOL); message 'setShowsBorderOnlyWhileMouseInside:';
-    function showsBorderOnlyWhileMouseInside: BOOL; message 'showsBorderOnlyWhileMouseInside';
+    procedure setImageDimsWhenDisabled(flag: ObjCBOOL); message 'setImageDimsWhenDisabled:';
+    function imageDimsWhenDisabled: ObjCBOOL; message 'imageDimsWhenDisabled';
+    procedure setShowsBorderOnlyWhileMouseInside(show: ObjCBOOL); message 'setShowsBorderOnlyWhileMouseInside:';
+    function showsBorderOnlyWhileMouseInside: ObjCBOOL; message 'showsBorderOnlyWhileMouseInside';
     procedure mouseEntered(event: NSEvent); message 'mouseEntered:';
     procedure mouseExited(event: NSEvent); message 'mouseExited:';
     function backgroundColor: NSColor; message 'backgroundColor';

packages/cocoaint/src/appkit/NSCachedImageRep.inc

@@ -48,7 +48,7 @@
     
   public
     function initWithWindow_rect(win: NSWindow; rect_: NSRect): id; message 'initWithWindow:rect:'; deprecated 'in Mac OS X 10.6 and later';
-    function initWithSize_depth_separate_alpha(size_: NSSize; depth: NSWindowDepth; flag: BOOL; alpha: BOOL): id; message 'initWithSize:depth:separate:alpha:'; deprecated 'in Mac OS X 10.6 and later';
+    function initWithSize_depth_separate_alpha(size_: NSSize; depth: NSWindowDepth; flag: ObjCBOOL; alpha: ObjCBOOL): id; message 'initWithSize:depth:separate:alpha:'; deprecated 'in Mac OS X 10.6 and later';
     function window: NSWindow; message 'window'; deprecated 'in Mac OS X 10.6 and later';
     function rect: NSRect; message 'rect'; deprecated 'in Mac OS X 10.6 and later';
   end;

packages/cocoaint/src/appkit/NSCell.inc

@@ -190,8 +190,8 @@ __CFlagsPtr = ^__CFlags;
 {$define NSCELL_PAS_F}
 
 { Functions }
-procedure NSDrawThreePartImage(frame: NSRect; startCap: NSImage; centerFill: NSImage; endCap: NSImage; vertical: BOOL; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: BOOL); cdecl; external;
-procedure NSDrawNinePartImage(frame: NSRect; topLeftCorner: NSImage; topEdgeFill: NSImage; topRightCorner: NSImage; leftEdgeFill: NSImage; centerFill: NSImage; rightEdgeFill: NSImage; bottomLeftCorner: NSImage; bottomEdgeFill: NSImage; bottomRightCorner: NSImage; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: BOOL); cdecl; external;
+procedure NSDrawThreePartImage(frame: NSRect; startCap: NSImage; centerFill: NSImage; endCap: NSImage; vertical: ObjCBOOL; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: ObjCBOOL); cdecl; external;
+procedure NSDrawNinePartImage(frame: NSRect; topLeftCorner: NSImage; topEdgeFill: NSImage; topRightCorner: NSImage; leftEdgeFill: NSImage; centerFill: NSImage; rightEdgeFill: NSImage; bottomLeftCorner: NSImage; bottomEdgeFill: NSImage; bottomRightCorner: NSImage; op: NSCompositingOperation; alphaFraction: CGFloat; flipped: ObjCBOOL); cdecl; external;
 
 {$endif}
 {$endif}
@@ -226,7 +226,7 @@ var
     _support: id;
     
   public
-    class function prefersTrackingUntilMouseUp: BOOL; message 'prefersTrackingUntilMouseUp';
+    class function prefersTrackingUntilMouseUp: ObjCBOOL; message 'prefersTrackingUntilMouseUp';
     function initTextCell(aString: NSString): id; message 'initTextCell:';
     function initImageCell(image_: NSImage): id; message 'initImageCell:';
     function controlView: NSView; message 'controlView';
@@ -243,37 +243,37 @@ var
     procedure setTag(anInt: NSInteger); message 'setTag:';
     function title: NSString; message 'title';
     procedure setTitle(aString: NSString); message 'setTitle:';
-    function isOpaque: BOOL; message 'isOpaque';
-    function isEnabled: BOOL; message 'isEnabled';
-    procedure setEnabled(flag: BOOL); message 'setEnabled:';
+    function isOpaque: ObjCBOOL; message 'isOpaque';
+    function isEnabled: ObjCBOOL; message 'isEnabled';
+    procedure setEnabled(flag: ObjCBOOL); message 'setEnabled:';
     function sendActionOn(mask: NSInteger): NSInteger; message 'sendActionOn:';
-    function isContinuous: BOOL; message 'isContinuous';
-    procedure setContinuous(flag: BOOL); message 'setContinuous:';
-    function isEditable: BOOL; message 'isEditable';
-    procedure setEditable(flag: BOOL); message 'setEditable:';
-    function isSelectable: BOOL; message 'isSelectable';
-    procedure setSelectable(flag: BOOL); message 'setSelectable:';
-    function isBordered: BOOL; message 'isBordered';
-    procedure setBordered(flag: BOOL); message 'setBordered:';
-    function isBezeled: BOOL; message 'isBezeled';
-    procedure setBezeled(flag: BOOL); message 'setBezeled:';
-    function isScrollable: BOOL; message 'isScrollable';
-    procedure setScrollable(flag: BOOL); message 'setScrollable:';
-    function isHighlighted: BOOL; message 'isHighlighted';
-    procedure setHighlighted(flag: BOOL); message 'setHighlighted:';
+    function isContinuous: ObjCBOOL; message 'isContinuous';
+    procedure setContinuous(flag: ObjCBOOL); message 'setContinuous:';
+    function isEditable: ObjCBOOL; message 'isEditable';
+    procedure setEditable(flag: ObjCBOOL); message 'setEditable:';
+    function isSelectable: ObjCBOOL; message 'isSelectable';
+    procedure setSelectable(flag: ObjCBOOL); message 'setSelectable:';
+    function isBordered: ObjCBOOL; message 'isBordered';
+    procedure setBordered(flag: ObjCBOOL); message 'setBordered:';
+    function isBezeled: ObjCBOOL; message 'isBezeled';
+    procedure setBezeled(flag: ObjCBOOL); message 'setBezeled:';
+    function isScrollable: ObjCBOOL; message 'isScrollable';
+    procedure setScrollable(flag: ObjCBOOL); message 'setScrollable:';
+    function isHighlighted: ObjCBOOL; message 'isHighlighted';
+    procedure setHighlighted(flag: ObjCBOOL); message 'setHighlighted:';
     function alignment: NSTextAlignment; message 'alignment';
     procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
-    function wraps: BOOL; message 'wraps';
-    procedure setWraps(flag: BOOL); message 'setWraps:';
+    function wraps: ObjCBOOL; message 'wraps';
+    procedure setWraps(flag: ObjCBOOL); message 'setWraps:';
     function font: NSFont; message 'font';
     procedure setFont(fontObj: NSFont); message 'setFont:';
-    function isEntryAcceptable(aString: NSString): BOOL; message 'isEntryAcceptable:';
+    function isEntryAcceptable(aString: NSString): ObjCBOOL; message 'isEntryAcceptable:';
     function keyEquivalent: NSString; message 'keyEquivalent';
     procedure setFormatter(newFormatter: NSFormatter); message 'setFormatter:';
     function formatter: id; message 'formatter';
     function objectValue: id; message 'objectValue';
     procedure setObjectValue(obj: NSCopyingProtocol); message 'setObjectValue:';
-    function hasValidObjectValue: BOOL; message 'hasValidObjectValue';
+    function hasValidObjectValue: ObjCBOOL; message 'hasValidObjectValue';
     function stringValue: NSString; message 'stringValue';
     procedure setStringValue(aString: NSString); message 'setStringValue:';
     function compare(otherCell: id): NSComparisonResult; message 'compare:';
@@ -308,13 +308,13 @@ var
     function setUpFieldEditorAttributes(textObj: NSText): NSText; message 'setUpFieldEditorAttributes:';
     procedure drawInteriorWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawInteriorWithFrame:inView:';
     procedure drawWithFrame_inView(cellFrame: NSRect; controlView_: NSView); message 'drawWithFrame:inView:';
-    procedure highlight_withFrame_inView(flag: BOOL; cellFrame: NSRect; controlView_: NSView); message 'highlight:withFrame:inView:';
+    procedure highlight_withFrame_inView(flag: ObjCBOOL; cellFrame: NSRect; controlView_: NSView); message 'highlight:withFrame:inView:';
     function mouseDownFlags: NSInteger; message 'mouseDownFlags';
     procedure getPeriodicDelay_interval(delay: psingle; interval: psingle); message 'getPeriodicDelay:interval:';
-    function startTrackingAt_inView(startPoint: NSPoint; controlView_: NSView): BOOL; message 'startTrackingAt:inView:';
-    function continueTracking_at_inView(lastPoint: NSPoint; currentPoint: NSPoint; controlView_: NSView): BOOL; message 'continueTracking:at:inView:';
-    procedure stopTracking_at_inView_mouseIsUp(lastPoint: NSPoint; stopPoint: NSPoint; controlView_: NSView; flag: BOOL); message 'stopTracking:at:inView:mouseIsUp:';
-    function trackMouse_inRect_ofView_untilMouseUp(theEvent: NSEvent; cellFrame: NSRect; controlView_: NSView; flag: BOOL): BOOL; message 'trackMouse:inRect:ofView:untilMouseUp:';
+    function startTrackingAt_inView(startPoint: NSPoint; controlView_: NSView): ObjCBOOL; message 'startTrackingAt:inView:';
+    function continueTracking_at_inView(lastPoint: NSPoint; currentPoint: NSPoint; controlView_: NSView): ObjCBOOL; message 'continueTracking:at:inView:';
+    procedure stopTracking_at_inView_mouseIsUp(lastPoint: NSPoint; stopPoint: NSPoint; controlView_: NSView; flag: ObjCBOOL); message 'stopTracking:at:inView:mouseIsUp:';
+    function trackMouse_inRect_ofView_untilMouseUp(theEvent: NSEvent; cellFrame: NSRect; controlView_: NSView; flag: ObjCBOOL): ObjCBOOL; message 'trackMouse:inRect:ofView:untilMouseUp:';
     procedure editWithFrame_inView_editor_delegate_event(aRect: NSRect; controlView_: NSView; textObj: NSText; anObject: id; theEvent: NSEvent); message 'editWithFrame:inView:editor:delegate:event:';
     procedure selectWithFrame_inView_editor_delegate_start_length(aRect: NSRect; controlView_: NSView; textObj: NSText; anObject: id; selStart: NSInteger; selLength: NSInteger); message 'selectWithFrame:inView:editor:delegate:start:length:';
     procedure endEditing(textObj: NSText); message 'endEditing:';
@@ -323,24 +323,24 @@ var
     function menu: NSMenu; message 'menu';
     function menuForEvent_inRect_ofView(event: NSEvent; cellFrame: NSRect; view: NSView): NSMenu; message 'menuForEvent:inRect:ofView:';
     class function defaultMenu: NSMenu; message 'defaultMenu';
-    procedure setSendsActionOnEndEditing(flag: BOOL); message 'setSendsActionOnEndEditing:';
-    function sendsActionOnEndEditing: BOOL; message 'sendsActionOnEndEditing';
+    procedure setSendsActionOnEndEditing(flag: ObjCBOOL); message 'setSendsActionOnEndEditing:';
+    function sendsActionOnEndEditing: ObjCBOOL; message 'sendsActionOnEndEditing';
     function baseWritingDirection: NSWritingDirection; message 'baseWritingDirection';
     procedure setBaseWritingDirection(writingDirection: NSWritingDirection); message 'setBaseWritingDirection:';
     procedure setLineBreakMode(mode: NSLineBreakMode); message 'setLineBreakMode:';
     function lineBreakMode: NSLineBreakMode; message 'lineBreakMode';
-    procedure setAllowsUndo(allowsUndo_: BOOL); message 'setAllowsUndo:';
-    function allowsUndo: BOOL; message 'allowsUndo';
+    procedure setAllowsUndo(allowsUndo_: ObjCBOOL); message 'setAllowsUndo:';
+    function allowsUndo: ObjCBOOL; message 'allowsUndo';
     function integerValue: NSInteger; message 'integerValue';
     procedure setIntegerValue(anInteger: NSInteger); message 'setIntegerValue:';
     procedure takeIntegerValueFrom(sender: id); message 'takeIntegerValueFrom:';
-    function truncatesLastVisibleLine: BOOL; message 'truncatesLastVisibleLine';
-    procedure setTruncatesLastVisibleLine(flag: BOOL); message 'setTruncatesLastVisibleLine:';
+    function truncatesLastVisibleLine: ObjCBOOL; message 'truncatesLastVisibleLine';
+    procedure setTruncatesLastVisibleLine(flag: ObjCBOOL); message 'setTruncatesLastVisibleLine:';
     function userInterfaceLayoutDirection: NSUserInterfaceLayoutDirection; message 'userInterfaceLayoutDirection';
     procedure setUserInterfaceLayoutDirection(layoutDirection: NSUserInterfaceLayoutDirection); message 'setUserInterfaceLayoutDirection:';
     function fieldEditorForView(aControlView: NSView): NSTextView; message 'fieldEditorForView:';
-    function usesSingleLineMode: BOOL; message 'usesSingleLineMode';
-    procedure setUsesSingleLineMode(flag: BOOL); message 'setUsesSingleLineMode:';
+    function usesSingleLineMode: ObjCBOOL; message 'usesSingleLineMode';
+    procedure setUsesSingleLineMode(flag: ObjCBOOL); message 'setUsesSingleLineMode:';
 
     { Adopted Protocols }
     function copyWithZone(zone_: NSZonePtr): id;
@@ -350,11 +350,11 @@ var
 
 { NSKeyboardUI_NSCellCategory }
   NSKeyboardUI_NSCellCategory = objccategory external name 'NSKeyboardUI' (NSCell)
-    procedure setRefusesFirstResponder(flag: BOOL); message 'setRefusesFirstResponder:';
-    function refusesFirstResponder: BOOL; message 'refusesFirstResponder';
-    function acceptsFirstResponder: BOOL; message 'acceptsFirstResponder';
-    procedure setShowsFirstResponder(showFR: BOOL); message 'setShowsFirstResponder:';
-    function showsFirstResponder: BOOL; message 'showsFirstResponder';
+    procedure setRefusesFirstResponder(flag: ObjCBOOL); message 'setRefusesFirstResponder:';
+    function refusesFirstResponder: ObjCBOOL; message 'refusesFirstResponder';
+    function acceptsFirstResponder: ObjCBOOL; message 'acceptsFirstResponder';
+    procedure setShowsFirstResponder(showFR: ObjCBOOL); message 'setShowsFirstResponder:';
+    function showsFirstResponder: ObjCBOOL; message 'showsFirstResponder';
     procedure setMnemonicLocation(location: NSUInteger); message 'setMnemonicLocation:';
     function mnemonicLocation: NSUInteger; message 'mnemonicLocation';
     function mnemonic: NSString; message 'mnemonic';
@@ -363,23 +363,23 @@ var
     procedure setFocusRingType(focusRingType_: NSFocusRingType); message 'setFocusRingType:';
     function focusRingType: NSFocusRingType; message 'focusRingType';
     class function defaultFocusRingType: NSFocusRingType; message 'defaultFocusRingType';
-    function wantsNotificationForMarkedText: BOOL; message 'wantsNotificationForMarkedText';
+    function wantsNotificationForMarkedText: ObjCBOOL; message 'wantsNotificationForMarkedText';
   end;
 
 { NSCellAttributedStringMethodsCategory }
   NSCellAttributedStringMethodsCategory = objccategory external (NSCell)
     function attributedStringValue: NSAttributedString; message 'attributedStringValue';
     procedure setAttributedStringValue(obj: NSAttributedString); message 'setAttributedStringValue:';
-    function allowsEditingTextAttributes: BOOL; message 'allowsEditingTextAttributes';
-    procedure setAllowsEditingTextAttributes(flag: BOOL); message 'setAllowsEditingTextAttributes:';
-    function importsGraphics: BOOL; message 'importsGraphics';
-    procedure setImportsGraphics(flag: BOOL); message 'setImportsGraphics:';
+    function allowsEditingTextAttributes: ObjCBOOL; message 'allowsEditingTextAttributes';
+    procedure setAllowsEditingTextAttributes(flag: ObjCBOOL); message 'setAllowsEditingTextAttributes:';
+    function importsGraphics: ObjCBOOL; message 'importsGraphics';
+    procedure setImportsGraphics(flag: ObjCBOOL); message 'setImportsGraphics:';
   end;
 
 { NSCellMixedStateCategory }
   NSCellMixedStateCategory = objccategory external (NSCell)
-    procedure setAllowsMixedState(flag: BOOL); message 'setAllowsMixedState:';
-    function allowsMixedState: BOOL; message 'allowsMixedState';
+    procedure setAllowsMixedState(flag: ObjCBOOL); message 'setAllowsMixedState:';
+    function allowsMixedState: ObjCBOOL; message 'allowsMixedState';
     function nextState: NSInteger; message 'nextState';
     procedure setNextState; message 'setNextState';
   end;
@@ -406,7 +406,7 @@ var
   NSDeprecated_NSCellCategory = objccategory external name 'NSDeprecated' (NSCell)
     function entryType: NSInteger; message 'entryType'; deprecated 'in Mac OS X 10 and later';
     procedure setEntryType(aType: NSInteger); message 'setEntryType:'; deprecated 'in Mac OS X 10 and later';
-    procedure setFloatingPointFormat_left_right(autoRange: BOOL; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:'; deprecated 'in Mac OS X 10 and later';
+    procedure setFloatingPointFormat_left_right(autoRange: ObjCBOOL; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:'; deprecated 'in Mac OS X 10 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSClipView.inc

@@ -76,8 +76,8 @@
   public
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     function backgroundColor: NSColor; message 'backgroundColor';
-    procedure setDrawsBackground(flag: BOOL); message 'setDrawsBackground:';
-    function drawsBackground: BOOL; message 'drawsBackground';
+    procedure setDrawsBackground(flag: ObjCBOOL); message 'setDrawsBackground:';
+    function drawsBackground: ObjCBOOL; message 'drawsBackground';
     procedure setDocumentView(aView: NSView); message 'setDocumentView:';
     function documentView: id; message 'documentView';
     function documentRect: NSRect; message 'documentRect';
@@ -86,9 +86,9 @@
     function documentVisibleRect: NSRect; message 'documentVisibleRect';
     procedure viewFrameChanged(notification: NSNotification); message 'viewFrameChanged:';
     procedure viewBoundsChanged(notification: NSNotification); message 'viewBoundsChanged:';
-    procedure setCopiesOnScroll(flag: BOOL); message 'setCopiesOnScroll:';
-    function copiesOnScroll: BOOL; message 'copiesOnScroll';
-    function autoscroll(theEvent: NSEvent): BOOL; message 'autoscroll:';
+    procedure setCopiesOnScroll(flag: ObjCBOOL); message 'setCopiesOnScroll:';
+    function copiesOnScroll: ObjCBOOL; message 'copiesOnScroll';
+    function autoscroll(theEvent: NSEvent): ObjCBOOL; message 'autoscroll:';
     function constrainScrollPoint(newOrigin: NSPoint): NSPoint; message 'constrainScrollPoint:';
     procedure scrollToPoint(newOrigin: NSPoint); message 'scrollToPoint:';
   end;

packages/cocoaint/src/appkit/NSCollectionView.inc

@@ -74,8 +74,8 @@ const
     
   public
     function collectionView: NSCollectionView; message 'collectionView';
-    procedure setSelected(flag: BOOL); message 'setSelected:';
-    function isSelected: BOOL; message 'isSelected';
+    procedure setSelected(flag: ObjCBOOL); message 'setSelected:';
+    function isSelected: ObjCBOOL; message 'isSelected';
 
     { Adopted Protocols }
     function copyWithZone(zone_: NSZonePtr): id;
@@ -137,13 +137,13 @@ const
   public
     procedure setDelegate(aDelegate: NSCollectionViewDelegateProtocol); message 'setDelegate:';
     function delegate: NSCollectionViewDelegateProtocol; message 'delegate';
-    function isFirstResponder: BOOL; message 'isFirstResponder';
+    function isFirstResponder: ObjCBOOL; message 'isFirstResponder';
     procedure setContent(content_: NSArray); message 'setContent:';
     function content: NSArray; message 'content';
-    procedure setSelectable(flag: BOOL); message 'setSelectable:';
-    function isSelectable: BOOL; message 'isSelectable';
-    procedure setAllowsMultipleSelection(flag: BOOL); message 'setAllowsMultipleSelection:';
-    function allowsMultipleSelection: BOOL; message 'allowsMultipleSelection';
+    procedure setSelectable(flag: ObjCBOOL); message 'setSelectable:';
+    function isSelectable: ObjCBOOL; message 'isSelectable';
+    procedure setAllowsMultipleSelection(flag: ObjCBOOL); message 'setAllowsMultipleSelection:';
+    function allowsMultipleSelection: ObjCBOOL; message 'allowsMultipleSelection';
     procedure setSelectionIndexes(indexes: NSIndexSet); message 'setSelectionIndexes:';
     function selectionIndexes: NSIndexSet; message 'selectionIndexes';
     function newItemForRepresentedObject(object_: id): NSCollectionViewItem; message 'newItemForRepresentedObject:';
@@ -161,7 +161,7 @@ const
     function backgroundColors: NSArray; message 'backgroundColors';
     function itemAtIndex(index: NSUInteger): NSCollectionViewItem; message 'itemAtIndex:';
     function frameForItemAtIndex(index: NSUInteger): NSRect; message 'frameForItemAtIndex:';
-    procedure setDraggingSourceOperationMask_forLocal(dragOperationMask: NSDragOperation; localDestination: BOOL); message 'setDraggingSourceOperationMask:forLocal:';
+    procedure setDraggingSourceOperationMask_forLocal(dragOperationMask: NSDragOperation; localDestination: ObjCBOOL); message 'setDraggingSourceOperationMask:forLocal:';
     function draggingImageForItemsAtIndexes_withEvent_offset(indexes: NSIndexSet; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'draggingImageForItemsAtIndexes:withEvent:offset:';
   end;
 
@@ -174,12 +174,12 @@ const
 { NSCollectionViewDelegate Protocol }
   NSCollectionViewDelegateProtocol = objcprotocol external name 'NSCollectionViewDelegate'
   optional
-    function collectionView_canDragItemsAtIndexes_withEvent(collectionView: NSCollectionView; indexes: NSIndexSet; event: NSEvent): BOOL; message 'collectionView:canDragItemsAtIndexes:withEvent:';
-    function collectionView_writeItemsAtIndexes_toPasteboard(collectionView: NSCollectionView; indexes: NSIndexSet; pasteboard: NSPasteboard): BOOL; message 'collectionView:writeItemsAtIndexes:toPasteboard:';
+    function collectionView_canDragItemsAtIndexes_withEvent(collectionView: NSCollectionView; indexes: NSIndexSet; event: NSEvent): ObjCBOOL; message 'collectionView:canDragItemsAtIndexes:withEvent:';
+    function collectionView_writeItemsAtIndexes_toPasteboard(collectionView: NSCollectionView; indexes: NSIndexSet; pasteboard: NSPasteboard): ObjCBOOL; message 'collectionView:writeItemsAtIndexes:toPasteboard:';
     function collectionView_namesOfPromisedFilesDroppedAtDestination_forDraggedItemsAtIndexes(collectionView: NSCollectionView; dropURL: NSURL; indexes: NSIndexSet): NSArray; message 'collectionView:namesOfPromisedFilesDroppedAtDestination:forDraggedItemsAtIndexes:';
     function collectionView_draggingImageForItemsAtIndexes_withEvent_offset(collectionView: NSCollectionView; indexes: NSIndexSet; event: NSEvent; dragImageOffset: NSPointPointer): NSImage; message 'collectionView:draggingImageForItemsAtIndexes:withEvent:offset:';
     function collectionView_validateDrop_proposedIndex_dropOperation(collectionView: NSCollectionView; draggingInfo: NSDraggingInfoProtocol; proposedDropIndex: NSIntegerPtr; proposedDropOperation: NSCollectionViewDropOperationPtr): NSDragOperation; message 'collectionView:validateDrop:proposedIndex:dropOperation:';
-    function collectionView_acceptDrop_index_dropOperation(collectionView: NSCollectionView; draggingInfo: NSDraggingInfoProtocol; index: NSInteger; dropOperation: NSCollectionViewDropOperation): BOOL; message 'collectionView:acceptDrop:index:dropOperation:';
+    function collectionView_acceptDrop_index_dropOperation(collectionView: NSCollectionView; draggingInfo: NSDraggingInfoProtocol; index: NSInteger; dropOperation: NSCollectionViewDropOperation): ObjCBOOL; message 'collectionView:acceptDrop:index:dropOperation:';
   end;
 {$endif}
 {$endif}

packages/cocoaint/src/appkit/NSColor.inc

@@ -148,8 +148,8 @@ var
     class function colorWithPatternImage(image: NSImage): NSColor; message 'colorWithPatternImage:';
     function patternImage: NSImage; message 'patternImage';
     procedure drawSwatchInRect(rect: NSRect); message 'drawSwatchInRect:';
-    class procedure setIgnoresAlpha(flag: BOOL); message 'setIgnoresAlpha:';
-    class function ignoresAlpha: BOOL; message 'ignoresAlpha';
+    class procedure setIgnoresAlpha(flag: ObjCBOOL); message 'setIgnoresAlpha:';
+    class function ignoresAlpha: ObjCBOOL; message 'ignoresAlpha';
   end;
 
 { NSQuartzCoreAdditions_NSColorCategory }

packages/cocoaint/src/appkit/NSColorList.inc

@@ -84,8 +84,8 @@ var
     procedure removeColorWithKey(key: NSString); message 'removeColorWithKey:';
     function colorWithKey(key: NSString): NSColor; message 'colorWithKey:';
     function allKeys: NSArray; message 'allKeys';
-    function isEditable: BOOL; message 'isEditable';
-    function writeToFile(path: NSString): BOOL; message 'writeToFile:';
+    function isEditable: ObjCBOOL; message 'isEditable';
+    function writeToFile(path: NSString): ObjCBOOL; message 'writeToFile:';
     procedure removeFile; message 'removeFile';
 
     { Adopted Protocols }

packages/cocoaint/src/appkit/NSColorPanel.inc

@@ -98,27 +98,27 @@ var
     _reserved2: NSSize;
     _reserved3: NSSize;
     _resizeDimple: id;
-    _reserved5: BOOL;
-    _reserved6: BOOL;
-    _handlingOpacityMoveAction: BOOL;
-    _ignoreConstraints: BOOL;
-    _continuous: BOOL;
-    _allowColorSetting: BOOL;
-    _stillInitializing: BOOL;
+    _reserved5: ObjCBOOL;
+    _reserved6: ObjCBOOL;
+    _handlingOpacityMoveAction: ObjCBOOL;
+    _ignoreConstraints: ObjCBOOL;
+    _continuous: ObjCBOOL;
+    _allowColorSetting: ObjCBOOL;
+    _stillInitializing: ObjCBOOL;
     _opacityTextController: id;
     
   public
     class function sharedColorPanel: NSColorPanel; message 'sharedColorPanel';
-    class function sharedColorPanelExists: BOOL; message 'sharedColorPanelExists';
-    class function dragColor_withEvent_fromView(color_: NSColor; theEvent: NSEvent; sourceView: NSView): BOOL; message 'dragColor:withEvent:fromView:';
+    class function sharedColorPanelExists: ObjCBOOL; message 'sharedColorPanelExists';
+    class function dragColor_withEvent_fromView(color_: NSColor; theEvent: NSEvent; sourceView: NSView): ObjCBOOL; message 'dragColor:withEvent:fromView:';
     class procedure setPickerMask(mask: NSUInteger); message 'setPickerMask:';
     class procedure setPickerMode(mode_: NSColorPanelMode); message 'setPickerMode:';
     procedure setAccessoryView(aView: NSView); message 'setAccessoryView:';
     function accessoryView: NSView; message 'accessoryView';
-    procedure setContinuous(flag: BOOL); message 'setContinuous:';
-    function isContinuous: BOOL; message 'isContinuous';
-    procedure setShowsAlpha(flag: BOOL); message 'setShowsAlpha:';
-    function showsAlpha: BOOL; message 'showsAlpha';
+    procedure setContinuous(flag: ObjCBOOL); message 'setContinuous:';
+    function isContinuous: ObjCBOOL; message 'isContinuous';
+    procedure setShowsAlpha(flag: ObjCBOOL); message 'setShowsAlpha:';
+    function showsAlpha: ObjCBOOL; message 'showsAlpha';
     procedure setMode(mode_: NSColorPanelMode); message 'setMode:';
     function mode: NSColorPanelMode; message 'mode';
     procedure setColor(color_: NSColor); message 'setColor:';

packages/cocoaint/src/appkit/NSColorPicking.inc

@@ -53,9 +53,9 @@
   
 { NSColorPickingCustom Protocol }
   NSColorPickingCustomProtocol = objcprotocol external name 'NSColorPickingCustom'
-    function supportsMode(mode: NSColorPanelMode): BOOL; message 'supportsMode:';
+    function supportsMode(mode: NSColorPanelMode): ObjCBOOL; message 'supportsMode:';
     function currentMode: NSColorPanelMode; message 'currentMode';
-    function provideNewView(initialRequest: BOOL): NSView; message 'provideNewView:';
+    function provideNewView(initialRequest: ObjCBOOL): NSView; message 'provideNewView:';
     procedure setColor(newColor: NSColor); message 'setColor:';
   end;
 {$endif}

packages/cocoaint/src/appkit/NSColorWell.inc

@@ -60,11 +60,11 @@
     
   public
     procedure deactivate; message 'deactivate';
-    procedure activate(exclusive: BOOL); message 'activate:';
-    function isActive: BOOL; message 'isActive';
+    procedure activate(exclusive: ObjCBOOL); message 'activate:';
+    function isActive: ObjCBOOL; message 'isActive';
     procedure drawWellInside(insideRect: NSRect); message 'drawWellInside:';
-    function isBordered: BOOL; message 'isBordered';
-    procedure setBordered(flag: BOOL); message 'setBordered:';
+    function isBordered: ObjCBOOL; message 'isBordered';
+    procedure setBordered(flag: ObjCBOOL); message 'setBordered:';
     procedure takeColorFrom(sender: id); message 'takeColorFrom:';
     procedure setColor(color_: NSColor); message 'setColor:';
     function color: NSColor; message 'color';

packages/cocoaint/src/appkit/NSComboBox.inc

@@ -54,28 +54,28 @@ var
     _dataSource: id;
     
   public
-    function hasVerticalScroller: BOOL; message 'hasVerticalScroller';
-    procedure setHasVerticalScroller(flag: BOOL); message 'setHasVerticalScroller:';
+    function hasVerticalScroller: ObjCBOOL; message 'hasVerticalScroller';
+    procedure setHasVerticalScroller(flag: ObjCBOOL); message 'setHasVerticalScroller:';
     function intercellSpacing: NSSize; message 'intercellSpacing';
     procedure setIntercellSpacing(aSize: NSSize); message 'setIntercellSpacing:';
     function itemHeight: CGFloat; message 'itemHeight';
     procedure setItemHeight(itemHeight_: CGFloat); message 'setItemHeight:';
     function numberOfVisibleItems: NSInteger; message 'numberOfVisibleItems';
     procedure setNumberOfVisibleItems(visibleItems: NSInteger); message 'setNumberOfVisibleItems:';
-    procedure setButtonBordered(flag: BOOL); message 'setButtonBordered:';
-    function isButtonBordered: BOOL; message 'isButtonBordered';
+    procedure setButtonBordered(flag: ObjCBOOL); message 'setButtonBordered:';
+    function isButtonBordered: ObjCBOOL; message 'isButtonBordered';
     procedure reloadData; message 'reloadData';
     procedure noteNumberOfItemsChanged; message 'noteNumberOfItemsChanged';
-    procedure setUsesDataSource(flag: BOOL); message 'setUsesDataSource:';
-    function usesDataSource: BOOL; message 'usesDataSource';
+    procedure setUsesDataSource(flag: ObjCBOOL); message 'setUsesDataSource:';
+    function usesDataSource: ObjCBOOL; message 'usesDataSource';
     procedure scrollItemAtIndexToTop(index: NSInteger); message 'scrollItemAtIndexToTop:';
     procedure scrollItemAtIndexToVisible(index: NSInteger); message 'scrollItemAtIndexToVisible:';
     procedure selectItemAtIndex(index: NSInteger); message 'selectItemAtIndex:';
     procedure deselectItemAtIndex(index: NSInteger); message 'deselectItemAtIndex:';
     function indexOfSelectedItem: NSInteger; message 'indexOfSelectedItem';
     function numberOfItems: NSInteger; message 'numberOfItems';
-    function completes: BOOL; message 'completes';
-    procedure setCompletes(completes_: BOOL); message 'setCompletes:';
+    function completes: ObjCBOOL; message 'completes';
+    procedure setCompletes(completes_: ObjCBOOL); message 'setCompletes:';
     function delegate: NSComboBoxDelegateProtocol; message 'delegate';
     procedure setDelegate(anObject: NSComboBoxDelegateProtocol); message 'setDelegate:';
     function dataSource: NSComboBoxDataSourceProtocol; message 'dataSource';

packages/cocoaint/src/appkit/NSComboBoxCell.inc

@@ -70,28 +70,28 @@
     _reserved: Pointer;
     
   public
-    function hasVerticalScroller: BOOL; message 'hasVerticalScroller';
-    procedure setHasVerticalScroller(flag: BOOL); message 'setHasVerticalScroller:';
+    function hasVerticalScroller: ObjCBOOL; message 'hasVerticalScroller';
+    procedure setHasVerticalScroller(flag: ObjCBOOL); message 'setHasVerticalScroller:';
     function intercellSpacing: NSSize; message 'intercellSpacing';
     procedure setIntercellSpacing(aSize: NSSize); message 'setIntercellSpacing:';
     function itemHeight: CGFloat; message 'itemHeight';
     procedure setItemHeight(itemHeight_: CGFloat); message 'setItemHeight:';
     function numberOfVisibleItems: NSInteger; message 'numberOfVisibleItems';
     procedure setNumberOfVisibleItems(visibleItems: NSInteger); message 'setNumberOfVisibleItems:';
-    procedure setButtonBordered(flag: BOOL); message 'setButtonBordered:';
-    function isButtonBordered: BOOL; message 'isButtonBordered';
+    procedure setButtonBordered(flag: ObjCBOOL); message 'setButtonBordered:';
+    function isButtonBordered: ObjCBOOL; message 'isButtonBordered';
     procedure reloadData; message 'reloadData';
     procedure noteNumberOfItemsChanged; message 'noteNumberOfItemsChanged';
-    procedure setUsesDataSource(flag: BOOL); message 'setUsesDataSource:';
-    function usesDataSource: BOOL; message 'usesDataSource';
+    procedure setUsesDataSource(flag: ObjCBOOL); message 'setUsesDataSource:';
+    function usesDataSource: ObjCBOOL; message 'usesDataSource';
     procedure scrollItemAtIndexToTop(index: NSInteger); message 'scrollItemAtIndexToTop:';
     procedure scrollItemAtIndexToVisible(index: NSInteger); message 'scrollItemAtIndexToVisible:';
     procedure selectItemAtIndex(index: NSInteger); message 'selectItemAtIndex:';
     procedure deselectItemAtIndex(index: NSInteger); message 'deselectItemAtIndex:';
     function indexOfSelectedItem: NSInteger; message 'indexOfSelectedItem';
     function numberOfItems: NSInteger; message 'numberOfItems';
-    function completes: BOOL; message 'completes';
-    procedure setCompletes(completes_: BOOL); message 'setCompletes:';
+    function completes: ObjCBOOL; message 'completes';
+    procedure setCompletes(completes_: ObjCBOOL); message 'setCompletes:';
     function completedString(string_: NSString): NSString; message 'completedString:';
     function dataSource: NSComboBoxCellDataSourceProtocol; message 'dataSource';
     procedure setDataSource(aSource: NSComboBoxCellDataSourceProtocol); message 'setDataSource:';

packages/cocoaint/src/appkit/NSControl.inc

@@ -82,13 +82,13 @@ var
     function tag: NSInteger; message 'tag';
     procedure setTag(anInt: NSInteger); message 'setTag:';
     function selectedTag: NSInteger; message 'selectedTag';
-    procedure setIgnoresMultiClick(flag: BOOL); message 'setIgnoresMultiClick:';
-    function ignoresMultiClick: BOOL; message 'ignoresMultiClick';
+    procedure setIgnoresMultiClick(flag: ObjCBOOL); message 'setIgnoresMultiClick:';
+    function ignoresMultiClick: ObjCBOOL; message 'ignoresMultiClick';
     function sendActionOn(mask: NSInteger): NSInteger; message 'sendActionOn:';
-    function isContinuous: BOOL; message 'isContinuous';
-    procedure setContinuous(flag: BOOL); message 'setContinuous:';
-    function isEnabled: BOOL; message 'isEnabled';
-    procedure setEnabled(flag: BOOL); message 'setEnabled:';
+    function isContinuous: ObjCBOOL; message 'isContinuous';
+    procedure setContinuous(flag: ObjCBOOL); message 'setContinuous:';
+    function isEnabled: ObjCBOOL; message 'isEnabled';
+    procedure setEnabled(flag: ObjCBOOL); message 'setEnabled:';
     function alignment: NSTextAlignment; message 'alignment';
     procedure setAlignment(mode: NSTextAlignment); message 'setAlignment:';
     function font: NSFont; message 'font';
@@ -111,14 +111,14 @@ var
     procedure drawCellInside(aCell: NSCell); message 'drawCellInside:';
     procedure drawCell(aCell: NSCell); message 'drawCell:';
     procedure selectCell(aCell: NSCell); message 'selectCell:';
-    function sendAction_to(theAction: SEL; theTarget: id): BOOL; message 'sendAction:to:';
+    function sendAction_to(theAction: SEL; theTarget: id): ObjCBOOL; message 'sendAction:to:';
     procedure takeIntValueFrom(sender: id); message 'takeIntValueFrom:';
     procedure takeFloatValueFrom(sender: id); message 'takeFloatValueFrom:';
     procedure takeDoubleValueFrom(sender: id); message 'takeDoubleValueFrom:';
     procedure takeStringValueFrom(sender: id); message 'takeStringValueFrom:';
     procedure takeObjectValueFrom(sender: id); message 'takeObjectValueFrom:';
     function currentEditor: NSText; message 'currentEditor';
-    function abortEditing: BOOL; message 'abortEditing';
+    function abortEditing: ObjCBOOL; message 'abortEditing';
     procedure validateEditing; message 'validateEditing';
     procedure mouseDown(theEvent: NSEvent); message 'mouseDown:';
     function baseWritingDirection: NSWritingDirection; message 'baseWritingDirection';
@@ -131,8 +131,8 @@ var
 { NSKeyboardUI_NSControlCategory }
   NSKeyboardUI_NSControlCategory = objccategory external name 'NSKeyboardUI' (NSControl)
     procedure performClick(sender: id); message 'performClick:';
-    procedure setRefusesFirstResponder(flag: BOOL); message 'setRefusesFirstResponder:';
-    function refusesFirstResponder: BOOL; message 'refusesFirstResponder';
+    procedure setRefusesFirstResponder(flag: ObjCBOOL); message 'setRefusesFirstResponder:';
+    function refusesFirstResponder: ObjCBOOL; message 'refusesFirstResponder';
   end;
 
 { NSControlSubclassNotificationsCategory }
@@ -150,7 +150,7 @@ var
 
 { NSDeprecated_NSControlCategory }
   NSDeprecated_NSControlCategory = objccategory external name 'NSDeprecated' (NSControl)
-    procedure setFloatingPointFormat_left_right(autoRange: BOOL; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:'; deprecated 'in Mac OS X 10 and later';
+    procedure setFloatingPointFormat_left_right(autoRange: ObjCBOOL; leftDigits: NSUInteger; rightDigits: NSUInteger); message 'setFloatingPointFormat:left:right:'; deprecated 'in Mac OS X 10 and later';
   end;
 
 {$endif}
@@ -162,12 +162,12 @@ var
 { NSControlTextEditingDelegate Protocol }
   NSControlTextEditingDelegateProtocol = objcprotocol external name 'NSControlTextEditingDelegate'
   optional
-    function control_textShouldBeginEditing(control: NSControl; fieldEditor: NSText): BOOL; message 'control:textShouldBeginEditing:';
-    function control_textShouldEndEditing(control: NSControl; fieldEditor: NSText): BOOL; message 'control:textShouldEndEditing:';
-    function control_didFailToFormatString_errorDescription(control: NSControl; string_: NSString; error: NSString): BOOL; message 'control:didFailToFormatString:errorDescription:';
+    function control_textShouldBeginEditing(control: NSControl; fieldEditor: NSText): ObjCBOOL; message 'control:textShouldBeginEditing:';
+    function control_textShouldEndEditing(control: NSControl; fieldEditor: NSText): ObjCBOOL; message 'control:textShouldEndEditing:';
+    function control_didFailToFormatString_errorDescription(control: NSControl; string_: NSString; error: NSString): ObjCBOOL; message 'control:didFailToFormatString:errorDescription:';
     procedure control_didFailToValidatePartialString_errorDescription(control: NSControl; string_: NSString; error: NSString); message 'control:didFailToValidatePartialString:errorDescription:';
-    function control_isValidObject(control: NSControl; obj: id): BOOL; message 'control:isValidObject:';
-    function control_textView_doCommandBySelector(control: NSControl; textView: NSTextView; commandSelector: SEL): BOOL; message 'control:textView:doCommandBySelector:';
+    function control_isValidObject(control: NSControl; obj: id): ObjCBOOL; message 'control:isValidObject:';
+    function control_textView_doCommandBySelector(control: NSControl; textView: NSTextView; commandSelector: SEL): ObjCBOOL; message 'control:textView:doCommandBySelector:';
     function control_textView_completions_forPartialWordRange_indexOfSelectedItem(control: NSControl; textView: NSTextView; words: NSArray; charRange: NSRange; index: NSIntegerPtr): NSArray; message 'control:textView:completions:forPartialWordRange:indexOfSelectedItem:';
   end;
 {$endif}

packages/cocoaint/src/appkit/NSController.inc

@@ -72,9 +72,9 @@
     procedure objectDidBeginEditing(editor: id); message 'objectDidBeginEditing:';
     procedure objectDidEndEditing(editor: id); message 'objectDidEndEditing:';
     procedure discardEditing; message 'discardEditing';
-    function commitEditing: BOOL; message 'commitEditing';
+    function commitEditing: ObjCBOOL; message 'commitEditing';
     procedure commitEditingWithDelegate_didCommitSelector_contextInfo(delegate: id; didCommitSelector: SEL; contextInfo: Pointer); message 'commitEditingWithDelegate:didCommitSelector:contextInfo:';
-    function isEditing: BOOL; message 'isEditing';
+    function isEditing: ObjCBOOL; message 'isEditing';
 
     { Adopted Protocols }
     procedure encodeWithCoder(aCoder: NSCoder);

packages/cocoaint/src/appkit/NSCursor.inc

@@ -84,16 +84,16 @@ const
     function initWithImage_foregroundColorHint_backgroundColorHint_hotSpot(newImage: NSImage; fg: NSColor; bg: NSColor; hotSpot_: NSPoint): id; message 'initWithImage:foregroundColorHint:backgroundColorHint:hotSpot:';
     class procedure hide; message 'hide';
     class procedure unhide; message 'unhide';
-    class procedure setHiddenUntilMouseMoves(flag: BOOL); message 'setHiddenUntilMouseMoves:';
+    class procedure setHiddenUntilMouseMoves(flag: ObjCBOOL); message 'setHiddenUntilMouseMoves:';
     class procedure pop; message 'pop';
     function image: NSImage; message 'image';
     function hotSpot: NSPoint; message 'hotSpot';
     procedure push; message 'push';
     procedure set_; message 'set';
-    procedure setOnMouseExited(flag: BOOL); message 'setOnMouseExited:';
-    procedure setOnMouseEntered(flag: BOOL); message 'setOnMouseEntered:';
-    function isSetOnMouseExited: BOOL; message 'isSetOnMouseExited';
-    function isSetOnMouseEntered: BOOL; message 'isSetOnMouseEntered';
+    procedure setOnMouseExited(flag: ObjCBOOL); message 'setOnMouseExited:';
+    procedure setOnMouseEntered(flag: ObjCBOOL); message 'setOnMouseEntered:';
+    function isSetOnMouseExited: ObjCBOOL; message 'isSetOnMouseExited';
+    function isSetOnMouseEntered: ObjCBOOL; message 'isSetOnMouseEntered';
     procedure mouseEntered(theEvent: NSEvent); message 'mouseEntered:';
     procedure mouseExited(theEvent: NSEvent); message 'mouseExited:';
 

packages/cocoaint/src/appkit/NSDatePicker.inc

@@ -45,12 +45,12 @@
   public
     function datePickerStyle: NSDatePickerStyle; message 'datePickerStyle';
     procedure setDatePickerStyle(newStyle: NSDatePickerStyle); message 'setDatePickerStyle:';
-    function isBezeled: BOOL; message 'isBezeled';
-    procedure setBezeled(flag: BOOL); message 'setBezeled:';
-    function isBordered: BOOL; message 'isBordered';
-    procedure setBordered(flag: BOOL); message 'setBordered:';
-    function drawsBackground: BOOL; message 'drawsBackground';
-    procedure setDrawsBackground(flag: BOOL); message 'setDrawsBackground:';
+    function isBezeled: ObjCBOOL; message 'isBezeled';
+    procedure setBezeled(flag: ObjCBOOL); message 'setBezeled:';
+    function isBordered: ObjCBOOL; message 'isBordered';
+    procedure setBordered(flag: ObjCBOOL); message 'setBordered:';
+    function drawsBackground: ObjCBOOL; message 'drawsBackground';
+    procedure setDrawsBackground(flag: ObjCBOOL); message 'setDrawsBackground:';
     function backgroundColor: NSColor; message 'backgroundColor';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     function textColor: NSColor; message 'textColor';

packages/cocoaint/src/appkit/NSDatePickerCell.inc

@@ -106,8 +106,8 @@ type
   public
     function datePickerStyle: NSDatePickerStyle; message 'datePickerStyle';
     procedure setDatePickerStyle(newStyle: NSDatePickerStyle); message 'setDatePickerStyle:';
-    function drawsBackground: BOOL; message 'drawsBackground';
-    procedure setDrawsBackground(flag: BOOL); message 'setDrawsBackground:';
+    function drawsBackground: ObjCBOOL; message 'drawsBackground';
+    procedure setDrawsBackground(flag: ObjCBOOL); message 'setDrawsBackground:';
     function backgroundColor: NSColor; message 'backgroundColor';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     function textColor: NSColor; message 'textColor';

packages/cocoaint/src/appkit/NSDictionaryController.inc

@@ -89,7 +89,7 @@
     function key: NSString; message 'key';
     procedure setValue(value: id); message 'setValue:';
     function value: id; message 'value';
-    function isExplicitlyIncluded: BOOL; message 'isExplicitlyIncluded';
+    function isExplicitlyIncluded: ObjCBOOL; message 'isExplicitlyIncluded';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSDockTile.inc

@@ -70,8 +70,8 @@ const
     procedure setContentView(view: NSView); message 'setContentView:';
     function contentView: NSView; message 'contentView';
     procedure display; message 'display';
-    procedure setShowsApplicationBadge(flag: BOOL); message 'setShowsApplicationBadge:';
-    function showsApplicationBadge: BOOL; message 'showsApplicationBadge';
+    procedure setShowsApplicationBadge(flag: ObjCBOOL); message 'setShowsApplicationBadge:';
+    function showsApplicationBadge: ObjCBOOL; message 'showsApplicationBadge';
     procedure setBadgeLabel(string_: NSString); message 'setBadgeLabel:';
     function badgeLabel: NSString; message 'badgeLabel';
     function owner: id; message 'owner';

packages/cocoaint/src/appkit/NSDocument.inc

@@ -97,7 +97,7 @@ type
   public
     function init: id; message 'init';
     function initWithType_error(typeName: NSString; outError: NSErrorPointer): id; message 'initWithType:error:';
-    class function canConcurrentlyReadDocumentsOfType(typeName: NSString): BOOL; message 'canConcurrentlyReadDocumentsOfType:';
+    class function canConcurrentlyReadDocumentsOfType(typeName: NSString): ObjCBOOL; message 'canConcurrentlyReadDocumentsOfType:';
     function initWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'initWithContentsOfURL:ofType:error:';
     function initForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'initForURL:withContentsOfURL:ofType:error:';
     procedure setFileType(typeName: NSString); message 'setFileType:';
@@ -107,29 +107,29 @@ type
     procedure setFileModificationDate(modificationDate: NSDate); message 'setFileModificationDate:';
     function fileModificationDate: NSDate; message 'fileModificationDate';
     procedure revertDocumentToSaved(sender: id); message 'revertDocumentToSaved:';
-    function revertToContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): BOOL; message 'revertToContentsOfURL:ofType:error:';
-    function readFromURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): BOOL; message 'readFromURL:ofType:error:';
-    function readFromFileWrapper_ofType_error(fileWrapper: NSFileWrapper; typeName: NSString; outError: NSErrorPointer): BOOL; message 'readFromFileWrapper:ofType:error:';
-    function readFromData_ofType_error(data: NSData; typeName: NSString; outError: NSErrorPointer): BOOL; message 'readFromData:ofType:error:';
-    function writeToURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): BOOL; message 'writeToURL:ofType:error:';
+    function revertToContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): ObjCBOOL; message 'revertToContentsOfURL:ofType:error:';
+    function readFromURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): ObjCBOOL; message 'readFromURL:ofType:error:';
+    function readFromFileWrapper_ofType_error(fileWrapper: NSFileWrapper; typeName: NSString; outError: NSErrorPointer): ObjCBOOL; message 'readFromFileWrapper:ofType:error:';
+    function readFromData_ofType_error(data: NSData; typeName: NSString; outError: NSErrorPointer): ObjCBOOL; message 'readFromData:ofType:error:';
+    function writeToURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): ObjCBOOL; message 'writeToURL:ofType:error:';
     function fileWrapperOfType_error(typeName: NSString; outError: NSErrorPointer): NSFileWrapper; message 'fileWrapperOfType:error:';
     function dataOfType_error(typeName: NSString; outError: NSErrorPointer): NSData; message 'dataOfType:error:';
-    function writeSafelyToURL_ofType_forSaveOperation_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; outError: NSErrorPointer): BOOL; message 'writeSafelyToURL:ofType:forSaveOperation:error:';
-    function writeToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; outError: NSErrorPointer): BOOL; message 'writeToURL:ofType:forSaveOperation:originalContentsURL:error:';
+    function writeSafelyToURL_ofType_forSaveOperation_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; outError: NSErrorPointer): ObjCBOOL; message 'writeSafelyToURL:ofType:forSaveOperation:error:';
+    function writeToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; outError: NSErrorPointer): ObjCBOOL; message 'writeToURL:ofType:forSaveOperation:originalContentsURL:error:';
     function fileAttributesToWriteToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; outError: NSErrorPointer): NSDictionary; message 'fileAttributesToWriteToURL:ofType:forSaveOperation:originalContentsURL:error:';
-    function keepBackupFile: BOOL; message 'keepBackupFile';
+    function keepBackupFile: ObjCBOOL; message 'keepBackupFile';
     procedure saveDocument(sender: id); message 'saveDocument:';
     procedure saveDocumentAs(sender: id); message 'saveDocumentAs:';
     procedure saveDocumentTo(sender: id); message 'saveDocumentTo:';
     procedure saveDocumentWithDelegate_didSaveSelector_contextInfo(delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveDocumentWithDelegate:didSaveSelector:contextInfo:';
     procedure runModalSavePanelForSaveOperation_delegate_didSaveSelector_contextInfo(saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'runModalSavePanelForSaveOperation:delegate:didSaveSelector:contextInfo:';
-    function shouldRunSavePanelWithAccessoryView: BOOL; message 'shouldRunSavePanelWithAccessoryView';
-    function prepareSavePanel(savePanel: NSSavePanel): BOOL; message 'prepareSavePanel:';
-    function fileNameExtensionWasHiddenInLastRunSavePanel: BOOL; message 'fileNameExtensionWasHiddenInLastRunSavePanel';
+    function shouldRunSavePanelWithAccessoryView: ObjCBOOL; message 'shouldRunSavePanelWithAccessoryView';
+    function prepareSavePanel(savePanel: NSSavePanel): ObjCBOOL; message 'prepareSavePanel:';
+    function fileNameExtensionWasHiddenInLastRunSavePanel: ObjCBOOL; message 'fileNameExtensionWasHiddenInLastRunSavePanel';
     function fileTypeFromLastRunSavePanel: NSString; message 'fileTypeFromLastRunSavePanel';
     procedure saveToURL_ofType_forSaveOperation_delegate_didSaveSelector_contextInfo(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveToURL:ofType:forSaveOperation:delegate:didSaveSelector:contextInfo:';
-    function saveToURL_ofType_forSaveOperation_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; outError: NSErrorPointer): BOOL; message 'saveToURL:ofType:forSaveOperation:error:';
-    function hasUnautosavedChanges: BOOL; message 'hasUnautosavedChanges';
+    function saveToURL_ofType_forSaveOperation_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; outError: NSErrorPointer): ObjCBOOL; message 'saveToURL:ofType:forSaveOperation:error:';
+    function hasUnautosavedChanges: ObjCBOOL; message 'hasUnautosavedChanges';
     procedure autosaveDocumentWithDelegate_didAutosaveSelector_contextInfo(delegate: id; didAutosaveSelector: SEL; contextInfo: Pointer); message 'autosaveDocumentWithDelegate:didAutosaveSelector:contextInfo:';
     function autosavingFileType: NSString; message 'autosavingFileType';
     procedure setAutosavedContentsFileURL(absoluteURL: NSURL); message 'setAutosavedContentsFileURL:';
@@ -138,22 +138,22 @@ type
     procedure close; message 'close';
     procedure runPageLayout(sender: id); message 'runPageLayout:';
     procedure runModalPageLayoutWithPrintInfo_delegate_didRunSelector_contextInfo(printInfo_: NSPrintInfo; delegate: id; didRunSelector: SEL; contextInfo: Pointer); message 'runModalPageLayoutWithPrintInfo:delegate:didRunSelector:contextInfo:';
-    function preparePageLayout(pageLayout: NSPageLayout): BOOL; message 'preparePageLayout:';
-    function shouldChangePrintInfo(newPrintInfo: NSPrintInfo): BOOL; message 'shouldChangePrintInfo:';
+    function preparePageLayout(pageLayout: NSPageLayout): ObjCBOOL; message 'preparePageLayout:';
+    function shouldChangePrintInfo(newPrintInfo: NSPrintInfo): ObjCBOOL; message 'shouldChangePrintInfo:';
     procedure setPrintInfo(printInfo_: NSPrintInfo); message 'setPrintInfo:';
     function printInfo: NSPrintInfo; message 'printInfo';
     procedure printDocument(sender: id); message 'printDocument:';
-    procedure printDocumentWithSettings_showPrintPanel_delegate_didPrintSelector_contextInfo(printSettings: NSDictionary; showPrintPanel: BOOL; delegate: id; didPrintSelector: SEL; contextInfo: Pointer); message 'printDocumentWithSettings:showPrintPanel:delegate:didPrintSelector:contextInfo:';
+    procedure printDocumentWithSettings_showPrintPanel_delegate_didPrintSelector_contextInfo(printSettings: NSDictionary; showPrintPanel: ObjCBOOL; delegate: id; didPrintSelector: SEL; contextInfo: Pointer); message 'printDocumentWithSettings:showPrintPanel:delegate:didPrintSelector:contextInfo:';
     function printOperationWithSettings_error(printSettings: NSDictionary; outError: NSErrorPointer): NSPrintOperation; message 'printOperationWithSettings:error:';
     procedure runModalPrintOperation_delegate_didRunSelector_contextInfo(printOperation: NSPrintOperation; delegate: id; didRunSelector: SEL; contextInfo: Pointer); message 'runModalPrintOperation:delegate:didRunSelector:contextInfo:';
-    function isDocumentEdited: BOOL; message 'isDocumentEdited';
+    function isDocumentEdited: ObjCBOOL; message 'isDocumentEdited';
     procedure updateChangeCount(change: NSDocumentChangeType); message 'updateChangeCount:';
     procedure setUndoManager(undoManager_: NSUndoManager); message 'setUndoManager:';
     function undoManager: NSUndoManager; message 'undoManager';
-    procedure setHasUndoManager(hasUndoManager_: BOOL); message 'setHasUndoManager:';
-    function hasUndoManager: BOOL; message 'hasUndoManager';
+    procedure setHasUndoManager(hasUndoManager_: ObjCBOOL); message 'setHasUndoManager:';
+    function hasUndoManager: ObjCBOOL; message 'hasUndoManager';
     procedure presentError_modalForWindow_delegate_didPresentSelector_contextInfo(error: NSError; window: NSWindow; delegate: id; didPresentSelector: SEL; contextInfo: Pointer); message 'presentError:modalForWindow:delegate:didPresentSelector:contextInfo:';
-    function presentError(error: NSError): BOOL; message 'presentError:';
+    function presentError(error: NSError): ObjCBOOL; message 'presentError:';
     function willPresentError(error: NSError): NSError; message 'willPresentError:';
     procedure makeWindowControllers; message 'makeWindowControllers';
     function windowNibName: NSString; message 'windowNibName';
@@ -169,10 +169,10 @@ type
     function windowForSheet: NSWindow; message 'windowForSheet';
     class function readableTypes: NSArray; message 'readableTypes';
     class function writableTypes: NSArray; message 'writableTypes';
-    class function isNativeType(type_: NSString): BOOL; message 'isNativeType:';
+    class function isNativeType(type_: NSString): ObjCBOOL; message 'isNativeType:';
     function writableTypesForSaveOperation(saveOperation: NSSaveOperationType): NSArray; message 'writableTypesForSaveOperation:';
     function fileNameExtensionForType_saveOperation(typeName: NSString; saveOperation: NSSaveOperationType): NSString; message 'fileNameExtensionForType:saveOperation:';
-    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): BOOL; message 'validateUserInterfaceItem:';
+    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): ObjCBOOL; message 'validateUserInterfaceItem:';
 
     { Adopted Protocols }
   end;
@@ -185,20 +185,20 @@ type
     function fileWrapperRepresentationOfType(type_: NSString): NSFileWrapper; message 'fileWrapperRepresentationOfType:'; deprecated 'in Mac OS X 10.4 and later';
     function initWithContentsOfFile_ofType(absolutePath: NSString; typeName: NSString): id; message 'initWithContentsOfFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
     function initWithContentsOfURL_ofType(absoluteURL: NSURL; typeName: NSString): id; message 'initWithContentsOfURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    function loadDataRepresentation_ofType(data: NSData; type_: NSString): BOOL; message 'loadDataRepresentation:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    function loadFileWrapperRepresentation_ofType(wrapper: NSFileWrapper; type_: NSString): BOOL; message 'loadFileWrapperRepresentation:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    procedure printShowingPrintPanel(flag: BOOL); message 'printShowingPrintPanel:'; deprecated 'in Mac OS X 10.4 and later';
-    function readFromFile_ofType(fileName_: NSString; type_: NSString): BOOL; message 'readFromFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    function readFromURL_ofType(url: NSURL; type_: NSString): BOOL; message 'readFromURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    function revertToSavedFromFile_ofType(fileName_: NSString; type_: NSString): BOOL; message 'revertToSavedFromFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    function revertToSavedFromURL_ofType(url: NSURL; type_: NSString): BOOL; message 'revertToSavedFromURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function loadDataRepresentation_ofType(data: NSData; type_: NSString): ObjCBOOL; message 'loadDataRepresentation:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function loadFileWrapperRepresentation_ofType(wrapper: NSFileWrapper; type_: NSString): ObjCBOOL; message 'loadFileWrapperRepresentation:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    procedure printShowingPrintPanel(flag: ObjCBOOL); message 'printShowingPrintPanel:'; deprecated 'in Mac OS X 10.4 and later';
+    function readFromFile_ofType(fileName_: NSString; type_: NSString): ObjCBOOL; message 'readFromFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function readFromURL_ofType(url: NSURL; type_: NSString): ObjCBOOL; message 'readFromURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function revertToSavedFromFile_ofType(fileName_: NSString; type_: NSString): ObjCBOOL; message 'revertToSavedFromFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function revertToSavedFromURL_ofType(url: NSURL; type_: NSString): ObjCBOOL; message 'revertToSavedFromURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
     function runModalPageLayoutWithPrintInfo(printInfo_: NSPrintInfo): NSInteger; message 'runModalPageLayoutWithPrintInfo:'; deprecated 'in Mac OS X 10.4 and later';
     procedure saveToFile_saveOperation_delegate_didSaveSelector_contextInfo(fileName_: NSString; saveOperation: NSSaveOperationType; delegate: id; didSaveSelector: SEL; contextInfo: Pointer); message 'saveToFile:saveOperation:delegate:didSaveSelector:contextInfo:'; deprecated 'in Mac OS X 10.4 and later';
     procedure setFileName(fileName_: NSString); message 'setFileName:'; deprecated 'in Mac OS X 10.4 and later';
-    function writeToFile_ofType(fileName_: NSString; type_: NSString): BOOL; message 'writeToFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    function writeToFile_ofType_originalFile_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; fullOriginalDocumentPath: NSString; saveOperationType: NSSaveOperationType): BOOL; message 'writeToFile:ofType:originalFile:saveOperation:'; deprecated 'in Mac OS X 10.4 and later';
-    function writeToURL_ofType(url: NSURL; type_: NSString): BOOL; message 'writeToURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
-    function writeWithBackupToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): BOOL; message 'writeWithBackupToFile:ofType:saveOperation:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeToFile_ofType(fileName_: NSString; type_: NSString): ObjCBOOL; message 'writeToFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeToFile_ofType_originalFile_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; fullOriginalDocumentPath: NSString; saveOperationType: NSSaveOperationType): ObjCBOOL; message 'writeToFile:ofType:originalFile:saveOperation:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeToURL_ofType(url: NSURL; type_: NSString): ObjCBOOL; message 'writeToURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
+    function writeWithBackupToFile_ofType_saveOperation(fullDocumentPath: NSString; documentTypeName: NSString; saveOperationType: NSSaveOperationType): ObjCBOOL; message 'writeWithBackupToFile:ofType:saveOperation:'; deprecated 'in Mac OS X 10.4 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSDocumentController.inc

@@ -59,23 +59,23 @@
     procedure addDocument(document: NSDocument); message 'addDocument:';
     procedure removeDocument(document: NSDocument); message 'removeDocument:';
     procedure newDocument(sender: id); message 'newDocument:';
-    function openUntitledDocumentAndDisplay_error(displayDocument: BOOL; outError: NSErrorPointer): id; message 'openUntitledDocumentAndDisplay:error:';
+    function openUntitledDocumentAndDisplay_error(displayDocument: ObjCBOOL; outError: NSErrorPointer): id; message 'openUntitledDocumentAndDisplay:error:';
     function makeUntitledDocumentOfType_error(typeName: NSString; outError: NSErrorPointer): id; message 'makeUntitledDocumentOfType:error:';
     procedure openDocument(sender: id); message 'openDocument:';
     function URLsFromRunningOpenPanel: NSArray; message 'URLsFromRunningOpenPanel';
     function runModalOpenPanel_forTypes(openPanel: NSOpenPanel; types: NSArray): NSInteger; message 'runModalOpenPanel:forTypes:';
-    function openDocumentWithContentsOfURL_display_error(absoluteURL: NSURL; displayDocument: BOOL; outError: NSErrorPointer): id; message 'openDocumentWithContentsOfURL:display:error:';
+    function openDocumentWithContentsOfURL_display_error(absoluteURL: NSURL; displayDocument: ObjCBOOL; outError: NSErrorPointer): id; message 'openDocumentWithContentsOfURL:display:error:';
     function makeDocumentWithContentsOfURL_ofType_error(absoluteURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'makeDocumentWithContentsOfURL:ofType:error:';
-    function reopenDocumentForURL_withContentsOfURL_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; outError: NSErrorPointer): BOOL; message 'reopenDocumentForURL:withContentsOfURL:error:';
+    function reopenDocumentForURL_withContentsOfURL_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; outError: NSErrorPointer): ObjCBOOL; message 'reopenDocumentForURL:withContentsOfURL:error:';
     function makeDocumentForURL_withContentsOfURL_ofType_error(absoluteDocumentURL: NSURL; absoluteDocumentContentsURL: NSURL; typeName: NSString; outError: NSErrorPointer): id; message 'makeDocumentForURL:withContentsOfURL:ofType:error:';
     procedure setAutosavingDelay(autosavingDelay_: NSTimeInterval); message 'setAutosavingDelay:';
     function autosavingDelay: NSTimeInterval; message 'autosavingDelay';
     procedure saveAllDocuments(sender: id); message 'saveAllDocuments:';
-    function hasEditedDocuments: BOOL; message 'hasEditedDocuments';
-    procedure reviewUnsavedDocumentsWithAlertTitle_cancellable_delegate_didReviewAllSelector_contextInfo(title: NSString; cancellable: BOOL; delegate: id; didReviewAllSelector: SEL; contextInfo: Pointer); message 'reviewUnsavedDocumentsWithAlertTitle:cancellable:delegate:didReviewAllSelector:contextInfo:';
+    function hasEditedDocuments: ObjCBOOL; message 'hasEditedDocuments';
+    procedure reviewUnsavedDocumentsWithAlertTitle_cancellable_delegate_didReviewAllSelector_contextInfo(title: NSString; cancellable: ObjCBOOL; delegate: id; didReviewAllSelector: SEL; contextInfo: Pointer); message 'reviewUnsavedDocumentsWithAlertTitle:cancellable:delegate:didReviewAllSelector:contextInfo:';
     procedure closeAllDocumentsWithDelegate_didCloseAllSelector_contextInfo(delegate: id; didCloseAllSelector: SEL; contextInfo: Pointer); message 'closeAllDocumentsWithDelegate:didCloseAllSelector:contextInfo:';
     procedure presentError_modalForWindow_delegate_didPresentSelector_contextInfo(error: NSError; window: NSWindow; delegate: id; didPresentSelector: SEL; contextInfo: Pointer); message 'presentError:modalForWindow:delegate:didPresentSelector:contextInfo:';
-    function presentError(error: NSError): BOOL; message 'presentError:';
+    function presentError(error: NSError): ObjCBOOL; message 'presentError:';
     function willPresentError(error: NSError): NSError; message 'willPresentError:';
     function maximumRecentDocumentCount: NSUInteger; message 'maximumRecentDocumentCount';
     procedure clearRecentDocuments(sender: id); message 'clearRecentDocuments:';
@@ -87,7 +87,7 @@
     function documentClassNames: NSArray; message 'documentClassNames';
     function documentClassForType(typeName: NSString): Pobjc_class; message 'documentClassForType:';
     function displayNameForType(typeName: NSString): NSString; message 'displayNameForType:';
-    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): BOOL; message 'validateUserInterfaceItem:';
+    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): ObjCBOOL; message 'validateUserInterfaceItem:';
 
     { Adopted Protocols }
     procedure encodeWithCoder(aCoder: NSCoder);
@@ -103,11 +103,11 @@
     function makeDocumentWithContentsOfFile_ofType(fileName: NSString; type_: NSString): id; message 'makeDocumentWithContentsOfFile:ofType:'; deprecated 'in Mac OS X 10.4 and later';
     function makeDocumentWithContentsOfURL_ofType(url: NSURL; type_: NSString): id; message 'makeDocumentWithContentsOfURL:ofType:'; deprecated 'in Mac OS X 10.4 and later';
     function makeUntitledDocumentOfType(type_: NSString): id; message 'makeUntitledDocumentOfType:'; deprecated 'in Mac OS X 10.4 and later';
-    function openDocumentWithContentsOfFile_display(fileName: NSString; display: BOOL): id; message 'openDocumentWithContentsOfFile:display:'; deprecated 'in Mac OS X 10.4 and later';
-    function openDocumentWithContentsOfURL_display(url: NSURL; display: BOOL): id; message 'openDocumentWithContentsOfURL:display:'; deprecated 'in Mac OS X 10.4 and later';
-    function openUntitledDocumentOfType_display(type_: NSString; display: BOOL): id; message 'openUntitledDocumentOfType:display:'; deprecated 'in Mac OS X 10.4 and later';
-    procedure setShouldCreateUI(flag: BOOL); message 'setShouldCreateUI:'; deprecated 'in Mac OS X 10.4 and later';
-    function shouldCreateUI: BOOL; message 'shouldCreateUI'; deprecated 'in Mac OS X 10.4 and later';
+    function openDocumentWithContentsOfFile_display(fileName: NSString; display: ObjCBOOL): id; message 'openDocumentWithContentsOfFile:display:'; deprecated 'in Mac OS X 10.4 and later';
+    function openDocumentWithContentsOfURL_display(url: NSURL; display: ObjCBOOL): id; message 'openDocumentWithContentsOfURL:display:'; deprecated 'in Mac OS X 10.4 and later';
+    function openUntitledDocumentOfType_display(type_: NSString; display: ObjCBOOL): id; message 'openUntitledDocumentOfType:display:'; deprecated 'in Mac OS X 10.4 and later';
+    procedure setShouldCreateUI(flag: ObjCBOOL); message 'setShouldCreateUI:'; deprecated 'in Mac OS X 10.4 and later';
+    function shouldCreateUI: ObjCBOOL; message 'shouldCreateUI'; deprecated 'in Mac OS X 10.4 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSDragging.inc

@@ -60,26 +60,26 @@ const
     function draggingEntered(sender: NSDraggingInfoProtocol): NSDragOperation; message 'draggingEntered:';
     function draggingUpdated(sender: NSDraggingInfoProtocol): NSDragOperation; message 'draggingUpdated:';
     procedure draggingExited(sender: NSDraggingInfoProtocol); message 'draggingExited:';
-    function prepareForDragOperation(sender: NSDraggingInfoProtocol): BOOL; message 'prepareForDragOperation:';
-    function performDragOperation(sender: NSDraggingInfoProtocol): BOOL; message 'performDragOperation:';
+    function prepareForDragOperation(sender: NSDraggingInfoProtocol): ObjCBOOL; message 'prepareForDragOperation:';
+    function performDragOperation(sender: NSDraggingInfoProtocol): ObjCBOOL; message 'performDragOperation:';
     procedure concludeDragOperation(sender: NSDraggingInfoProtocol); message 'concludeDragOperation:';
     procedure draggingEnded(sender: NSDraggingInfoProtocol); message 'draggingEnded:';
-    function wantsPeriodicDraggingUpdates: BOOL; message 'wantsPeriodicDraggingUpdates';
+    function wantsPeriodicDraggingUpdates: ObjCBOOL; message 'wantsPeriodicDraggingUpdates';
   end;
 
 { NSDraggingSourceCategory }
   NSDraggingSourceCategory = objccategory external (NSObject)
-    function draggingSourceOperationMaskForLocal(flag: BOOL): NSDragOperation; message 'draggingSourceOperationMaskForLocal:';
+    function draggingSourceOperationMaskForLocal(flag: ObjCBOOL): NSDragOperation; message 'draggingSourceOperationMaskForLocal:';
     function namesOfPromisedFilesDroppedAtDestination(dropDestination: NSURL): NSArray; message 'namesOfPromisedFilesDroppedAtDestination:';
     procedure draggedImage_beganAt(image: NSImage; screenPoint: NSPoint); message 'draggedImage:beganAt:';
     procedure draggedImage_endedAt_operation(image: NSImage; screenPoint: NSPoint; operation: NSDragOperation); message 'draggedImage:endedAt:operation:';
     procedure draggedImage_movedTo(image: NSImage; screenPoint: NSPoint); message 'draggedImage:movedTo:';
-    function ignoreModifierKeysWhileDragging: BOOL; message 'ignoreModifierKeysWhileDragging';
+    function ignoreModifierKeysWhileDragging: ObjCBOOL; message 'ignoreModifierKeysWhileDragging';
   end;
 
 { NSDraggingSourceDeprecatedCategory }
   NSDraggingSourceDeprecatedCategory = objccategory external (NSObject)
-    procedure draggedImage_endedAt_deposited(image: NSImage; screenPoint: NSPoint; flag: BOOL); message 'draggedImage:endedAt:deposited:'; deprecated 'in Mac OS X 10.1 and later';
+    procedure draggedImage_endedAt_deposited(image: NSImage; screenPoint: NSPoint; flag: ObjCBOOL); message 'draggedImage:endedAt:deposited:'; deprecated 'in Mac OS X 10.1 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSDrawer.inc

@@ -127,8 +127,8 @@ var
 { NSDrawerDelegate Protocol }
   NSDrawerDelegateProtocol = objcprotocol external name 'NSDrawerDelegate'
   optional
-    function drawerShouldOpen(sender: NSDrawer): BOOL; message 'drawerShouldOpen:';
-    function drawerShouldClose(sender: NSDrawer): BOOL; message 'drawerShouldClose:';
+    function drawerShouldOpen(sender: NSDrawer): ObjCBOOL; message 'drawerShouldOpen:';
+    function drawerShouldClose(sender: NSDrawer): ObjCBOOL; message 'drawerShouldClose:';
     function drawerWillResizeContents_toSize(sender: NSDrawer; contentSize: NSSize): NSSize; message 'drawerWillResizeContents:toSize:';
     procedure drawerWillOpen(notification: NSNotification); message 'drawerWillOpen:';
     procedure drawerDidOpen(notification: NSNotification); message 'drawerDidOpen:';

packages/cocoaint/src/appkit/NSEvent.inc

@@ -257,7 +257,7 @@ type
         keys: NSString;
         unmodKeys: NSString;
         _keyCode: cushort;
-        _isARepeat: BOOL;
+        _isARepeat: ObjCBOOL;
         {$ifdef cpu64}
         eventFlags: cint;
         reserved: array[0..(5)-1] of cint;
@@ -299,8 +299,8 @@ type
         6: (
     _miscGesture: record
         _subtype: cshort;
-        gestureEnded: BOOL;
-        reserved: BOOL;
+        gestureEnded: ObjCBOOL;
+        reserved: ObjCBOOL;
         value: cint;
         percentage: single;
         {$ifdef cpu64}
@@ -350,7 +350,7 @@ type
     function deltaZ: CGFloat; message 'deltaZ';
     function characters: NSString; message 'characters';
     function charactersIgnoringModifiers: NSString; message 'charactersIgnoringModifiers';
-    function isARepeat: BOOL; message 'isARepeat';
+    function isARepeat: ObjCBOOL; message 'isARepeat';
     function keyCode: cushort; message 'keyCode';
     function trackingNumber: NSInteger; message 'trackingNumber';
     function userData: Pointer; message 'userData';
@@ -362,8 +362,8 @@ type
     class function eventWithEventRef(eventRef_: Pointer): NSEvent; message 'eventWithEventRef:';
     function CGEvent: CGEventRef; message 'CGEvent';
     class function eventWithCGEvent(cgEvent_: CGEventRef): NSEvent; message 'eventWithCGEvent:';
-    class procedure setMouseCoalescingEnabled(flag: BOOL); message 'setMouseCoalescingEnabled:';
-    class function isMouseCoalescingEnabled: BOOL; message 'isMouseCoalescingEnabled';
+    class procedure setMouseCoalescingEnabled(flag: ObjCBOOL); message 'setMouseCoalescingEnabled:';
+    class function isMouseCoalescingEnabled: ObjCBOOL; message 'isMouseCoalescingEnabled';
     function magnification: CGFloat; message 'magnification';
     function deviceID: NSUInteger; message 'deviceID';
     function rotation: single; message 'rotation';
@@ -383,12 +383,12 @@ type
     function uniqueID: culonglong; message 'uniqueID';
     function capabilityMask: NSUInteger; message 'capabilityMask';
     function pointingDeviceType: NSPointingDeviceType; message 'pointingDeviceType';
-    function isEnteringProximity: BOOL; message 'isEnteringProximity';
+    function isEnteringProximity: ObjCBOOL; message 'isEnteringProximity';
     function touchesMatchingPhase_inView(phase: NSTouchPhase; view: NSView): NSSet; message 'touchesMatchingPhase:inView:';
     class procedure startPeriodicEventsAfterDelay_withPeriod(delay: NSTimeInterval; period: NSTimeInterval); message 'startPeriodicEventsAfterDelay:withPeriod:';
     class procedure stopPeriodicEvents; message 'stopPeriodicEvents';
     class function mouseEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_clickCount_pressure(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; eNum: NSInteger; cNum: NSInteger; pressure_: single): NSEvent; message 'mouseEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:clickCount:pressure:';
-    class function keyEventWithType_location_modifierFlags_timestamp_windowNumber_context_characters_charactersIgnoringModifiers_isARepeat_keyCode(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; keys: NSString; ukeys: NSString; flag: BOOL; code: cushort): NSEvent; message 'keyEventWithType:location:modifierFlags:timestamp:windowNumber:context:characters:charactersIgnoringModifiers:isARepeat:keyCode:';
+    class function keyEventWithType_location_modifierFlags_timestamp_windowNumber_context_characters_charactersIgnoringModifiers_isARepeat_keyCode(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; keys: NSString; ukeys: NSString; flag: ObjCBOOL; code: cushort): NSEvent; message 'keyEventWithType:location:modifierFlags:timestamp:windowNumber:context:characters:charactersIgnoringModifiers:isARepeat:keyCode:';
     class function enterExitEventWithType_location_modifierFlags_timestamp_windowNumber_context_eventNumber_trackingNumber_userData(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; eNum: NSInteger; tNum: NSInteger; data: Pointer): NSEvent; message 'enterExitEventWithType:location:modifierFlags:timestamp:windowNumber:context:eventNumber:trackingNumber:userData:';
     class function otherEventWithType_location_modifierFlags_timestamp_windowNumber_context_subtype_data1_data2(type__: NSEventType; location: NSPoint; flags: NSUInteger; time: NSTimeInterval; wNum: NSInteger; context_: NSGraphicsContext; subtype_: cshort; d: NSInteger; d1: NSInteger): NSEvent; message 'otherEventWithType:location:modifierFlags:timestamp:windowNumber:context:subtype:data1:data2:';
     class function mouseLocation: NSPoint; message 'mouseLocation';

packages/cocoaint/src/appkit/NSFileWrapper.inc

@@ -72,9 +72,9 @@ type
     function initRegularFileWithContents(contents: NSData): id; message 'initRegularFileWithContents:';
     function initSymbolicLinkWithDestinationURL(url: NSURL): id; message 'initSymbolicLinkWithDestinationURL:';
     function initWithSerializedRepresentation(serializeRepresentation: NSData): id; message 'initWithSerializedRepresentation:';
-    function isDirectory: BOOL; message 'isDirectory';
-    function isRegularFile: BOOL; message 'isRegularFile';
-    function isSymbolicLink: BOOL; message 'isSymbolicLink';
+    function isDirectory: ObjCBOOL; message 'isDirectory';
+    function isRegularFile: ObjCBOOL; message 'isRegularFile';
+    function isSymbolicLink: ObjCBOOL; message 'isSymbolicLink';
     procedure setPreferredFilename(fileName_: NSString); message 'setPreferredFilename:';
     function preferredFilename: NSString; message 'preferredFilename';
     procedure setFilename(fileName_: NSString); message 'setFilename:';
@@ -83,9 +83,9 @@ type
     function fileAttributes: NSDictionary; message 'fileAttributes';
     procedure setIcon(icon_: NSImage); message 'setIcon:';
     function icon: NSImage; message 'icon';
-    function matchesContentsOfURL(url: NSURL): BOOL; message 'matchesContentsOfURL:';
-    function readFromURL_options_error(url: NSURL; options: NSFileWrapperReadingOptions; outError: NSErrorPointer): BOOL; message 'readFromURL:options:error:';
-    function writeToURL_options_originalContentsURL_error(url: NSURL; options: NSFileWrapperWritingOptions; originalContentsURL: NSURL; outError: NSErrorPointer): BOOL; message 'writeToURL:options:originalContentsURL:error:';
+    function matchesContentsOfURL(url: NSURL): ObjCBOOL; message 'matchesContentsOfURL:';
+    function readFromURL_options_error(url: NSURL; options: NSFileWrapperReadingOptions; outError: NSErrorPointer): ObjCBOOL; message 'readFromURL:options:error:';
+    function writeToURL_options_originalContentsURL_error(url: NSURL; options: NSFileWrapperWritingOptions; originalContentsURL: NSURL; outError: NSErrorPointer): ObjCBOOL; message 'writeToURL:options:originalContentsURL:error:';
     function serializedRepresentation: NSData; message 'serializedRepresentation';
     function addFileWrapper(child: NSFileWrapper): NSString; message 'addFileWrapper:';
     function addRegularFileWithContents_preferredFilename(data: NSData; fileName_: NSString): NSString; message 'addRegularFileWithContents:preferredFilename:';
@@ -104,9 +104,9 @@ type
   NSDeprecated_NSFileWrapperCategory = objccategory external name 'NSDeprecated' (NSFileWrapper)
     function initWithPath(path: NSString): id; message 'initWithPath:';
     function initSymbolicLinkWithDestination(path: NSString): id; message 'initSymbolicLinkWithDestination:';
-    function needsToBeUpdatedFromPath(path: NSString): BOOL; message 'needsToBeUpdatedFromPath:';
-    function updateFromPath(path: NSString): BOOL; message 'updateFromPath:';
-    function writeToFile_atomically_updateFilenames(path: NSString; atomicFlag: BOOL; updateFilenamesFlag: BOOL): BOOL; message 'writeToFile:atomically:updateFilenames:';
+    function needsToBeUpdatedFromPath(path: NSString): ObjCBOOL; message 'needsToBeUpdatedFromPath:';
+    function updateFromPath(path: NSString): ObjCBOOL; message 'updateFromPath:';
+    function writeToFile_atomically_updateFilenames(path: NSString; atomicFlag: ObjCBOOL; updateFilenamesFlag: ObjCBOOL): ObjCBOOL; message 'writeToFile:atomically:updateFilenames:';
     function addFileWithPath(path: NSString): NSString; message 'addFileWithPath:';
     function addSymbolicLinkWithDestination_preferredFilename(path: NSString; filename_: NSString): NSString; message 'addSymbolicLinkWithDestination:preferredFilename:';
     function symbolicLinkDestination: NSString; message 'symbolicLinkDestination';

packages/cocoaint/src/appkit/NSFont.inc

@@ -166,7 +166,7 @@ var
     function italicAngle: CGFloat; message 'italicAngle';
     function capHeight: CGFloat; message 'capHeight';
     function xHeight: CGFloat; message 'xHeight';
-    function isFixedPitch: BOOL; message 'isFixedPitch';
+    function isFixedPitch: ObjCBOOL; message 'isFixedPitch';
     function boundingRectForGlyph(aGlyph: NSGlyph): NSRect; message 'boundingRectForGlyph:';
     function advancementForGlyph(ag: NSGlyph): NSSize; message 'advancementForGlyph:';
     procedure getBoundingRects_forGlyphs_count(bounds: NSRectArray; glyphs: NSGlyphPtr; glyphCount: NSUInteger); message 'getBoundingRects:forGlyphs:count:';
@@ -189,20 +189,20 @@ var
   NSFontDeprecatedCategory = objccategory external (NSFont)
     class procedure useFont(fontName_: NSString); message 'useFont:'; deprecated 'in Mac OS X 10.4 and later';
     function widthOfString(string_: NSString): CGFloat; message 'widthOfString:'; deprecated 'in Mac OS X 10.4 and later';
-    function isBaseFont: BOOL; message 'isBaseFont'; deprecated 'in Mac OS X 10.4 and later';
+    function isBaseFont: ObjCBOOL; message 'isBaseFont'; deprecated 'in Mac OS X 10.4 and later';
     function afmDictionary: NSDictionary; message 'afmDictionary'; deprecated 'in Mac OS X 10.4 and later';
-    function glyphIsEncoded(aGlyph: NSGlyph): BOOL; message 'glyphIsEncoded:'; deprecated 'in Mac OS X 10.4 and later';
+    function glyphIsEncoded(aGlyph: NSGlyph): ObjCBOOL; message 'glyphIsEncoded:'; deprecated 'in Mac OS X 10.4 and later';
     function defaultLineHeightForFont: CGFloat; message 'defaultLineHeightForFont'; deprecated 'in Mac OS X 10.4 and later';
     class function preferredFontNames: NSArray; message 'preferredFontNames'; deprecated 'in Mac OS X 10.4 and later';
     class procedure setPreferredFontNames(fontNameArray: NSArray); message 'setPreferredFontNames:'; deprecated 'in Mac OS X 10.4 and later';
     function encodingScheme: NSString; message 'encodingScheme'; deprecated 'in Mac OS X 10.4 and later';
     function glyphPacking: NSMultibyteGlyphPacking; message 'glyphPacking'; deprecated 'in Mac OS X 10.4 and later';
-    function positionOfGlyph_precededByGlyph_isNominal(curGlyph: NSGlyph; prevGlyph: NSGlyph; nominal: pBOOL): NSPoint; message 'positionOfGlyph:precededByGlyph:isNominal:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_precededByGlyph_isNominal(curGlyph: NSGlyph; prevGlyph: NSGlyph; nominal: pObjCBOOL): NSPoint; message 'positionOfGlyph:precededByGlyph:isNominal:'; deprecated 'in Mac OS X 10.4 and later';
     function positionsForCompositeSequence_numberOfGlyphs_pointArray(someGlyphs: NSGlyphPtr; numGlyphs: NSInteger; points: NSPointArray): NSInteger; message 'positionsForCompositeSequence:numberOfGlyphs:pointArray:'; deprecated 'in Mac OS X 10.4 and later';
-    function positionOfGlyph_struckOverGlyph_metricsExist(curGlyph: NSGlyph; prevGlyph: NSGlyph; exist: pBOOL): NSPoint; message 'positionOfGlyph:struckOverGlyph:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
-    function positionOfGlyph_struckOverRect_metricsExist(aGlyph: NSGlyph; aRect: NSRect; exist: pBOOL): NSPoint; message 'positionOfGlyph:struckOverRect:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_struckOverGlyph_metricsExist(curGlyph: NSGlyph; prevGlyph: NSGlyph; exist: pObjCBOOL): NSPoint; message 'positionOfGlyph:struckOverGlyph:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_struckOverRect_metricsExist(aGlyph: NSGlyph; aRect: NSRect; exist: pObjCBOOL): NSPoint; message 'positionOfGlyph:struckOverRect:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
     function positionOfGlyph_forCharacter_struckOverRect(aGlyph: NSGlyph; aChar: unichar; aRect: NSRect): NSPoint; message 'positionOfGlyph:forCharacter:struckOverRect:'; deprecated 'in Mac OS X 10.4 and later';
-    function positionOfGlyph_withRelation_toBaseGlyph_totalAdvancement_metricsExist(thisGlyph: NSGlyph; rel: NSGlyphRelation; baseGlyph: NSGlyph; adv: NSSizePointer; exist: pBOOL): NSPoint; message 'positionOfGlyph:withRelation:toBaseGlyph:totalAdvancement:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
+    function positionOfGlyph_withRelation_toBaseGlyph_totalAdvancement_metricsExist(thisGlyph: NSGlyph; rel: NSGlyphRelation; baseGlyph: NSGlyph; adv: NSSizePointer; exist: pObjCBOOL): NSPoint; message 'positionOfGlyph:withRelation:toBaseGlyph:totalAdvancement:metricsExist:'; deprecated 'in Mac OS X 10.4 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSFontManager.inc

@@ -105,12 +105,12 @@ const
     class procedure setFontPanelFactory(factoryId: Pobjc_class); message 'setFontPanelFactory:';
     class procedure setFontManagerFactory(factoryId: Pobjc_class); message 'setFontManagerFactory:';
     class function sharedFontManager: NSFontManager; message 'sharedFontManager';
-    function isMultiple: BOOL; message 'isMultiple';
+    function isMultiple: ObjCBOOL; message 'isMultiple';
     function selectedFont: NSFont; message 'selectedFont';
-    procedure setSelectedFont_isMultiple(fontObj: NSFont; flag: BOOL); message 'setSelectedFont:isMultiple:';
+    procedure setSelectedFont_isMultiple(fontObj: NSFont; flag: ObjCBOOL); message 'setSelectedFont:isMultiple:';
     procedure setFontMenu(newMenu: NSMenu); message 'setFontMenu:';
-    function fontMenu(create_: BOOL): NSMenu; message 'fontMenu:';
-    function fontPanel(create_: BOOL): NSFontPanel; message 'fontPanel:';
+    function fontMenu(create_: ObjCBOOL): NSMenu; message 'fontMenu:';
+    function fontPanel(create_: ObjCBOOL): NSFontPanel; message 'fontPanel:';
     function fontWithFamily_traits_weight_size(family: NSString; traits: NSFontTraitMask; weight: NSInteger; size: CGFloat): NSFont; message 'fontWithFamily:traits:weight:size:';
     function traitsOfFont(fontObj: NSFont): NSFontTraitMask; message 'traitsOfFont:';
     function weightOfFont(fontObj: NSFont): NSInteger; message 'weightOfFont:';
@@ -123,22 +123,22 @@ const
     function convertFont_toFamily(fontObj: NSFont; family: NSString): NSFont; message 'convertFont:toFamily:';
     function convertFont_toHaveTrait(fontObj: NSFont; trait: NSFontTraitMask): NSFont; message 'convertFont:toHaveTrait:';
     function convertFont_toNotHaveTrait(fontObj: NSFont; trait: NSFontTraitMask): NSFont; message 'convertFont:toNotHaveTrait:';
-    function convertWeight_ofFont(upFlag: BOOL; fontObj: NSFont): NSFont; message 'convertWeight:ofFont:';
-    function isEnabled: BOOL; message 'isEnabled';
-    procedure setEnabled(flag: BOOL); message 'setEnabled:';
+    function convertWeight_ofFont(upFlag: ObjCBOOL; fontObj: NSFont): NSFont; message 'convertWeight:ofFont:';
+    function isEnabled: ObjCBOOL; message 'isEnabled';
+    procedure setEnabled(flag: ObjCBOOL); message 'setEnabled:';
     function action: SEL; message 'action';
     procedure setAction(aSelector: SEL); message 'setAction:';
-    function sendAction: BOOL; message 'sendAction';
+    function sendAction: ObjCBOOL; message 'sendAction';
     procedure setDelegate(anObject: id); message 'setDelegate:';
     function delegate: id; message 'delegate';
     function localizedNameForFamily_face(family: NSString; faceKey: NSString): NSString; message 'localizedNameForFamily:face:';
-    procedure setSelectedAttributes_isMultiple(attributes: NSDictionary; flag: BOOL); message 'setSelectedAttributes:isMultiple:';
+    procedure setSelectedAttributes_isMultiple(attributes: NSDictionary; flag: ObjCBOOL); message 'setSelectedAttributes:isMultiple:';
     function convertAttributes(attributes: NSDictionary): NSDictionary; message 'convertAttributes:';
     function availableFontNamesMatchingFontDescriptor(descriptor: NSFontDescriptor): NSArray; message 'availableFontNamesMatchingFontDescriptor:';
     function collectionNames: NSArray; message 'collectionNames';
     function fontDescriptorsInCollection(collectionNames_: NSString): NSArray; message 'fontDescriptorsInCollection:';
-    function addCollection_options(collectionName: NSString; collectionOptions: NSInteger): BOOL; message 'addCollection:options:';
-    function removeCollection(collectionName: NSString): BOOL; message 'removeCollection:';
+    function addCollection_options(collectionName: NSString; collectionOptions: NSInteger): ObjCBOOL; message 'addCollection:options:';
+    function removeCollection(collectionName: NSString): ObjCBOOL; message 'removeCollection:';
     procedure addFontDescriptors_toCollection(descriptors: NSArray; collectionName: NSString); message 'addFontDescriptors:toCollection:';
     procedure removeFontDescriptor_fromCollection(descriptor: NSFontDescriptor; collection: NSString); message 'removeFontDescriptor:fromCollection:';
     function currentFontAction: NSFontAction; message 'currentFontAction';
@@ -149,7 +149,7 @@ const
 
 { NSFontManagerMenuActionMethodsCategory }
   NSFontManagerMenuActionMethodsCategory = objccategory external (NSFontManager)
-    function fontNamed_hasTraits(fName: NSString; someTraits: NSFontTraitMask): BOOL; message 'fontNamed:hasTraits:';
+    function fontNamed_hasTraits(fName: NSString; someTraits: NSFontTraitMask): ObjCBOOL; message 'fontNamed:hasTraits:';
     function availableFontNamesWithTraits(someTraits: NSFontTraitMask): NSArray; message 'availableFontNamesWithTraits:';
     procedure addFontTrait(sender: id); message 'addFontTrait:';
     procedure removeFontTrait(sender: id); message 'removeFontTrait:';
@@ -161,7 +161,7 @@ const
 
 { NSFontManagerDelegateCategory }
   NSFontManagerDelegateCategory = objccategory external (NSObject)
-    function fontManager_willIncludeFont(sender: id; fontName: NSString): BOOL; message 'fontManager:willIncludeFont:';
+    function fontManager_willIncludeFont(sender: id; fontName: NSString): ObjCBOOL; message 'fontManager:willIncludeFont:';
   end;
 
 { NSFontManagerResponderMethodCategory }

packages/cocoaint/src/appkit/NSFontPanel.inc

@@ -138,14 +138,14 @@ const
     
   public
     class function sharedFontPanel: NSFontPanel; message 'sharedFontPanel';
-    class function sharedFontPanelExists: BOOL; message 'sharedFontPanelExists';
+    class function sharedFontPanelExists: ObjCBOOL; message 'sharedFontPanelExists';
     function accessoryView: NSView; message 'accessoryView';
     procedure setAccessoryView(aView: NSView); message 'setAccessoryView:';
-    procedure setPanelFont_isMultiple(fontObj: NSFont; flag: BOOL); message 'setPanelFont:isMultiple:';
+    procedure setPanelFont_isMultiple(fontObj: NSFont; flag: ObjCBOOL); message 'setPanelFont:isMultiple:';
     function panelConvertFont(fontObj: NSFont): NSFont; message 'panelConvertFont:';
-    function worksWhenModal: BOOL; message 'worksWhenModal';
-    function isEnabled: BOOL; message 'isEnabled';
-    procedure setEnabled(flag: BOOL); message 'setEnabled:';
+    function worksWhenModal: ObjCBOOL; message 'worksWhenModal';
+    function isEnabled: ObjCBOOL; message 'isEnabled';
+    procedure setEnabled(flag: ObjCBOOL); message 'setEnabled:';
     procedure reloadDefaultFontFamilies; message 'reloadDefaultFontFamilies';
   end;
 

packages/cocoaint/src/appkit/NSFormCell.inc

@@ -56,7 +56,7 @@
     procedure setTitleFont(fontObj: NSFont); message 'setTitleFont:';
     function titleAlignment: NSTextAlignment; message 'titleAlignment';
     procedure setTitleAlignment(mode: NSTextAlignment); message 'setTitleAlignment:';
-    function isOpaque: BOOL; message 'isOpaque';
+    function isOpaque: ObjCBOOL; message 'isOpaque';
     procedure setPlaceholderString(string_: NSString); message 'setPlaceholderString:';
     function placeholderString: NSString; message 'placeholderString';
     procedure setPlaceholderAttributedString(string_: NSAttributedString); message 'setPlaceholderAttributedString:';

packages/cocoaint/src/appkit/NSGraphics.inc

@@ -92,8 +92,8 @@ type
 {$define NSGRAPHICS_PAS_F}
 
 { Functions }
-function NSBestDepth(colorSpace: NSString; bps: NSInteger; bpp: NSInteger; planar: BOOL; exactMatch: pBOOL): NSWindowDepth; cdecl; external;
-function NSPlanarFromDepth(depth: NSWindowDepth): BOOL; cdecl; external;
+function NSBestDepth(colorSpace: NSString; bps: NSInteger; bpp: NSInteger; planar: ObjCBOOL; exactMatch: pObjCBOOL): NSWindowDepth; cdecl; external;
+function NSPlanarFromDepth(depth: NSWindowDepth): ObjCBOOL; cdecl; external;
 function NSColorSpaceFromDepth(depth: NSWindowDepth): NSString; cdecl; external;
 function NSBitsPerSampleFromDepth(depth: NSWindowDepth): NSInteger; cdecl; external;
 function NSBitsPerPixelFromDepth(depth: NSWindowDepth): NSInteger; cdecl; external;
@@ -118,7 +118,7 @@ procedure NSDrawWhiteBezel(aRect: NSRect; clipRect: NSRect); cdecl; external;
 procedure NSDrawButton(aRect: NSRect; clipRect: NSRect); cdecl; external;
 procedure NSEraseRect(aRect: NSRect); cdecl; external;
 function NSReadPixel(passedPoint: NSPoint): NSColor; cdecl; external;
-procedure NSDrawBitmap(rect: NSRect; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; bpp: NSInteger; bpr: NSInteger; isPlanar: BOOL; hasAlpha: BOOL; colorSpaceName: NSString; data: PPChar {array of PChar}); cdecl; external;
+procedure NSDrawBitmap(rect: NSRect; width: NSInteger; height: NSInteger; bps: NSInteger; spp: NSInteger; bpp: NSInteger; bpr: NSInteger; isPlanar: ObjCBOOL; hasAlpha: ObjCBOOL; colorSpaceName: NSString; data: PPChar {array of PChar}); cdecl; external;
 procedure NSCopyBits(srcGState: NSInteger; srcRect: NSRect; destPoint: NSPoint); cdecl; external;
 procedure NSHighlightRect(aRect: NSRect); cdecl; external;
 procedure NSBeep; cdecl; external;

packages/cocoaint/src/appkit/NSGraphicsContext.inc

@@ -67,18 +67,18 @@ var
     class function graphicsContextWithAttributes(attributes_: NSDictionary): NSGraphicsContext; message 'graphicsContextWithAttributes:';
     class function graphicsContextWithWindow(window: NSWindow): NSGraphicsContext; message 'graphicsContextWithWindow:';
     class function graphicsContextWithBitmapImageRep(bitmapRep: NSBitmapImageRep): NSGraphicsContext; message 'graphicsContextWithBitmapImageRep:';
-    class function graphicsContextWithGraphicsPort_flipped(graphicsPort_: Pointer; initialFlippedState: BOOL): NSGraphicsContext; message 'graphicsContextWithGraphicsPort:flipped:';
+    class function graphicsContextWithGraphicsPort_flipped(graphicsPort_: Pointer; initialFlippedState: ObjCBOOL): NSGraphicsContext; message 'graphicsContextWithGraphicsPort:flipped:';
     class function currentContext: NSGraphicsContext; message 'currentContext';
     class procedure setCurrentContext(context: NSGraphicsContext); message 'setCurrentContext:';
-    class function currentContextDrawingToScreen: BOOL; message 'currentContextDrawingToScreen';
+    class function currentContextDrawingToScreen: ObjCBOOL; message 'currentContextDrawingToScreen';
     class procedure saveGraphicsState; message 'saveGraphicsState';
     class procedure restoreGraphicsState; message 'restoreGraphicsState';
     class procedure setGraphicsState(gState: NSInteger); message 'setGraphicsState:';
     function attributes: NSDictionary; message 'attributes';
-    function isDrawingToScreen: BOOL; message 'isDrawingToScreen';
+    function isDrawingToScreen: ObjCBOOL; message 'isDrawingToScreen';
     procedure flushGraphics; message 'flushGraphics';
     function graphicsPort: Pointer; message 'graphicsPort';
-    function isFlipped: BOOL; message 'isFlipped';
+    function isFlipped: ObjCBOOL; message 'isFlipped';
   end;
 
 { NSQuartzCoreAdditionsCategory }

packages/cocoaint/src/appkit/NSHelpManager.inc

@@ -57,15 +57,15 @@ var
     
   public
     class function sharedHelpManager: NSHelpManager; message 'sharedHelpManager';
-    class procedure setContextHelpModeActive(active: BOOL); message 'setContextHelpModeActive:';
-    class function isContextHelpModeActive: BOOL; message 'isContextHelpModeActive';
+    class procedure setContextHelpModeActive(active: ObjCBOOL); message 'setContextHelpModeActive:';
+    class function isContextHelpModeActive: ObjCBOOL; message 'isContextHelpModeActive';
     procedure setContextHelp_forObject(attrString: NSAttributedString; object_: id); message 'setContextHelp:forObject:';
     procedure removeContextHelpForObject(object_: id); message 'removeContextHelpForObject:';
     function contextHelpForObject(object_: id): NSAttributedString; message 'contextHelpForObject:';
-    function showContextHelpForObject_locationHint(object_: id; pt: NSPoint): BOOL; message 'showContextHelpForObject:locationHint:';
+    function showContextHelpForObject_locationHint(object_: id; pt: NSPoint): ObjCBOOL; message 'showContextHelpForObject:locationHint:';
     procedure openHelpAnchor_inBook(anchor: NSString; book: NSString); message 'openHelpAnchor:inBook:';
     procedure findString_inBook(query: NSString; book: NSString); message 'findString:inBook:';
-    function registerBooksInBundle(bundle: NSBundle): BOOL; message 'registerBooksInBundle:';
+    function registerBooksInBundle(bundle: NSBundle): ObjCBOOL; message 'registerBooksInBundle:';
   end;
 
 { NSBundleHelpExtensionCategory }

packages/cocoaint/src/appkit/NSImage.inc

@@ -175,20 +175,20 @@ var
     function initWithDataIgnoringOrientation(data: NSData): id; message 'initWithDataIgnoringOrientation:';
     procedure setSize(aSize: NSSize); message 'setSize:';
     function size: NSSize; message 'size';
-    function setName(string_: NSString): BOOL; message 'setName:';
+    function setName(string_: NSString): ObjCBOOL; message 'setName:';
     function name: NSString; message 'name';
     procedure setBackgroundColor(aColor: NSColor); message 'setBackgroundColor:';
     function backgroundColor: NSColor; message 'backgroundColor';
-    procedure setUsesEPSOnResolutionMismatch(flag: BOOL); message 'setUsesEPSOnResolutionMismatch:';
-    function usesEPSOnResolutionMismatch: BOOL; message 'usesEPSOnResolutionMismatch';
-    procedure setPrefersColorMatch(flag: BOOL); message 'setPrefersColorMatch:';
-    function prefersColorMatch: BOOL; message 'prefersColorMatch';
-    procedure setMatchesOnMultipleResolution(flag: BOOL); message 'setMatchesOnMultipleResolution:';
-    function matchesOnMultipleResolution: BOOL; message 'matchesOnMultipleResolution';
+    procedure setUsesEPSOnResolutionMismatch(flag: ObjCBOOL); message 'setUsesEPSOnResolutionMismatch:';
+    function usesEPSOnResolutionMismatch: ObjCBOOL; message 'usesEPSOnResolutionMismatch';
+    procedure setPrefersColorMatch(flag: ObjCBOOL); message 'setPrefersColorMatch:';
+    function prefersColorMatch: ObjCBOOL; message 'prefersColorMatch';
+    procedure setMatchesOnMultipleResolution(flag: ObjCBOOL); message 'setMatchesOnMultipleResolution:';
+    function matchesOnMultipleResolution: ObjCBOOL; message 'matchesOnMultipleResolution';
     procedure drawAtPoint_fromRect_operation_fraction(point: NSPoint; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawAtPoint:fromRect:operation:fraction:';
     procedure drawInRect_fromRect_operation_fraction(rect: NSRect; fromRect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'drawInRect:fromRect:operation:fraction:';
-    procedure drawInRect_fromRect_operation_fraction_respectFlipped_hints(dstSpacePortionRect: NSRect; srcSpacePortionRect: NSRect; op: NSCompositingOperation; requestedAlpha: CGFloat; respectContextIsFlipped: BOOL; hints: NSDictionary); message 'drawInRect:fromRect:operation:fraction:respectFlipped:hints:';
-    function drawRepresentation_inRect(imageRep: NSImageRep; rect: NSRect): BOOL; message 'drawRepresentation:inRect:';
+    procedure drawInRect_fromRect_operation_fraction_respectFlipped_hints(dstSpacePortionRect: NSRect; srcSpacePortionRect: NSRect; op: NSCompositingOperation; requestedAlpha: CGFloat; respectContextIsFlipped: ObjCBOOL; hints: NSDictionary); message 'drawInRect:fromRect:operation:fraction:respectFlipped:hints:';
+    function drawRepresentation_inRect(imageRep: NSImageRep; rect: NSRect): ObjCBOOL; message 'drawRepresentation:inRect:';
     procedure recache; message 'recache';
     function TIFFRepresentation: NSData; message 'TIFFRepresentation';
     function TIFFRepresentationUsingCompression_factor(comp: NSTIFFCompression; aFloat: single): NSData; message 'TIFFRepresentationUsingCompression:factor:';
@@ -196,9 +196,9 @@ var
     procedure addRepresentations(imageReps: NSArray); message 'addRepresentations:';
     procedure addRepresentation(imageRep: NSImageRep); message 'addRepresentation:';
     procedure removeRepresentation(imageRep: NSImageRep); message 'removeRepresentation:';
-    function isValid: BOOL; message 'isValid';
+    function isValid: ObjCBOOL; message 'isValid';
     procedure lockFocus; message 'lockFocus';
-    procedure lockFocusFlipped(flipped: BOOL); message 'lockFocusFlipped:';
+    procedure lockFocusFlipped(flipped: ObjCBOOL); message 'lockFocusFlipped:';
     procedure unlockFocus; message 'unlockFocus';
     function bestRepresentationForDevice(deviceDescription: NSDictionary): NSImageRep; message 'bestRepresentationForDevice:'; deprecated 'in Mac OS X 10.6 and later';
     procedure setDelegate(anObject: NSImageDelegateProtocol); message 'setDelegate:';
@@ -209,20 +209,20 @@ var
     class function imagePasteboardTypes: NSArray; message 'imagePasteboardTypes';
     class function imageTypes: NSArray; message 'imageTypes';
     class function imageUnfilteredTypes: NSArray; message 'imageUnfilteredTypes';
-    class function canInitWithPasteboard(pasteboard: NSPasteboard): BOOL; message 'canInitWithPasteboard:';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): ObjCBOOL; message 'canInitWithPasteboard:';
     procedure cancelIncrementalLoad; message 'cancelIncrementalLoad';
     procedure setCacheMode(mode: NSImageCacheMode); message 'setCacheMode:';
     function cacheMode: NSImageCacheMode; message 'cacheMode';
     function alignmentRect: NSRect; message 'alignmentRect';
     procedure setAlignmentRect(rect: NSRect); message 'setAlignmentRect:';
-    function isTemplate: BOOL; message 'isTemplate';
-    procedure setTemplate(isTemplate_: BOOL); message 'setTemplate:';
+    function isTemplate: ObjCBOOL; message 'isTemplate';
+    procedure setTemplate(isTemplate_: ObjCBOOL); message 'setTemplate:';
     function accessibilityDescription: NSString; message 'accessibilityDescription';
     procedure setAccessibilityDescription(description_: NSString); message 'setAccessibilityDescription:';
     function initWithCGImage_size(cgImage: CGImageRef; size_: NSSize): id; message 'initWithCGImage:size:';
     function CGImageForProposedRect_context_hints(proposedDestRect: NSRectPtr; referenceContext: NSGraphicsContext; hints: NSDictionary): CGImageRef; message 'CGImageForProposedRect:context:hints:';
     function bestRepresentationForRect_context_hints(rect: NSRect; referenceContext: NSGraphicsContext; hints: NSDictionary): NSImageRep; message 'bestRepresentationForRect:context:hints:';
-    function hitTestRect_withImageDestinationRect_context_hints_flipped(testRectDestSpace: NSRect; imageRectDestSpace: NSRect; context: NSGraphicsContext; hints: NSDictionary; flipped: BOOL): BOOL; message 'hitTestRect:withImageDestinationRect:context:hints:flipped:';
+    function hitTestRect_withImageDestinationRect_context_hints_flipped(testRectDestSpace: NSRect; imageRectDestSpace: NSRect; context: NSGraphicsContext; hints: NSDictionary; flipped: ObjCBOOL): ObjCBOOL; message 'hitTestRect:withImageDestinationRect:context:hints:flipped:';
   end;
 
 { NSBundleImageExtensionCategory }
@@ -233,8 +233,8 @@ var
 
 { NSDeprecated_NSImageCategory }
   NSDeprecated_NSImageCategory = objccategory external name 'NSDeprecated' (NSImage)
-    procedure setFlipped(flag: BOOL); message 'setFlipped:';
-    function isFlipped: BOOL; message 'isFlipped';
+    procedure setFlipped(flag: ObjCBOOL); message 'setFlipped:';
+    function isFlipped: ObjCBOOL; message 'isFlipped';
     procedure dissolveToPoint_fraction(point: NSPoint; aFloat: CGFloat); message 'dissolveToPoint:fraction:';
     procedure dissolveToPoint_fromRect_fraction(point: NSPoint; rect: NSRect; aFloat: CGFloat); message 'dissolveToPoint:fromRect:fraction:';
     procedure compositeToPoint_operation(point: NSPoint; op: NSCompositingOperation); message 'compositeToPoint:operation:';
@@ -242,14 +242,14 @@ var
     procedure compositeToPoint_operation_fraction(point: NSPoint; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:operation:fraction:';
     procedure compositeToPoint_fromRect_operation_fraction(point: NSPoint; rect: NSRect; op: NSCompositingOperation; delta: CGFloat); message 'compositeToPoint:fromRect:operation:fraction:';
     procedure lockFocusOnRepresentation(imageRepresentation: NSImageRep); message 'lockFocusOnRepresentation:';
-    procedure setScalesWhenResized(flag: BOOL); message 'setScalesWhenResized:';
-    function scalesWhenResized: BOOL; message 'scalesWhenResized';
-    procedure setDataRetained(flag: BOOL); message 'setDataRetained:';
-    function isDataRetained: BOOL; message 'isDataRetained';
-    procedure setCachedSeparately(flag: BOOL); message 'setCachedSeparately:';
-    function isCachedSeparately: BOOL; message 'isCachedSeparately';
-    procedure setCacheDepthMatchesImageDepth(flag: BOOL); message 'setCacheDepthMatchesImageDepth:';
-    function cacheDepthMatchesImageDepth: BOOL; message 'cacheDepthMatchesImageDepth';
+    procedure setScalesWhenResized(flag: ObjCBOOL); message 'setScalesWhenResized:';
+    function scalesWhenResized: ObjCBOOL; message 'scalesWhenResized';
+    procedure setDataRetained(flag: ObjCBOOL); message 'setDataRetained:';
+    function isDataRetained: ObjCBOOL; message 'isDataRetained';
+    procedure setCachedSeparately(flag: ObjCBOOL); message 'setCachedSeparately:';
+    function isCachedSeparately: ObjCBOOL; message 'isCachedSeparately';
+    procedure setCacheDepthMatchesImageDepth(flag: ObjCBOOL); message 'setCacheDepthMatchesImageDepth:';
+    function cacheDepthMatchesImageDepth: ObjCBOOL; message 'cacheDepthMatchesImageDepth';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSImageRep.inc

@@ -73,16 +73,16 @@ var
     _pixelsHigh: cint;
     
   public
-    function draw: BOOL; message 'draw';
-    function drawAtPoint(point: NSPoint): BOOL; message 'drawAtPoint:';
-    function drawInRect(rect: NSRect): BOOL; message 'drawInRect:';
-    function drawInRect_fromRect_operation_fraction_respectFlipped_hints(dstSpacePortionRect: NSRect; srcSpacePortionRect: NSRect; op: NSCompositingOperation; requestedAlpha: CGFloat; respectContextIsFlipped: BOOL; hints: NSDictionary): BOOL; message 'drawInRect:fromRect:operation:fraction:respectFlipped:hints:';
+    function draw: ObjCBOOL; message 'draw';
+    function drawAtPoint(point: NSPoint): ObjCBOOL; message 'drawAtPoint:';
+    function drawInRect(rect: NSRect): ObjCBOOL; message 'drawInRect:';
+    function drawInRect_fromRect_operation_fraction_respectFlipped_hints(dstSpacePortionRect: NSRect; srcSpacePortionRect: NSRect; op: NSCompositingOperation; requestedAlpha: CGFloat; respectContextIsFlipped: ObjCBOOL; hints: NSDictionary): ObjCBOOL; message 'drawInRect:fromRect:operation:fraction:respectFlipped:hints:';
     procedure setSize(aSize: NSSize); message 'setSize:';
     function size: NSSize; message 'size';
-    procedure setAlpha(flag: BOOL); message 'setAlpha:';
-    function hasAlpha: BOOL; message 'hasAlpha';
-    procedure setOpaque(flag: BOOL); message 'setOpaque:';
-    function isOpaque: BOOL; message 'isOpaque';
+    procedure setAlpha(flag: ObjCBOOL); message 'setAlpha:';
+    function hasAlpha: ObjCBOOL; message 'hasAlpha';
+    procedure setOpaque(flag: ObjCBOOL); message 'setOpaque:';
+    function isOpaque: ObjCBOOL; message 'isOpaque';
     procedure setColorSpaceName(string_: NSString); message 'setColorSpaceName:';
     function colorSpaceName: NSString; message 'colorSpaceName';
     procedure setBitsPerSample(anInt: NSInteger); message 'setBitsPerSample:';
@@ -98,14 +98,14 @@ var
     class function imageRepClassForPasteboardType(type_: NSString): Pobjc_class; message 'imageRepClassForPasteboardType:';
     class function imageRepClassForType(type_: NSString): Pobjc_class; message 'imageRepClassForType:';
     class function imageRepClassForData(data: NSData): Pobjc_class; message 'imageRepClassForData:';
-    class function canInitWithData(data: NSData): BOOL; message 'canInitWithData:';
+    class function canInitWithData(data: NSData): ObjCBOOL; message 'canInitWithData:';
     class function imageUnfilteredFileTypes: NSArray; message 'imageUnfilteredFileTypes';
     class function imageUnfilteredPasteboardTypes: NSArray; message 'imageUnfilteredPasteboardTypes';
     class function imageFileTypes: NSArray; message 'imageFileTypes';
     class function imagePasteboardTypes: NSArray; message 'imagePasteboardTypes';
     class function imageUnfilteredTypes: NSArray; message 'imageUnfilteredTypes';
     class function imageTypes: NSArray; message 'imageTypes';
-    class function canInitWithPasteboard(pasteboard: NSPasteboard): BOOL; message 'canInitWithPasteboard:';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): ObjCBOOL; message 'canInitWithPasteboard:';
     class function imageRepsWithContentsOfFile(filename: NSString): NSArray; message 'imageRepsWithContentsOfFile:';
     class function imageRepWithContentsOfFile(filename: NSString): id; message 'imageRepWithContentsOfFile:';
     class function imageRepsWithContentsOfURL(url: NSURL): NSArray; message 'imageRepsWithContentsOfURL:';

packages/cocoaint/src/appkit/NSImageView.inc

@@ -68,12 +68,12 @@
     procedure setImageScaling(newScaling: NSImageScaling); message 'setImageScaling:';
     function imageFrameStyle: NSImageFrameStyle; message 'imageFrameStyle';
     procedure setImageFrameStyle(newStyle: NSImageFrameStyle); message 'setImageFrameStyle:';
-    procedure setEditable(yn: BOOL); message 'setEditable:';
-    function isEditable: BOOL; message 'isEditable';
-    procedure setAnimates(flag: BOOL); message 'setAnimates:';
-    function animates: BOOL; message 'animates';
-    function allowsCutCopyPaste: BOOL; message 'allowsCutCopyPaste';
-    procedure setAllowsCutCopyPaste(allow: BOOL); message 'setAllowsCutCopyPaste:';
+    procedure setEditable(yn: ObjCBOOL); message 'setEditable:';
+    function isEditable: ObjCBOOL; message 'isEditable';
+    procedure setAnimates(flag: ObjCBOOL); message 'setAnimates:';
+    function animates: ObjCBOOL; message 'animates';
+    function allowsCutCopyPaste: ObjCBOOL; message 'allowsCutCopyPaste';
+    procedure setAllowsCutCopyPaste(allow: ObjCBOOL); message 'setAllowsCutCopyPaste:';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSInputManager.inc

@@ -67,20 +67,20 @@
     function localizedInputManagerName: NSString; message 'localizedInputManagerName'; deprecated 'in Mac OS X 10.6 and later';
     procedure markedTextAbandoned(cli: id); message 'markedTextAbandoned:';
     procedure markedTextSelectionChanged_client(newSel: NSRange; cli: id); message 'markedTextSelectionChanged:client:';
-    function wantsToInterpretAllKeystrokes: BOOL; message 'wantsToInterpretAllKeystrokes'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToInterpretAllKeystrokes: ObjCBOOL; message 'wantsToInterpretAllKeystrokes'; deprecated 'in Mac OS X 10.6 and later';
     function language: NSString; message 'language'; deprecated 'in Mac OS X 10.6 and later';
     function image: NSImage; message 'image'; deprecated 'in Mac OS X 10.6 and later';
     function server: NSInputServer; message 'server'; deprecated 'in Mac OS X 10.6 and later';
-    function wantsToHandleMouseEvents: BOOL; message 'wantsToHandleMouseEvents';
-    function handleMouseEvent(theMouseEvent: NSEvent): BOOL; message 'handleMouseEvent:';
-    function wantsToDelayTextChangeNotifications: BOOL; message 'wantsToDelayTextChangeNotifications'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToHandleMouseEvents: ObjCBOOL; message 'wantsToHandleMouseEvents';
+    function handleMouseEvent(theMouseEvent: NSEvent): ObjCBOOL; message 'handleMouseEvent:';
+    function wantsToDelayTextChangeNotifications: ObjCBOOL; message 'wantsToDelayTextChangeNotifications'; deprecated 'in Mac OS X 10.6 and later';
 
     { Adopted Protocols }
     procedure insertText(aString: id);
     procedure doCommandBySelector(aSelector: SEL);
     procedure setMarkedText_selectedRange(aString: id; selRange: NSRange);
     procedure unmarkText;
-    function hasMarkedText: BOOL;
+    function hasMarkedText: ObjCBOOL;
     function conversationIdentifier: NSInteger;
     function attributedSubstringFromRange(theRange: NSRange): NSAttributedString;
     function markedRange: NSRange;
@@ -102,7 +102,7 @@
     procedure doCommandBySelector(aSelector: SEL); message 'doCommandBySelector:';
     procedure setMarkedText_selectedRange(aString: id; selRange: NSRange); message 'setMarkedText:selectedRange:';
     procedure unmarkText; message 'unmarkText';
-    function hasMarkedText: BOOL; message 'hasMarkedText';
+    function hasMarkedText: ObjCBOOL; message 'hasMarkedText';
     function conversationIdentifier: NSInteger; message 'conversationIdentifier';
     function attributedSubstringFromRange(theRange: NSRange): NSAttributedString; message 'attributedSubstringFromRange:';
     function markedRange: NSRange; message 'markedRange';

packages/cocoaint/src/appkit/NSInputServer.inc

@@ -55,18 +55,18 @@
     procedure markedTextAbandoned(sender: id);
     procedure markedTextSelectionChanged_client(newSel: NSRange; sender: id);
     procedure terminate(sender: id);
-    function canBeDisabled: BOOL;
-    function wantsToInterpretAllKeystrokes: BOOL;
-    function wantsToHandleMouseEvents: BOOL;
-    function wantsToDelayTextChangeNotifications: BOOL;
+    function canBeDisabled: ObjCBOOL;
+    function wantsToInterpretAllKeystrokes: ObjCBOOL;
+    function wantsToHandleMouseEvents: ObjCBOOL;
+    function wantsToDelayTextChangeNotifications: ObjCBOOL;
     procedure inputClientBecomeActive(sender: id);
     procedure inputClientResignActive(sender: id);
     procedure inputClientEnabled(sender: id);
     procedure inputClientDisabled(sender: id);
     procedure activeConversationWillChange_fromOldConversation(sender: id; oldConversation: NSInteger);
     procedure activeConversationChanged_toNewConversation(sender: id; newConversation: NSInteger);
-    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): BOOL;
-    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): BOOL;
+    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): ObjCBOOL;
+    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): ObjCBOOL;
     procedure mouseUpOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id);
   end;
 
@@ -83,10 +83,10 @@
     procedure markedTextAbandoned(sender: id); message 'markedTextAbandoned:'; deprecated 'in Mac OS X 10.6 and later';
     procedure markedTextSelectionChanged_client(newSel: NSRange; sender: id); message 'markedTextSelectionChanged:client:'; deprecated 'in Mac OS X 10.6 and later';
     procedure terminate(sender: id); message 'terminate:'; deprecated 'in Mac OS X 10.6 and later';
-    function canBeDisabled: BOOL; message 'canBeDisabled'; deprecated 'in Mac OS X 10.6 and later';
-    function wantsToInterpretAllKeystrokes: BOOL; message 'wantsToInterpretAllKeystrokes'; deprecated 'in Mac OS X 10.6 and later';
-    function wantsToHandleMouseEvents: BOOL; message 'wantsToHandleMouseEvents'; deprecated 'in Mac OS X 10.6 and later';
-    function wantsToDelayTextChangeNotifications: BOOL; message 'wantsToDelayTextChangeNotifications'; deprecated 'in Mac OS X 10.6 and later';
+    function canBeDisabled: ObjCBOOL; message 'canBeDisabled'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToInterpretAllKeystrokes: ObjCBOOL; message 'wantsToInterpretAllKeystrokes'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToHandleMouseEvents: ObjCBOOL; message 'wantsToHandleMouseEvents'; deprecated 'in Mac OS X 10.6 and later';
+    function wantsToDelayTextChangeNotifications: ObjCBOOL; message 'wantsToDelayTextChangeNotifications'; deprecated 'in Mac OS X 10.6 and later';
     procedure inputClientBecomeActive(sender: id); message 'inputClientBecomeActive:'; deprecated 'in Mac OS X 10.6 and later';
     procedure inputClientResignActive(sender: id); message 'inputClientResignActive:'; deprecated 'in Mac OS X 10.6 and later';
     procedure inputClientEnabled(sender: id); message 'inputClientEnabled:'; deprecated 'in Mac OS X 10.6 and later';
@@ -97,8 +97,8 @@
   
 { NSInputServerMouseTracker Protocol }
   NSInputServerMouseTrackerProtocol = objcprotocol external name 'NSInputServerMouseTracker'
-    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): BOOL; message 'mouseDownOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
-    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): BOOL; message 'mouseDraggedOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
+    function mouseDownOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): ObjCBOOL; message 'mouseDownOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
+    function mouseDraggedOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id): ObjCBOOL; message 'mouseDraggedOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
     procedure mouseUpOnCharacterIndex_atCoordinate_withModifier_client(theIndex: NSUInteger; thePoint: NSPoint; theFlags: NSUInteger; sender: id); message 'mouseUpOnCharacterIndex:atCoordinate:withModifier:client:'; deprecated 'in Mac OS X 10.6 and later';
   end;
 {$endif}

packages/cocoaint/src/appkit/NSKeyValueBinding.inc

@@ -19,7 +19,7 @@
 {$define NSKEYVALUEBINDING_PAS_F}
 
 { Functions }
-function NSIsControllerMarker(object_: id): BOOL; cdecl; external;
+function NSIsControllerMarker(object_: id): ObjCBOOL; cdecl; external;
 
 {$endif}
 {$endif}
@@ -181,7 +181,7 @@ var
 { NSEditorCategory }
   NSEditorCategory = objccategory external (NSObject)
     procedure discardEditing; message 'discardEditing';
-    function commitEditing: BOOL; message 'commitEditing';
+    function commitEditing: ObjCBOOL; message 'commitEditing';
     procedure commitEditingWithDelegate_didCommitSelector_contextInfo(delegate: id; didCommitSelector: SEL; contextInfo: Pointer); message 'commitEditingWithDelegate:didCommitSelector:contextInfo:';
   end;
 

packages/cocoaint/src/appkit/NSLayoutManager.inc

@@ -171,14 +171,14 @@ type
     procedure removeTextContainerAtIndex(index: NSUInteger); message 'removeTextContainerAtIndex:';
     procedure textContainerChangedGeometry(container: NSTextContainer); message 'textContainerChangedGeometry:';
     procedure textContainerChangedTextView(container: NSTextContainer); message 'textContainerChangedTextView:';
-    procedure setBackgroundLayoutEnabled(flag: BOOL); message 'setBackgroundLayoutEnabled:';
-    function backgroundLayoutEnabled: BOOL; message 'backgroundLayoutEnabled';
-    procedure setUsesScreenFonts(flag: BOOL); message 'setUsesScreenFonts:';
-    function usesScreenFonts: BOOL; message 'usesScreenFonts';
-    procedure setShowsInvisibleCharacters(flag: BOOL); message 'setShowsInvisibleCharacters:';
-    function showsInvisibleCharacters: BOOL; message 'showsInvisibleCharacters';
-    procedure setShowsControlCharacters(flag: BOOL); message 'setShowsControlCharacters:';
-    function showsControlCharacters: BOOL; message 'showsControlCharacters';
+    procedure setBackgroundLayoutEnabled(flag: ObjCBOOL); message 'setBackgroundLayoutEnabled:';
+    function backgroundLayoutEnabled: ObjCBOOL; message 'backgroundLayoutEnabled';
+    procedure setUsesScreenFonts(flag: ObjCBOOL); message 'setUsesScreenFonts:';
+    function usesScreenFonts: ObjCBOOL; message 'usesScreenFonts';
+    procedure setShowsInvisibleCharacters(flag: ObjCBOOL); message 'setShowsInvisibleCharacters:';
+    function showsInvisibleCharacters: ObjCBOOL; message 'showsInvisibleCharacters';
+    procedure setShowsControlCharacters(flag: ObjCBOOL); message 'setShowsControlCharacters:';
+    function showsControlCharacters: ObjCBOOL; message 'showsControlCharacters';
     procedure setHyphenationFactor(factor: single); message 'setHyphenationFactor:';
     function hyphenationFactor: single; message 'hyphenationFactor';
     procedure setDefaultAttachmentScaling(scaling: NSImageScaling); message 'setDefaultAttachmentScaling:';
@@ -186,12 +186,12 @@ type
     procedure setTypesetterBehavior(theBehavior: NSTypesetterBehavior); message 'setTypesetterBehavior:';
     function typesetterBehavior: NSTypesetterBehavior; message 'typesetterBehavior';
     function layoutOptions: NSUInteger; message 'layoutOptions';
-    procedure setAllowsNonContiguousLayout(flag: BOOL); message 'setAllowsNonContiguousLayout:';
-    function allowsNonContiguousLayout: BOOL; message 'allowsNonContiguousLayout';
-    function hasNonContiguousLayout: BOOL; message 'hasNonContiguousLayout';
+    procedure setAllowsNonContiguousLayout(flag: ObjCBOOL); message 'setAllowsNonContiguousLayout:';
+    function allowsNonContiguousLayout: ObjCBOOL; message 'allowsNonContiguousLayout';
+    function hasNonContiguousLayout: ObjCBOOL; message 'hasNonContiguousLayout';
     procedure invalidateGlyphsForCharacterRange_changeInLength_actualCharacterRange(charRange: NSRange; delta: NSInteger; actualCharRange: NSRangePointer); message 'invalidateGlyphsForCharacterRange:changeInLength:actualCharacterRange:';
     procedure invalidateLayoutForCharacterRange_actualCharacterRange(charRange: NSRange; actualCharRange: NSRangePointer); message 'invalidateLayoutForCharacterRange:actualCharacterRange:';
-    procedure invalidateLayoutForCharacterRange_isSoft_actualCharacterRange(charRange: NSRange; flag: BOOL; actualCharRange: NSRangePointer); message 'invalidateLayoutForCharacterRange:isSoft:actualCharacterRange:';
+    procedure invalidateLayoutForCharacterRange_isSoft_actualCharacterRange(charRange: NSRange; flag: ObjCBOOL; actualCharRange: NSRangePointer); message 'invalidateLayoutForCharacterRange:isSoft:actualCharacterRange:';
     procedure invalidateDisplayForCharacterRange(charRange: NSRange); message 'invalidateDisplayForCharacterRange:';
     procedure invalidateDisplayForGlyphRange(glyphRange: NSRange); message 'invalidateDisplayForGlyphRange:';
     procedure textStorage_edited_range_changeInLength_invalidatedRange(str: NSTextStorage; editedMask: NSUInteger; newCharRange: NSRange; delta: NSInteger; invalidatedCharRange: NSRange); message 'textStorage:edited:range:changeInLength:invalidatedRange:';
@@ -209,22 +209,22 @@ type
     procedure setIntAttribute_value_forGlyphAtIndex(attributeTag: NSInteger; val: NSInteger; glyphIndex: NSUInteger); message 'setIntAttribute:value:forGlyphAtIndex:';
     procedure invalidateGlyphsOnLayoutInvalidationForGlyphRange(glyphRange: NSRange); message 'invalidateGlyphsOnLayoutInvalidationForGlyphRange:';
     function numberOfGlyphs: NSUInteger; message 'numberOfGlyphs';
-    function glyphAtIndex_isValidIndex(glyphIndex: NSUInteger; isValidIndex: pBOOL): NSGlyph; message 'glyphAtIndex:isValidIndex:';
+    function glyphAtIndex_isValidIndex(glyphIndex: NSUInteger; isValidIndex: pObjCBOOL): NSGlyph; message 'glyphAtIndex:isValidIndex:';
     function glyphAtIndex(glyphIndex: NSUInteger): NSGlyph; message 'glyphAtIndex:';
-    function isValidGlyphIndex(glyphIndex: NSUInteger): BOOL; message 'isValidGlyphIndex:';
+    function isValidGlyphIndex(glyphIndex: NSUInteger): ObjCBOOL; message 'isValidGlyphIndex:';
     function characterIndexForGlyphAtIndex(glyphIndex: NSUInteger): NSUInteger; message 'characterIndexForGlyphAtIndex:';
     function glyphIndexForCharacterAtIndex(charIndex: NSUInteger): NSUInteger; message 'glyphIndexForCharacterAtIndex:';
     function intAttribute_forGlyphAtIndex(attributeTag: NSInteger; glyphIndex: NSUInteger): NSInteger; message 'intAttribute:forGlyphAtIndex:';
-    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pBOOL): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
-    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits_bidiLevels(glyphRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pBOOL; bidiLevelBuffer: PByte): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:bidiLevels:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits(glyphRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pObjCBOOL): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:';
+    function getGlyphsInRange_glyphs_characterIndexes_glyphInscriptions_elasticBits_bidiLevels(glyphRange: NSRange; glyphBuffer: NSGlyphPtr; charIndexBuffer: NSUIntegerPtr; inscribeBuffer: NSGlyphInscriptionPtr; elasticBuffer: pObjCBOOL; bidiLevelBuffer: PByte): NSUInteger; message 'getGlyphsInRange:glyphs:characterIndexes:glyphInscriptions:elasticBits:bidiLevels:';
     function getGlyphs_range(glyphArray: NSGlyphPtr; glyphRange: NSRange): NSUInteger; message 'getGlyphs:range:';
     procedure setTextContainer_forGlyphRange(container: NSTextContainer; glyphRange: NSRange); message 'setTextContainer:forGlyphRange:';
     procedure setLineFragmentRect_forGlyphRange_usedRect(fragmentRect: NSRect; glyphRange: NSRange; usedRect: NSRect); message 'setLineFragmentRect:forGlyphRange:usedRect:';
     procedure setExtraLineFragmentRect_usedRect_textContainer(fragmentRect: NSRect; usedRect: NSRect; container: NSTextContainer); message 'setExtraLineFragmentRect:usedRect:textContainer:';
     procedure setLocation_forStartOfGlyphRange(location: NSPoint; glyphRange: NSRange); message 'setLocation:forStartOfGlyphRange:';
     procedure setLocations_startingGlyphIndexes_count_forGlyphRange(locations: NSPointArray; glyphIndexes: NSUIntegerPtr; count: NSUInteger; glyphRange: NSRange); message 'setLocations:startingGlyphIndexes:count:forGlyphRange:';
-    procedure setNotShownAttribute_forGlyphAtIndex(flag: BOOL; glyphIndex: NSUInteger); message 'setNotShownAttribute:forGlyphAtIndex:';
-    procedure setDrawsOutsideLineFragment_forGlyphAtIndex(flag: BOOL; glyphIndex: NSUInteger); message 'setDrawsOutsideLineFragment:forGlyphAtIndex:';
+    procedure setNotShownAttribute_forGlyphAtIndex(flag: ObjCBOOL; glyphIndex: NSUInteger); message 'setNotShownAttribute:forGlyphAtIndex:';
+    procedure setDrawsOutsideLineFragment_forGlyphAtIndex(flag: ObjCBOOL; glyphIndex: NSUInteger); message 'setDrawsOutsideLineFragment:forGlyphAtIndex:';
     procedure setAttachmentSize_forGlyphRange(attachmentSize: NSSize; glyphRange: NSRange); message 'setAttachmentSize:forGlyphRange:';
     procedure getFirstUnlaidCharacterIndex_glyphIndex(charIndex: NSUIntegerPtr; glyphIndex: NSUIntegerPtr); message 'getFirstUnlaidCharacterIndex:glyphIndex:';
     function firstUnlaidCharacterIndex: NSUInteger; message 'firstUnlaidCharacterIndex';
@@ -233,15 +233,15 @@ type
     function usedRectForTextContainer(container: NSTextContainer): NSRect; message 'usedRectForTextContainer:';
     function lineFragmentRectForGlyphAtIndex_effectiveRange(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer): NSRect; message 'lineFragmentRectForGlyphAtIndex:effectiveRange:';
     function lineFragmentUsedRectForGlyphAtIndex_effectiveRange(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer): NSRect; message 'lineFragmentUsedRectForGlyphAtIndex:effectiveRange:';
-    function lineFragmentRectForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer; flag: BOOL): NSRect; message 'lineFragmentRectForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
-    function lineFragmentUsedRectForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer; flag: BOOL): NSRect; message 'lineFragmentUsedRectForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
-    function textContainerForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer; flag: BOOL): NSTextContainer; message 'textContainerForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
+    function lineFragmentRectForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer; flag: ObjCBOOL): NSRect; message 'lineFragmentRectForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
+    function lineFragmentUsedRectForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer; flag: ObjCBOOL): NSRect; message 'lineFragmentUsedRectForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
+    function textContainerForGlyphAtIndex_effectiveRange_withoutAdditionalLayout(glyphIndex: NSUInteger; effectiveGlyphRange: NSRangePointer; flag: ObjCBOOL): NSTextContainer; message 'textContainerForGlyphAtIndex:effectiveRange:withoutAdditionalLayout:';
     function extraLineFragmentRect: NSRect; message 'extraLineFragmentRect';
     function extraLineFragmentUsedRect: NSRect; message 'extraLineFragmentUsedRect';
     function extraLineFragmentTextContainer: NSTextContainer; message 'extraLineFragmentTextContainer';
     function locationForGlyphAtIndex(glyphIndex: NSUInteger): NSPoint; message 'locationForGlyphAtIndex:';
-    function notShownAttributeForGlyphAtIndex(glyphIndex: NSUInteger): BOOL; message 'notShownAttributeForGlyphAtIndex:';
-    function drawsOutsideLineFragmentForGlyphAtIndex(glyphIndex: NSUInteger): BOOL; message 'drawsOutsideLineFragmentForGlyphAtIndex:';
+    function notShownAttributeForGlyphAtIndex(glyphIndex: NSUInteger): ObjCBOOL; message 'notShownAttributeForGlyphAtIndex:';
+    function drawsOutsideLineFragmentForGlyphAtIndex(glyphIndex: NSUInteger): ObjCBOOL; message 'drawsOutsideLineFragmentForGlyphAtIndex:';
     function attachmentSizeForGlyphAtIndex(glyphIndex: NSUInteger): NSSize; message 'attachmentSizeForGlyphAtIndex:';
     procedure setLayoutRect_forTextBlock_glyphRange(rect: NSRect; block: NSTextBlock; glyphRange: NSRange); message 'setLayoutRect:forTextBlock:glyphRange:';
     procedure setBoundsRect_forTextBlock_glyphRange(rect: NSRect; block: NSTextBlock; glyphRange: NSRange); message 'setBoundsRect:forTextBlock:glyphRange:';
@@ -262,7 +262,7 @@ type
     function glyphIndexForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): NSUInteger; message 'glyphIndexForPoint:inTextContainer:';
     function fractionOfDistanceThroughGlyphForPoint_inTextContainer(point: NSPoint; container: NSTextContainer): CGFloat; message 'fractionOfDistanceThroughGlyphForPoint:inTextContainer:';
     function characterIndexForPoint_inTextContainer_fractionOfDistanceBetweenInsertionPoints(point: NSPoint; container: NSTextContainer; partialFraction: CGFloatPtr): NSUInteger; message 'characterIndexForPoint:inTextContainer:fractionOfDistanceBetweenInsertionPoints:';
-    function getLineFragmentInsertionPointsForCharacterAtIndex_alternatePositions_inDisplayOrder_positions_characterIndexes(charIndex: NSUInteger; aFlag: BOOL; dFlag: BOOL; positions: CGFloatPtr; charIndexes: NSUIntegerPtr): NSUInteger; message 'getLineFragmentInsertionPointsForCharacterAtIndex:alternatePositions:inDisplayOrder:positions:characterIndexes:';
+    function getLineFragmentInsertionPointsForCharacterAtIndex_alternatePositions_inDisplayOrder_positions_characterIndexes(charIndex: NSUInteger; aFlag: ObjCBOOL; dFlag: ObjCBOOL; positions: CGFloatPtr; charIndexes: NSUIntegerPtr): NSUInteger; message 'getLineFragmentInsertionPointsForCharacterAtIndex:alternatePositions:inDisplayOrder:positions:characterIndexes:';
     function temporaryAttributesAtCharacterIndex_effectiveRange(charIndex: NSUInteger; effectiveCharRange: NSRangePointer): NSDictionary; message 'temporaryAttributesAtCharacterIndex:effectiveRange:';
     procedure setTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'setTemporaryAttributes:forCharacterRange:';
     procedure addTemporaryAttributes_forCharacterRange(attrs: NSDictionary; charRange: NSRange); message 'addTemporaryAttributes:forCharacterRange:';
@@ -274,8 +274,8 @@ type
     function substituteFontForFont(originalFont: NSFont): NSFont; message 'substituteFontForFont:';
     function defaultLineHeightForFont(theFont: NSFont): CGFloat; message 'defaultLineHeightForFont:';
     function defaultBaselineOffsetForFont(theFont: NSFont): CGFloat; message 'defaultBaselineOffsetForFont:';
-    function usesFontLeading: BOOL; message 'usesFontLeading';
-    procedure setUsesFontLeading(flag: BOOL); message 'setUsesFontLeading:';
+    function usesFontLeading: ObjCBOOL; message 'usesFontLeading';
+    procedure setUsesFontLeading(flag: ObjCBOOL); message 'setUsesFontLeading:';
 
     { Adopted Protocols }
     procedure encodeWithCoder(aCoder: NSCoder);
@@ -285,8 +285,8 @@ type
 { NSTextViewSupportCategory }
   NSTextViewSupportCategory = objccategory external (NSLayoutManager)
     function rulerMarkersForTextView_paragraphStyle_ruler(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView): NSArray; message 'rulerMarkersForTextView:paragraphStyle:ruler:';
-    function rulerAccessoryViewForTextView_paragraphStyle_ruler_enabled(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView; isEnabled: BOOL): NSView; message 'rulerAccessoryViewForTextView:paragraphStyle:ruler:enabled:';
-    function layoutManagerOwnsFirstResponderInWindow(window: NSWindow): BOOL; message 'layoutManagerOwnsFirstResponderInWindow:';
+    function rulerAccessoryViewForTextView_paragraphStyle_ruler_enabled(view: NSTextView; style: NSParagraphStyle; ruler: NSRulerView; isEnabled: ObjCBOOL): NSView; message 'rulerAccessoryViewForTextView:paragraphStyle:ruler:enabled:';
+    function layoutManagerOwnsFirstResponderInWindow(window: NSWindow): ObjCBOOL; message 'layoutManagerOwnsFirstResponderInWindow:';
     function firstTextView: NSTextView; message 'firstTextView';
     function textViewForBeginningOfSelection: NSTextView; message 'textViewForBeginningOfSelection';
     procedure drawBackgroundForGlyphRange_atPoint(glyphsToShow: NSRange; origin: NSPoint); message 'drawBackgroundForGlyphRange:atPoint:';
@@ -310,8 +310,8 @@ type
   NSLayoutManagerDelegateProtocol = objcprotocol external name 'NSLayoutManagerDelegate'
   optional
     procedure layoutManagerDidInvalidateLayout(sender: NSLayoutManager); message 'layoutManagerDidInvalidateLayout:';
-    procedure layoutManager_didCompleteLayoutForTextContainer_atEnd(layoutManager: NSLayoutManager; textContainer: NSTextContainer; layoutFinishedFlag: BOOL); message 'layoutManager:didCompleteLayoutForTextContainer:atEnd:';
-    function layoutManager_shouldUseTemporaryAttributes_forDrawingToScreen_atCharacterIndex_effectiveRange(layoutManager: NSLayoutManager; attrs: NSDictionary; toScreen: BOOL; charIndex: NSUInteger; effectiveCharRange: NSRangePointer): NSDictionary; message 'layoutManager:shouldUseTemporaryAttributes:forDrawingToScreen:atCharacterIndex:effectiveRange:';
+    procedure layoutManager_didCompleteLayoutForTextContainer_atEnd(layoutManager: NSLayoutManager; textContainer: NSTextContainer; layoutFinishedFlag: ObjCBOOL); message 'layoutManager:didCompleteLayoutForTextContainer:atEnd:';
+    function layoutManager_shouldUseTemporaryAttributes_forDrawingToScreen_atCharacterIndex_effectiveRange(layoutManager: NSLayoutManager; attrs: NSDictionary; toScreen: ObjCBOOL; charIndex: NSUInteger; effectiveCharRange: NSRangePointer): NSDictionary; message 'layoutManager:shouldUseTemporaryAttributes:forDrawingToScreen:atCharacterIndex:effectiveRange:';
   end;
 {$endif}
 {$endif}

packages/cocoaint/src/appkit/NSMatrix.inc

@@ -166,9 +166,9 @@ __MFlagsPtr = ^__MFlags;
     function makeCellAtRow_column(row: NSInteger; col: NSInteger): NSCell; message 'makeCellAtRow:column:';
     function mode: NSMatrixMode; message 'mode';
     procedure setMode(aMode: NSMatrixMode); message 'setMode:';
-    procedure setAllowsEmptySelection(flag: BOOL); message 'setAllowsEmptySelection:';
-    function allowsEmptySelection: BOOL; message 'allowsEmptySelection';
-    procedure sendAction_to_forAllCells(aSelector: SEL; anObject: id; flag: BOOL); message 'sendAction:to:forAllCells:';
+    procedure setAllowsEmptySelection(flag: ObjCBOOL); message 'setAllowsEmptySelection:';
+    function allowsEmptySelection: ObjCBOOL; message 'allowsEmptySelection';
+    procedure sendAction_to_forAllCells(aSelector: SEL; anObject: id; flag: ObjCBOOL); message 'sendAction:to:forAllCells:';
     function cells: NSArray; message 'cells';
     procedure sortUsingSelector(comparator: SEL); message 'sortUsingSelector:';
     procedure sortUsingFunction_context(compare: NSMatrixCompare; context: Pointer); message 'sortUsingFunction:context:';
@@ -176,35 +176,35 @@ __MFlagsPtr = ^__MFlags;
     function selectedCells: NSArray; message 'selectedCells';
     function selectedRow: NSInteger; message 'selectedRow';
     function selectedColumn: NSInteger; message 'selectedColumn';
-    procedure setSelectionByRect(flag: BOOL); message 'setSelectionByRect:';
-    function isSelectionByRect: BOOL; message 'isSelectionByRect';
-    procedure setSelectionFrom_to_anchor_highlight(startPos: NSInteger; endPos: NSInteger; anchorPos: NSInteger; lit: BOOL); message 'setSelectionFrom:to:anchor:highlight:';
+    procedure setSelectionByRect(flag: ObjCBOOL); message 'setSelectionByRect:';
+    function isSelectionByRect: ObjCBOOL; message 'isSelectionByRect';
+    procedure setSelectionFrom_to_anchor_highlight(startPos: NSInteger; endPos: NSInteger; anchorPos: NSInteger; lit: ObjCBOOL); message 'setSelectionFrom:to:anchor:highlight:';
     procedure deselectSelectedCell; message 'deselectSelectedCell';
     procedure deselectAllCells; message 'deselectAllCells';
     procedure selectCellAtRow_column(row: NSInteger; col: NSInteger); message 'selectCellAtRow:column:';
     procedure selectAll(sender: id); message 'selectAll:';
-    function selectCellWithTag(anInt: NSInteger): BOOL; message 'selectCellWithTag:';
+    function selectCellWithTag(anInt: NSInteger): ObjCBOOL; message 'selectCellWithTag:';
     function cellSize: NSSize; message 'cellSize';
     procedure setCellSize(aSize: NSSize); message 'setCellSize:';
     function intercellSpacing: NSSize; message 'intercellSpacing';
     procedure setIntercellSpacing(aSize: NSSize); message 'setIntercellSpacing:';
-    procedure setScrollable(flag: BOOL); message 'setScrollable:';
+    procedure setScrollable(flag: ObjCBOOL); message 'setScrollable:';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     function backgroundColor: NSColor; message 'backgroundColor';
     procedure setCellBackgroundColor(color: NSColor); message 'setCellBackgroundColor:';
     function cellBackgroundColor: NSColor; message 'cellBackgroundColor';
-    procedure setDrawsCellBackground(flag: BOOL); message 'setDrawsCellBackground:';
-    function drawsCellBackground: BOOL; message 'drawsCellBackground';
-    procedure setDrawsBackground(flag: BOOL); message 'setDrawsBackground:';
-    function drawsBackground: BOOL; message 'drawsBackground';
+    procedure setDrawsCellBackground(flag: ObjCBOOL); message 'setDrawsCellBackground:';
+    function drawsCellBackground: ObjCBOOL; message 'drawsCellBackground';
+    procedure setDrawsBackground(flag: ObjCBOOL); message 'setDrawsBackground:';
+    function drawsBackground: ObjCBOOL; message 'drawsBackground';
     procedure setState_atRow_column(value: NSInteger; row: NSInteger; col: NSInteger); message 'setState:atRow:column:';
     procedure getNumberOfRows_columns(rowCount: NSIntegerPtr; colCount: NSIntegerPtr); message 'getNumberOfRows:columns:';
     function numberOfRows: NSInteger; message 'numberOfRows';
     function numberOfColumns: NSInteger; message 'numberOfColumns';
     function cellAtRow_column(row: NSInteger; col: NSInteger): id; message 'cellAtRow:column:';
     function cellFrameAtRow_column(row: NSInteger; col: NSInteger): NSRect; message 'cellFrameAtRow:column:';
-    function getRow_column_ofCell(row: NSIntegerPtr; col: NSIntegerPtr; aCell: NSCell): BOOL; message 'getRow:column:ofCell:';
-    function getRow_column_forPoint(row: NSIntegerPtr; col: NSIntegerPtr; aPoint: NSPoint): BOOL; message 'getRow:column:forPoint:';
+    function getRow_column_ofCell(row: NSIntegerPtr; col: NSIntegerPtr; aCell: NSCell): ObjCBOOL; message 'getRow:column:ofCell:';
+    function getRow_column_forPoint(row: NSIntegerPtr; col: NSIntegerPtr; aPoint: NSPoint): ObjCBOOL; message 'getRow:column:forPoint:';
     procedure renewRows_columns(newRows: NSInteger; newCols: NSInteger); message 'renewRows:columns:';
     procedure putCell_atRow_column(newCell: NSCell; row: NSInteger; col: NSInteger); message 'putCell:atRow:column:';
     procedure addRow; message 'addRow';
@@ -220,42 +220,42 @@ __MFlagsPtr = ^__MFlags;
     function cellWithTag(anInt: NSInteger): id; message 'cellWithTag:';
     function doubleAction: SEL; message 'doubleAction';
     procedure setDoubleAction(aSelector: SEL); message 'setDoubleAction:';
-    procedure setAutosizesCells(flag: BOOL); message 'setAutosizesCells:';
-    function autosizesCells: BOOL; message 'autosizesCells';
+    procedure setAutosizesCells(flag: ObjCBOOL); message 'setAutosizesCells:';
+    function autosizesCells: ObjCBOOL; message 'autosizesCells';
     procedure sizeToCells; message 'sizeToCells';
-    procedure setValidateSize(flag: BOOL); message 'setValidateSize:';
+    procedure setValidateSize(flag: ObjCBOOL); message 'setValidateSize:';
     procedure drawCellAtRow_column(row: NSInteger; col: NSInteger); message 'drawCellAtRow:column:';
-    procedure highlightCell_atRow_column(flag: BOOL; row: NSInteger; col: NSInteger); message 'highlightCell:atRow:column:';
-    procedure setAutoscroll(flag: BOOL); message 'setAutoscroll:';
-    function isAutoscroll: BOOL; message 'isAutoscroll';
+    procedure highlightCell_atRow_column(flag: ObjCBOOL; row: NSInteger; col: NSInteger); message 'highlightCell:atRow:column:';
+    procedure setAutoscroll(flag: ObjCBOOL); message 'setAutoscroll:';
+    function isAutoscroll: ObjCBOOL; message 'isAutoscroll';
     procedure scrollCellToVisibleAtRow_column(row: NSInteger; col: NSInteger); message 'scrollCellToVisibleAtRow:column:';
     function mouseDownFlags: NSInteger; message 'mouseDownFlags';
     procedure mouseDown(theEvent: NSEvent); message 'mouseDown:';
-    function performKeyEquivalent(theEvent: NSEvent): BOOL; message 'performKeyEquivalent:';
-    function sendAction: BOOL; message 'sendAction';
+    function performKeyEquivalent(theEvent: NSEvent): ObjCBOOL; message 'performKeyEquivalent:';
+    function sendAction: ObjCBOOL; message 'sendAction';
     procedure sendDoubleAction; message 'sendDoubleAction';
     function delegate: NSMatrixDelegateProtocol; message 'delegate';
     procedure setDelegate(anObject: NSMatrixDelegateProtocol); message 'setDelegate:';
-    function textShouldBeginEditing(textObject: NSText): BOOL; message 'textShouldBeginEditing:';
-    function textShouldEndEditing(textObject: NSText): BOOL; message 'textShouldEndEditing:';
+    function textShouldBeginEditing(textObject: NSText): ObjCBOOL; message 'textShouldBeginEditing:';
+    function textShouldEndEditing(textObject: NSText): ObjCBOOL; message 'textShouldEndEditing:';
     procedure textDidBeginEditing(notification: NSNotification); message 'textDidBeginEditing:';
     procedure textDidEndEditing(notification: NSNotification); message 'textDidEndEditing:';
     procedure textDidChange(notification: NSNotification); message 'textDidChange:';
     procedure selectText(sender: id); message 'selectText:';
     function selectTextAtRow_column(row: NSInteger; col: NSInteger): id; message 'selectTextAtRow:column:';
-    function acceptsFirstMouse(theEvent: NSEvent): BOOL; message 'acceptsFirstMouse:';
+    function acceptsFirstMouse(theEvent: NSEvent): ObjCBOOL; message 'acceptsFirstMouse:';
     procedure resetCursorRects; message 'resetCursorRects';
     procedure setToolTip_forCell(toolTipString: NSString; cell_: NSCell); message 'setToolTip:forCell:';
     function toolTipForCell(cell_: NSCell): NSString; message 'toolTipForCell:';
 
     { Adopted Protocols }
-    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): BOOL;
+    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): ObjCBOOL;
   end;
 
 { NSKeyboardUI_NSMatrixCategory }
   NSKeyboardUI_NSMatrixCategory = objccategory external name 'NSKeyboardUI' (NSMatrix)
-    procedure setTabKeyTraversesCells(flag: BOOL); message 'setTabKeyTraversesCells:';
-    function tabKeyTraversesCells: BOOL; message 'tabKeyTraversesCells';
+    procedure setTabKeyTraversesCells(flag: ObjCBOOL); message 'setTabKeyTraversesCells:';
+    function tabKeyTraversesCells: ObjCBOOL; message 'tabKeyTraversesCells';
     procedure setKeyCell(keyCell_: NSCell); message 'setKeyCell:';
     function keyCell: id; message 'keyCell';
   end;

packages/cocoaint/src/appkit/NSMenu.inc

@@ -103,9 +103,9 @@ var
     function title: NSString; message 'title';
     class procedure popUpContextMenu_withEvent_forView(menu: NSMenu; event: NSEvent; view: NSView); message 'popUpContextMenu:withEvent:forView:';
     class procedure popUpContextMenu_withEvent_forView_withFont(menu: NSMenu; event: NSEvent; view: NSView; font_: NSFont); message 'popUpContextMenu:withEvent:forView:withFont:';
-    function popUpMenuPositioningItem_atLocation_inView(item: NSMenuItem; location: NSPoint; view: NSView): BOOL; message 'popUpMenuPositioningItem:atLocation:inView:';
-    class procedure setMenuBarVisible(visible: BOOL); message 'setMenuBarVisible:';
-    class function menuBarVisible: BOOL; message 'menuBarVisible';
+    function popUpMenuPositioningItem_atLocation_inView(item: NSMenuItem; location: NSPoint; view: NSView): ObjCBOOL; message 'popUpMenuPositioningItem:atLocation:inView:';
+    class procedure setMenuBarVisible(visible: ObjCBOOL); message 'setMenuBarVisible:';
+    class function menuBarVisible: ObjCBOOL; message 'menuBarVisible';
     function supermenu: NSMenu; message 'supermenu';
     procedure insertItem_atIndex(newItem: NSMenuItem; index: NSInteger); message 'insertItem:atIndex:';
     procedure addItem(newItem: NSMenuItem); message 'addItem:';
@@ -125,10 +125,10 @@ var
     function indexOfItemWithTarget_andAction(target: id; actionSelector: SEL): NSInteger; message 'indexOfItemWithTarget:andAction:';
     function itemWithTitle(aTitle: NSString): NSMenuItem; message 'itemWithTitle:';
     function itemWithTag(tag: NSInteger): NSMenuItem; message 'itemWithTag:';
-    procedure setAutoenablesItems(flag: BOOL); message 'setAutoenablesItems:';
-    function autoenablesItems: BOOL; message 'autoenablesItems';
+    procedure setAutoenablesItems(flag: ObjCBOOL); message 'setAutoenablesItems:';
+    function autoenablesItems: ObjCBOOL; message 'autoenablesItems';
     procedure update; message 'update';
-    function performKeyEquivalent(theEvent: NSEvent): BOOL; message 'performKeyEquivalent:';
+    function performKeyEquivalent(theEvent: NSEvent): ObjCBOOL; message 'performKeyEquivalent:';
     procedure itemChanged(item: NSMenuItem); message 'itemChanged:';
     procedure performActionForItemAtIndex(index: NSInteger); message 'performActionForItemAtIndex:';
     procedure setDelegate(anObject: NSMenuDelegateProtocol); message 'setDelegate:';
@@ -142,15 +142,15 @@ var
     function size: NSSize; message 'size';
     function font: NSFont; message 'font';
     procedure setFont(font_: NSFont); message 'setFont:';
-    function allowsContextMenuPlugIns: BOOL; message 'allowsContextMenuPlugIns';
-    procedure setAllowsContextMenuPlugIns(allows: BOOL); message 'setAllowsContextMenuPlugIns:';
-    procedure setShowsStateColumn(showsState: BOOL); message 'setShowsStateColumn:';
-    function showsStateColumn: BOOL; message 'showsStateColumn';
+    function allowsContextMenuPlugIns: ObjCBOOL; message 'allowsContextMenuPlugIns';
+    procedure setAllowsContextMenuPlugIns(allows: ObjCBOOL); message 'setAllowsContextMenuPlugIns:';
+    procedure setShowsStateColumn(showsState: ObjCBOOL); message 'setShowsStateColumn:';
+    function showsStateColumn: ObjCBOOL; message 'showsStateColumn';
     class function menuZone: NSZonePtr; message 'menuZone';
-    procedure setMenuChangedMessagesEnabled(flag: BOOL); message 'setMenuChangedMessagesEnabled:';
-    function menuChangedMessagesEnabled: BOOL; message 'menuChangedMessagesEnabled';
+    procedure setMenuChangedMessagesEnabled(flag: ObjCBOOL); message 'setMenuChangedMessagesEnabled:';
+    function menuChangedMessagesEnabled: ObjCBOOL; message 'menuChangedMessagesEnabled';
     procedure helpRequested(eventPtr: NSEvent); message 'helpRequested:';
-    function isTornOff: BOOL; message 'isTornOff';
+    function isTornOff: ObjCBOOL; message 'isTornOff';
 
     { Adopted Protocols }
     function copyWithZone(zone_: NSZonePtr): id;
@@ -165,7 +165,7 @@ var
 
 { NSMenuValidationCategory }
   NSMenuValidationCategory = objccategory external (NSObject)
-    function validateMenuItem(menuItem: NSMenuItem): BOOL; message 'validateMenuItem:';
+    function validateMenuItem(menuItem: NSMenuItem): ObjCBOOL; message 'validateMenuItem:';
   end;
 
 { NSMenuPropertiesToUpdateCategory }
@@ -183,7 +183,7 @@ var
     function tearOffMenuRepresentation: id; message 'tearOffMenuRepresentation'; deprecated 'in Mac OS X 10.2 and later';
     class procedure setMenuZone(aZone: NSZonePtr); message 'setMenuZone:'; deprecated 'in Mac OS X 10.2 and later';
     function attachedMenu: NSMenu; message 'attachedMenu'; deprecated 'in Mac OS X 10.2 and later';
-    function isAttached: BOOL; message 'isAttached'; deprecated 'in Mac OS X 10.2 and later';
+    function isAttached: ObjCBOOL; message 'isAttached'; deprecated 'in Mac OS X 10.2 and later';
     procedure sizeToFit; message 'sizeToFit'; deprecated 'in Mac OS X 10.2 and later';
     function locationForSubmenu(aSubmenu: NSMenu): NSPoint; message 'locationForSubmenu:'; deprecated 'in Mac OS X 10.2 and later';
   end;
@@ -199,8 +199,8 @@ var
   optional
     procedure menuNeedsUpdate(menu: NSMenu); message 'menuNeedsUpdate:';
     function numberOfItemsInMenu(menu: NSMenu): NSInteger; message 'numberOfItemsInMenu:';
-    function menu_updateItem_atIndex_shouldCancel(menu: NSMenu; item: NSMenuItem; index: NSInteger; shouldCancel: BOOL): BOOL; message 'menu:updateItem:atIndex:shouldCancel:';
-    function menuHasKeyEquivalent_forEvent_target_action(menu: NSMenu; event: NSEvent; target: idPtr; action: SELPtr): BOOL; message 'menuHasKeyEquivalent:forEvent:target:action:';
+    function menu_updateItem_atIndex_shouldCancel(menu: NSMenu; item: NSMenuItem; index: NSInteger; shouldCancel: ObjCBOOL): ObjCBOOL; message 'menu:updateItem:atIndex:shouldCancel:';
+    function menuHasKeyEquivalent_forEvent_target_action(menu: NSMenu; event: NSEvent; target: idPtr; action: SELPtr): ObjCBOOL; message 'menuHasKeyEquivalent:forEvent:target:action:';
     procedure menuWillOpen(menu: NSMenu); message 'menuWillOpen:';
     procedure menuDidClose(menu: NSMenu); message 'menuDidClose:';
     procedure menu_willHighlightItem(menu: NSMenu; item: NSMenuItem); message 'menu:willHighlightItem:';

packages/cocoaint/src/appkit/NSMenuItem.inc

@@ -80,13 +80,13 @@
       end;
     
   public
-    class procedure setUsesUserKeyEquivalents(flag: BOOL); message 'setUsesUserKeyEquivalents:';
-    class function usesUserKeyEquivalents: BOOL; message 'usesUserKeyEquivalents';
+    class procedure setUsesUserKeyEquivalents(flag: ObjCBOOL); message 'setUsesUserKeyEquivalents:';
+    class function usesUserKeyEquivalents: ObjCBOOL; message 'usesUserKeyEquivalents';
     class function separatorItem: NSMenuItem; message 'separatorItem';
     function initWithTitle_action_keyEquivalent(aString: NSString; aSelector: SEL; charCode: NSString): id; message 'initWithTitle:action:keyEquivalent:';
     procedure setMenu(menu_: NSMenu); message 'setMenu:';
     function menu: NSMenu; message 'menu';
-    function hasSubmenu: BOOL; message 'hasSubmenu';
+    function hasSubmenu: ObjCBOOL; message 'hasSubmenu';
     procedure setSubmenu(submenu_: NSMenu); message 'setSubmenu:';
     function submenu: NSMenu; message 'submenu';
     function parentItem: NSMenuItem; message 'parentItem';
@@ -94,7 +94,7 @@
     function title: NSString; message 'title';
     procedure setAttributedTitle(string_: NSAttributedString); message 'setAttributedTitle:';
     function attributedTitle: NSAttributedString; message 'attributedTitle';
-    function isSeparatorItem: BOOL; message 'isSeparatorItem';
+    function isSeparatorItem: ObjCBOOL; message 'isSeparatorItem';
     procedure setKeyEquivalent(aKeyEquivalent: NSString); message 'setKeyEquivalent:';
     function keyEquivalent: NSString; message 'keyEquivalent';
     procedure setKeyEquivalentModifierMask(mask: NSUInteger); message 'setKeyEquivalentModifierMask:';
@@ -111,10 +111,10 @@
     function offStateImage: NSImage; message 'offStateImage';
     procedure setMixedStateImage(image_: NSImage); message 'setMixedStateImage:';
     function mixedStateImage: NSImage; message 'mixedStateImage';
-    procedure setEnabled(flag: BOOL); message 'setEnabled:';
-    function isEnabled: BOOL; message 'isEnabled';
-    procedure setAlternate(isAlternate_: BOOL); message 'setAlternate:';
-    function isAlternate: BOOL; message 'isAlternate';
+    procedure setEnabled(flag: ObjCBOOL); message 'setEnabled:';
+    function isEnabled: ObjCBOOL; message 'isEnabled';
+    procedure setAlternate(isAlternate_: ObjCBOOL); message 'setAlternate:';
+    function isAlternate: ObjCBOOL; message 'isAlternate';
     procedure setIndentationLevel(indentationLevel_: NSInteger); message 'setIndentationLevel:';
     function indentationLevel: NSInteger; message 'indentationLevel';
     procedure setTarget(anObject: id); message 'setTarget:';
@@ -127,10 +127,10 @@
     function representedObject: id; message 'representedObject';
     procedure setView(view_: NSView); message 'setView:';
     function view: NSView; message 'view';
-    function isHighlighted: BOOL; message 'isHighlighted';
-    procedure setHidden(hidden: BOOL); message 'setHidden:';
-    function isHidden: BOOL; message 'isHidden';
-    function isHiddenOrHasHiddenAncestor: BOOL; message 'isHiddenOrHasHiddenAncestor';
+    function isHighlighted: ObjCBOOL; message 'isHighlighted';
+    procedure setHidden(hidden: ObjCBOOL); message 'setHidden:';
+    function isHidden: ObjCBOOL; message 'isHidden';
+    function isHiddenOrHasHiddenAncestor: ObjCBOOL; message 'isHiddenOrHasHiddenAncestor';
     procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
     function toolTip: NSString; message 'toolTip';
 

packages/cocoaint/src/appkit/NSMenuItemCell.inc

@@ -67,11 +67,11 @@
     function menuItem: NSMenuItem; message 'menuItem';
     procedure setMenuView(menuView_: NSMenuView); message 'setMenuView:';
     function menuView: NSMenuView; message 'menuView';
-    procedure setNeedsSizing(flag: BOOL); message 'setNeedsSizing:';
-    function needsSizing: BOOL; message 'needsSizing';
+    procedure setNeedsSizing(flag: ObjCBOOL); message 'setNeedsSizing:';
+    function needsSizing: ObjCBOOL; message 'needsSizing';
     procedure calcSize; message 'calcSize';
-    procedure setNeedsDisplay_(flag: BOOL); message 'setNeedsDisplay:';
-    function needsDisplay: BOOL; message 'needsDisplay';
+    procedure setNeedsDisplay_(flag: ObjCBOOL); message 'setNeedsDisplay:';
+    function needsDisplay: ObjCBOOL; message 'needsDisplay';
     function stateImageWidth: CGFloat; message 'stateImageWidth';
     function imageWidth: CGFloat; message 'imageWidth';
     function titleWidth: CGFloat; message 'titleWidth';

packages/cocoaint/src/appkit/NSMenuView.inc

@@ -90,8 +90,8 @@
     procedure itemAdded(notification: NSNotification); message 'itemAdded:';
     procedure itemRemoved(notification: NSNotification); message 'itemRemoved:';
     procedure update; message 'update';
-    procedure setHorizontal(flag: BOOL); message 'setHorizontal:';
-    function isHorizontal: BOOL; message 'isHorizontal';
+    procedure setHorizontal(flag: ObjCBOOL); message 'setHorizontal:';
+    function isHorizontal: ObjCBOOL; message 'isHorizontal';
     procedure setFont(font_: NSFont); message 'setFont:';
     function font: NSFont; message 'font';
     function innerRect: NSRect; message 'innerRect';
@@ -109,18 +109,18 @@
     procedure setMenuItemCell_forItemAtIndex(cell: NSMenuItemCell; index: NSInteger); message 'setMenuItemCell:forItemAtIndex:';
     function menuItemCellForItemAtIndex(index: NSInteger): NSMenuItemCell; message 'menuItemCellForItemAtIndex:';
     function attachedMenuView: NSMenuView; message 'attachedMenuView';
-    procedure setNeedsSizing(flag: BOOL); message 'setNeedsSizing:';
-    function needsSizing: BOOL; message 'needsSizing';
+    procedure setNeedsSizing(flag: ObjCBOOL); message 'setNeedsSizing:';
+    function needsSizing: ObjCBOOL; message 'needsSizing';
     procedure sizeToFit; message 'sizeToFit';
     function attachedMenu: NSMenu; message 'attachedMenu';
-    function isAttached: BOOL; message 'isAttached';
-    function isTornOff: BOOL; message 'isTornOff';
+    function isAttached: ObjCBOOL; message 'isAttached';
+    function isTornOff: ObjCBOOL; message 'isTornOff';
     function locationForSubmenu(aSubmenu: NSMenu): NSPoint; message 'locationForSubmenu:';
     procedure setWindowFrameForAttachingToRect_onScreen_preferredEdge_popUpSelectedItem(screenRect: NSRect; screen: NSScreen; edge: NSRectEdge; selectedItemIndex: NSInteger); message 'setWindowFrameForAttachingToRect:onScreen:preferredEdge:popUpSelectedItem:';
     procedure detachSubmenu; message 'detachSubmenu';
     procedure attachSubmenuForItemAtIndex(index: NSInteger); message 'attachSubmenuForItemAtIndex:';
     procedure performActionWithHighlightingForItemAtIndex(index: NSInteger); message 'performActionWithHighlightingForItemAtIndex:';
-    function trackWithEvent(event: NSEvent): BOOL; message 'trackWithEvent:';
+    function trackWithEvent(event: NSEvent): ObjCBOOL; message 'trackWithEvent:';
     function horizontalEdgePadding: CGFloat; message 'horizontalEdgePadding';
     procedure setHorizontalEdgePadding(pad: CGFloat); message 'setHorizontalEdgePadding:';
   end;

packages/cocoaint/src/appkit/NSMovie.inc

@@ -58,13 +58,13 @@
     
   public
     function initWithMovie(movie: Pointer): id; message 'initWithMovie:'; deprecated 'in Mac OS X 10.5 and later';
-    function initWithURL_byReference(url_: NSURL; byRef: BOOL): id; message 'initWithURL:byReference:'; deprecated 'in Mac OS X 10.5 and later';
+    function initWithURL_byReference(url_: NSURL; byRef: ObjCBOOL): id; message 'initWithURL:byReference:'; deprecated 'in Mac OS X 10.5 and later';
     function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:'; deprecated 'in Mac OS X 10.5 and later';
     function QTMovie_: Pointer; message 'QTMovie'; deprecated 'in Mac OS X 10.5 and later';
     function URL: NSURL; message 'URL'; deprecated 'in Mac OS X 10.5 and later';
     class function movieUnfilteredFileTypes: NSArray; message 'movieUnfilteredFileTypes'; deprecated 'in Mac OS X 10.5 and later';
     class function movieUnfilteredPasteboardTypes: NSArray; message 'movieUnfilteredPasteboardTypes'; deprecated 'in Mac OS X 10.5 and later';
-    class function canInitWithPasteboard(pasteboard: NSPasteboard): BOOL; message 'canInitWithPasteboard:'; deprecated 'in Mac OS X 10.5 and later';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): ObjCBOOL; message 'canInitWithPasteboard:'; deprecated 'in Mac OS X 10.5 and later';
 
     { Adopted Protocols }
     procedure encodeWithCoder(aCoder: NSCoder);

packages/cocoaint/src/appkit/NSMovieView.inc

@@ -89,7 +89,7 @@ __MVFlagsPtr = ^__MVFlags;
     function movieRect: NSRect; message 'movieRect'; deprecated 'in Mac OS X 10.5 and later';
     procedure start(sender: id); message 'start:'; deprecated 'in Mac OS X 10.5 and later';
     procedure stop(sender: id); message 'stop:'; deprecated 'in Mac OS X 10.5 and later';
-    function isPlaying: BOOL; message 'isPlaying'; deprecated 'in Mac OS X 10.5 and later';
+    function isPlaying: ObjCBOOL; message 'isPlaying'; deprecated 'in Mac OS X 10.5 and later';
     procedure gotoPosterFrame(sender: id); message 'gotoPosterFrame:'; deprecated 'in Mac OS X 10.5 and later';
     procedure gotoBeginning(sender: id); message 'gotoBeginning:'; deprecated 'in Mac OS X 10.5 and later';
     procedure gotoEnd(sender: id); message 'gotoEnd:'; deprecated 'in Mac OS X 10.5 and later';
@@ -99,20 +99,20 @@ __MVFlagsPtr = ^__MVFlags;
     function rate: single; message 'rate'; deprecated 'in Mac OS X 10.5 and later';
     procedure setVolume(volume_: single); message 'setVolume:'; deprecated 'in Mac OS X 10.5 and later';
     function volume: single; message 'volume'; deprecated 'in Mac OS X 10.5 and later';
-    procedure setMuted(mute: BOOL); message 'setMuted:'; deprecated 'in Mac OS X 10.5 and later';
-    function isMuted: BOOL; message 'isMuted'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setMuted(mute: ObjCBOOL); message 'setMuted:'; deprecated 'in Mac OS X 10.5 and later';
+    function isMuted: ObjCBOOL; message 'isMuted'; deprecated 'in Mac OS X 10.5 and later';
     procedure setLoopMode(mode: NSQTMovieLoopMode); message 'setLoopMode:'; deprecated 'in Mac OS X 10.5 and later';
     function loopMode: NSQTMovieLoopMode; message 'loopMode'; deprecated 'in Mac OS X 10.5 and later';
-    procedure setPlaysSelectionOnly(flag: BOOL); message 'setPlaysSelectionOnly:'; deprecated 'in Mac OS X 10.5 and later';
-    function playsSelectionOnly: BOOL; message 'playsSelectionOnly'; deprecated 'in Mac OS X 10.5 and later';
-    procedure setPlaysEveryFrame(flag: BOOL); message 'setPlaysEveryFrame:'; deprecated 'in Mac OS X 10.5 and later';
-    function playsEveryFrame: BOOL; message 'playsEveryFrame'; deprecated 'in Mac OS X 10.5 and later';
-    procedure showController_adjustingSize(show: BOOL; adjustSize: BOOL); message 'showController:adjustingSize:'; deprecated 'in Mac OS X 10.5 and later';
-    function isControllerVisible: BOOL; message 'isControllerVisible'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setPlaysSelectionOnly(flag: ObjCBOOL); message 'setPlaysSelectionOnly:'; deprecated 'in Mac OS X 10.5 and later';
+    function playsSelectionOnly: ObjCBOOL; message 'playsSelectionOnly'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setPlaysEveryFrame(flag: ObjCBOOL); message 'setPlaysEveryFrame:'; deprecated 'in Mac OS X 10.5 and later';
+    function playsEveryFrame: ObjCBOOL; message 'playsEveryFrame'; deprecated 'in Mac OS X 10.5 and later';
+    procedure showController_adjustingSize(show: ObjCBOOL; adjustSize: ObjCBOOL); message 'showController:adjustingSize:'; deprecated 'in Mac OS X 10.5 and later';
+    function isControllerVisible: ObjCBOOL; message 'isControllerVisible'; deprecated 'in Mac OS X 10.5 and later';
     procedure resizeWithMagnification(magnification: CGFloat); message 'resizeWithMagnification:'; deprecated 'in Mac OS X 10.5 and later';
     function sizeForMagnification(magnification: CGFloat): NSSize; message 'sizeForMagnification:'; deprecated 'in Mac OS X 10.5 and later';
-    procedure setEditable(editable: BOOL); message 'setEditable:'; deprecated 'in Mac OS X 10.5 and later';
-    function isEditable: BOOL; message 'isEditable'; deprecated 'in Mac OS X 10.5 and later';
+    procedure setEditable(editable: ObjCBOOL); message 'setEditable:'; deprecated 'in Mac OS X 10.5 and later';
+    function isEditable: ObjCBOOL; message 'isEditable'; deprecated 'in Mac OS X 10.5 and later';
     procedure cut(sender: id); message 'cut:'; deprecated 'in Mac OS X 10.5 and later';
     procedure copy_(sender: id); message 'copy:'; deprecated 'in Mac OS X 10.5 and later';
     procedure paste(sender: id); message 'paste:'; deprecated 'in Mac OS X 10.5 and later';
@@ -121,7 +121,7 @@ __MVFlagsPtr = ^__MVFlags;
     procedure clear(sender: id); message 'clear:'; deprecated 'in Mac OS X 10.5 and later';
 
     { Adopted Protocols }
-    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): BOOL;
+    function validateUserInterfaceItem(anItem: NSValidatedUserInterfaceItemProtocol): ObjCBOOL;
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSNib.inc

@@ -66,8 +66,8 @@ var
   public
     function initWithContentsOfURL(nibFileURL: NSURL): id; message 'initWithContentsOfURL:';
     function initWithNibNamed_bundle(nibName: NSString; bundle: NSBundle): id; message 'initWithNibNamed:bundle:';
-    function instantiateNibWithExternalNameTable(externalNameTable: NSDictionary): BOOL; message 'instantiateNibWithExternalNameTable:';
-    function instantiateNibWithOwner_topLevelObjects(owner: id; topLevelObjects: NSArrayPointer): BOOL; message 'instantiateNibWithOwner:topLevelObjects:';
+    function instantiateNibWithExternalNameTable(externalNameTable: NSDictionary): ObjCBOOL; message 'instantiateNibWithExternalNameTable:';
+    function instantiateNibWithOwner_topLevelObjects(owner: id; topLevelObjects: NSArrayPointer): ObjCBOOL; message 'instantiateNibWithOwner:topLevelObjects:';
 
     { Adopted Protocols }
     procedure encodeWithCoder(aCoder: NSCoder);

packages/cocoaint/src/appkit/NSNibLoading.inc

@@ -38,8 +38,8 @@
 
 { NSNibLoadingCategory }
   NSNibLoadingCategory = objccategory external (NSBundle)
-    class function loadNibFile_externalNameTable_withZone(fileName: NSString; context: NSDictionary; zone_: NSZonePtr): BOOL; message 'loadNibFile:externalNameTable:withZone:';
-    class function loadNibNamed_owner(nibName: NSString; owner: id): BOOL; message 'loadNibNamed:owner:';
+    class function loadNibFile_externalNameTable_withZone(fileName: NSString; context: NSDictionary; zone_: NSZonePtr): ObjCBOOL; message 'loadNibFile:externalNameTable:withZone:';
+    class function loadNibNamed_owner(nibName: NSString; owner: id): ObjCBOOL; message 'loadNibNamed:owner:';
   end;
 
 { NSNibAwakingCategory }

packages/cocoaint/src/appkit/NSObjectController.inc

@@ -72,21 +72,21 @@
     function content: id; message 'content';
     function selection: id; message 'selection';
     function selectedObjects: NSArray; message 'selectedObjects';
-    procedure setAutomaticallyPreparesContent(flag: BOOL); message 'setAutomaticallyPreparesContent:';
-    function automaticallyPreparesContent: BOOL; message 'automaticallyPreparesContent';
+    procedure setAutomaticallyPreparesContent(flag: ObjCBOOL); message 'setAutomaticallyPreparesContent:';
+    function automaticallyPreparesContent: ObjCBOOL; message 'automaticallyPreparesContent';
     procedure prepareContent; message 'prepareContent';
     procedure setObjectClass(objectClass_: Pobjc_class); message 'setObjectClass:';
     function objectClass: Pobjc_class; message 'objectClass';
     function newObject: id; message 'newObject';
     procedure addObject(object_: id); message 'addObject:';
     procedure removeObject(object_: id); message 'removeObject:';
-    procedure setEditable(flag: BOOL); message 'setEditable:';
-    function isEditable: BOOL; message 'isEditable';
+    procedure setEditable(flag: ObjCBOOL); message 'setEditable:';
+    function isEditable: ObjCBOOL; message 'isEditable';
     procedure add(sender: id); message 'add:';
-    function canAdd: BOOL; message 'canAdd';
+    function canAdd: ObjCBOOL; message 'canAdd';
     procedure remove(sender: id); message 'remove:';
-    function canRemove: BOOL; message 'canRemove';
-    function validateUserInterfaceItem(item: NSValidatedUserInterfaceItemProtocol): BOOL; message 'validateUserInterfaceItem:';
+    function canRemove: ObjCBOOL; message 'canRemove';
+    function validateUserInterfaceItem(item: NSValidatedUserInterfaceItemProtocol): ObjCBOOL; message 'validateUserInterfaceItem:';
   end;
 
 { NSManagedControllerCategory }
@@ -97,10 +97,10 @@
     procedure setEntityName(entityName_: NSString); message 'setEntityName:';
     function fetchPredicate: NSPredicate; message 'fetchPredicate';
     procedure setFetchPredicate(predicate: NSPredicate); message 'setFetchPredicate:';
-    function fetchWithRequest_merge_error(fetchRequest: NSFetchRequest; merge: BOOL; error: NSErrorPointer): BOOL; message 'fetchWithRequest:merge:error:';
+    function fetchWithRequest_merge_error(fetchRequest: NSFetchRequest; merge: ObjCBOOL; error: NSErrorPointer): ObjCBOOL; message 'fetchWithRequest:merge:error:';
     procedure fetch(sender: id); message 'fetch:';
-    procedure setUsesLazyFetching(enabled: BOOL); message 'setUsesLazyFetching:';
-    function usesLazyFetching: BOOL; message 'usesLazyFetching';
+    procedure setUsesLazyFetching(enabled: ObjCBOOL); message 'setUsesLazyFetching:';
+    function usesLazyFetching: ObjCBOOL; message 'usesLazyFetching';
     function defaultFetchRequest: NSFetchRequest; message 'defaultFetchRequest';
   end;
 

packages/cocoaint/src/appkit/NSOpenPanel.inc

@@ -48,14 +48,14 @@
   public
     class function openPanel: NSOpenPanel; message 'openPanel';
     function URLs: NSArray; message 'URLs';
-    function resolvesAliases: BOOL; message 'resolvesAliases';
-    procedure setResolvesAliases(flag: BOOL); message 'setResolvesAliases:';
-    function canChooseDirectories: BOOL; message 'canChooseDirectories';
-    procedure setCanChooseDirectories(flag: BOOL); message 'setCanChooseDirectories:';
-    function allowsMultipleSelection: BOOL; message 'allowsMultipleSelection';
-    procedure setAllowsMultipleSelection(flag: BOOL); message 'setAllowsMultipleSelection:';
-    function canChooseFiles: BOOL; message 'canChooseFiles';
-    procedure setCanChooseFiles(flag: BOOL); message 'setCanChooseFiles:';
+    function resolvesAliases: ObjCBOOL; message 'resolvesAliases';
+    procedure setResolvesAliases(flag: ObjCBOOL); message 'setResolvesAliases:';
+    function canChooseDirectories: ObjCBOOL; message 'canChooseDirectories';
+    procedure setCanChooseDirectories(flag: ObjCBOOL); message 'setCanChooseDirectories:';
+    function allowsMultipleSelection: ObjCBOOL; message 'allowsMultipleSelection';
+    procedure setAllowsMultipleSelection(flag: ObjCBOOL); message 'setAllowsMultipleSelection:';
+    function canChooseFiles: ObjCBOOL; message 'canChooseFiles';
+    procedure setCanChooseFiles(flag: ObjCBOOL); message 'setCanChooseFiles:';
   end;
 
 { NSDeprecated_NSOpenPanelCategory }

packages/cocoaint/src/appkit/NSOutlineView.inc

@@ -143,8 +143,8 @@ var
     _unused3: NSInteger;
     _unused1: NSInteger;
     _outlineTableColumn: NSTableColumn;
-    _initedRows: BOOL;
-    _indentationMarkerInCell: BOOL;
+    _initedRows: ObjCBOOL;
+    _indentationMarkerInCell: ObjCBOOL;
     _indentationPerLevel: NSInteger;
     _outlineCell: NSButtonCell;
     _trackingOutlineFrame: NSRect;
@@ -168,30 +168,30 @@ var
     function dataSource: NSOutlineViewDataSourceProtocol; message 'dataSource';
     procedure setOutlineTableColumn(outlineTableColumn_: NSTableColumn); message 'setOutlineTableColumn:';
     function outlineTableColumn: NSTableColumn; message 'outlineTableColumn';
-    function isExpandable(item: id): BOOL; message 'isExpandable:';
-    procedure expandItem_expandChildren(item: id; expandChildren: BOOL); message 'expandItem:expandChildren:';
+    function isExpandable(item: id): ObjCBOOL; message 'isExpandable:';
+    procedure expandItem_expandChildren(item: id; expandChildren: ObjCBOOL); message 'expandItem:expandChildren:';
     procedure expandItem(item: id); message 'expandItem:';
-    procedure collapseItem_collapseChildren(item: id; collapseChildren: BOOL); message 'collapseItem:collapseChildren:';
+    procedure collapseItem_collapseChildren(item: id; collapseChildren: ObjCBOOL); message 'collapseItem:collapseChildren:';
     procedure collapseItem(item: id); message 'collapseItem:';
-    procedure reloadItem_reloadChildren(item: id; reloadChildren: BOOL); message 'reloadItem:reloadChildren:';
+    procedure reloadItem_reloadChildren(item: id; reloadChildren: ObjCBOOL); message 'reloadItem:reloadChildren:';
     procedure reloadItem(item: id); message 'reloadItem:';
     function parentForItem(item: id): id; message 'parentForItem:';
     function itemAtRow(row: NSInteger): id; message 'itemAtRow:';
     function rowForItem(item: id): NSInteger; message 'rowForItem:';
     function levelForItem(item: id): NSInteger; message 'levelForItem:';
     function levelForRow(row: NSInteger): NSInteger; message 'levelForRow:';
-    function isItemExpanded(item: id): BOOL; message 'isItemExpanded:';
+    function isItemExpanded(item: id): ObjCBOOL; message 'isItemExpanded:';
     procedure setIndentationPerLevel(indentationPerLevel_: CGFloat); message 'setIndentationPerLevel:';
     function indentationPerLevel: CGFloat; message 'indentationPerLevel';
-    procedure setIndentationMarkerFollowsCell(drawInCell: BOOL); message 'setIndentationMarkerFollowsCell:';
-    function indentationMarkerFollowsCell: BOOL; message 'indentationMarkerFollowsCell';
-    procedure setAutoresizesOutlineColumn(resize: BOOL); message 'setAutoresizesOutlineColumn:';
-    function autoresizesOutlineColumn: BOOL; message 'autoresizesOutlineColumn';
+    procedure setIndentationMarkerFollowsCell(drawInCell: ObjCBOOL); message 'setIndentationMarkerFollowsCell:';
+    function indentationMarkerFollowsCell: ObjCBOOL; message 'indentationMarkerFollowsCell';
+    procedure setAutoresizesOutlineColumn(resize: ObjCBOOL); message 'setAutoresizesOutlineColumn:';
+    function autoresizesOutlineColumn: ObjCBOOL; message 'autoresizesOutlineColumn';
     function frameOfOutlineCellAtRow(row: NSInteger): NSRect; message 'frameOfOutlineCellAtRow:';
     procedure setDropItem_dropChildIndex(item: id; index: NSInteger); message 'setDropItem:dropChildIndex:';
-    function shouldCollapseAutoExpandedItemsForDeposited(deposited: BOOL): BOOL; message 'shouldCollapseAutoExpandedItemsForDeposited:';
-    function autosaveExpandedItems: BOOL; message 'autosaveExpandedItems';
-    procedure setAutosaveExpandedItems(save: BOOL); message 'setAutosaveExpandedItems:';
+    function shouldCollapseAutoExpandedItemsForDeposited(deposited: ObjCBOOL): ObjCBOOL; message 'shouldCollapseAutoExpandedItemsForDeposited:';
+    function autosaveExpandedItems: ObjCBOOL; message 'autosaveExpandedItems';
+    procedure setAutosaveExpandedItems(save: ObjCBOOL); message 'setAutosaveExpandedItems:';
   end;
 
 { NSOutlineViewNotificationsCategory }
@@ -216,16 +216,16 @@ var
   NSOutlineViewDataSourceProtocol = objcprotocol external name 'NSOutlineViewDataSource'
   optional
     function outlineView_child_ofItem(outlineView: NSOutlineView; index: NSInteger; item: id): id; message 'outlineView:child:ofItem:';
-    function outlineView_isItemExpandable(outlineView: NSOutlineView; item: id): BOOL; message 'outlineView:isItemExpandable:';
+    function outlineView_isItemExpandable(outlineView: NSOutlineView; item: id): ObjCBOOL; message 'outlineView:isItemExpandable:';
     function outlineView_numberOfChildrenOfItem(outlineView: NSOutlineView; item: id): NSInteger; message 'outlineView:numberOfChildrenOfItem:';
     function outlineView_objectValueForTableColumn_byItem(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): id; message 'outlineView:objectValueForTableColumn:byItem:';
     procedure outlineView_setObjectValue_forTableColumn_byItem(outlineView: NSOutlineView; object_: id; tableColumn: NSTableColumn; item: id); message 'outlineView:setObjectValue:forTableColumn:byItem:';
     function outlineView_itemForPersistentObject(outlineView: NSOutlineView; object_: id): id; message 'outlineView:itemForPersistentObject:';
     function outlineView_persistentObjectForItem(outlineView: NSOutlineView; item: id): id; message 'outlineView:persistentObjectForItem:';
     procedure outlineView_sortDescriptorsDidChange(outlineView: NSOutlineView; oldDescriptors: NSArray); message 'outlineView:sortDescriptorsDidChange:';
-    function outlineView_writeItems_toPasteboard(outlineView: NSOutlineView; items: NSArray; pasteboard: NSPasteboard): BOOL; message 'outlineView:writeItems:toPasteboard:';
+    function outlineView_writeItems_toPasteboard(outlineView: NSOutlineView; items: NSArray; pasteboard: NSPasteboard): ObjCBOOL; message 'outlineView:writeItems:toPasteboard:';
     function outlineView_validateDrop_proposedItem_proposedChildIndex(outlineView: NSOutlineView; info: NSDraggingInfoProtocol; item: id; index: NSInteger): NSDragOperation; message 'outlineView:validateDrop:proposedItem:proposedChildIndex:';
-    function outlineView_acceptDrop_item_childIndex(outlineView: NSOutlineView; info: NSDraggingInfoProtocol; item: id; index: NSInteger): BOOL; message 'outlineView:acceptDrop:item:childIndex:';
+    function outlineView_acceptDrop_item_childIndex(outlineView: NSOutlineView; info: NSDraggingInfoProtocol; item: id; index: NSInteger): ObjCBOOL; message 'outlineView:acceptDrop:item:childIndex:';
     function outlineView_namesOfPromisedFilesDroppedAtDestination_forDraggedItems(outlineView: NSOutlineView; dropDestination: NSURL; items: NSArray): NSArray; message 'outlineView:namesOfPromisedFilesDroppedAtDestination:forDraggedItems:';
   end;
   
@@ -233,11 +233,11 @@ var
   NSOutlineViewDelegateProtocol = objcprotocol external name 'NSOutlineViewDelegate'
   optional
     procedure outlineView_willDisplayCell_forTableColumn_item(outlineView: NSOutlineView; cell: id; tableColumn: NSTableColumn; item: id); message 'outlineView:willDisplayCell:forTableColumn:item:';
-    function outlineView_shouldEditTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): BOOL; message 'outlineView:shouldEditTableColumn:item:';
-    function selectionShouldChangeInOutlineView(outlineView: NSOutlineView): BOOL; message 'selectionShouldChangeInOutlineView:';
-    function outlineView_shouldSelectItem(outlineView: NSOutlineView; item: id): BOOL; message 'outlineView:shouldSelectItem:';
+    function outlineView_shouldEditTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): ObjCBOOL; message 'outlineView:shouldEditTableColumn:item:';
+    function selectionShouldChangeInOutlineView(outlineView: NSOutlineView): ObjCBOOL; message 'selectionShouldChangeInOutlineView:';
+    function outlineView_shouldSelectItem(outlineView: NSOutlineView; item: id): ObjCBOOL; message 'outlineView:shouldSelectItem:';
     function outlineView_selectionIndexesForProposedSelection(outlineView: NSOutlineView; proposedSelectionIndexes: NSIndexSet): NSIndexSet; message 'outlineView:selectionIndexesForProposedSelection:';
-    function outlineView_shouldSelectTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn): BOOL; message 'outlineView:shouldSelectTableColumn:';
+    function outlineView_shouldSelectTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn): ObjCBOOL; message 'outlineView:shouldSelectTableColumn:';
     procedure outlineView_mouseDownInHeaderOfTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:mouseDownInHeaderOfTableColumn:';
     procedure outlineView_didClickTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:didClickTableColumn:';
     procedure outlineView_didDragTableColumn(outlineView: NSOutlineView; tableColumn: NSTableColumn); message 'outlineView:didDragTableColumn:';
@@ -245,17 +245,17 @@ var
     function outlineView_heightOfRowByItem(outlineView: NSOutlineView; item: id): CGFloat; message 'outlineView:heightOfRowByItem:';
     function outlineView_typeSelectStringForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): NSString; message 'outlineView:typeSelectStringForTableColumn:item:';
     function outlineView_nextTypeSelectMatchFromItem_toItem_forString(outlineView: NSOutlineView; startItem: id; endItem: id; searchString: NSString): id; message 'outlineView:nextTypeSelectMatchFromItem:toItem:forString:';
-    function outlineView_shouldTypeSelectForEvent_withCurrentSearchString(outlineView: NSOutlineView; event: NSEvent; searchString: NSString): BOOL; message 'outlineView:shouldTypeSelectForEvent:withCurrentSearchString:';
-    function outlineView_shouldShowCellExpansionForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): BOOL; message 'outlineView:shouldShowCellExpansionForTableColumn:item:';
-    function outlineView_shouldTrackCell_forTableColumn_item(outlineView: NSOutlineView; cell: NSCell; tableColumn: NSTableColumn; item: id): BOOL; message 'outlineView:shouldTrackCell:forTableColumn:item:';
+    function outlineView_shouldTypeSelectForEvent_withCurrentSearchString(outlineView: NSOutlineView; event: NSEvent; searchString: NSString): ObjCBOOL; message 'outlineView:shouldTypeSelectForEvent:withCurrentSearchString:';
+    function outlineView_shouldShowCellExpansionForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): ObjCBOOL; message 'outlineView:shouldShowCellExpansionForTableColumn:item:';
+    function outlineView_shouldTrackCell_forTableColumn_item(outlineView: NSOutlineView; cell: NSCell; tableColumn: NSTableColumn; item: id): ObjCBOOL; message 'outlineView:shouldTrackCell:forTableColumn:item:';
     function outlineView_dataCellForTableColumn_item(outlineView: NSOutlineView; tableColumn: NSTableColumn; item: id): NSCell; message 'outlineView:dataCellForTableColumn:item:';
-    function outlineView_isGroupItem(outlineView: NSOutlineView; item: id): BOOL; message 'outlineView:isGroupItem:';
-    function outlineView_shouldExpandItem(outlineView: NSOutlineView; item: id): BOOL; message 'outlineView:shouldExpandItem:';
-    function outlineView_shouldCollapseItem(outlineView: NSOutlineView; item: id): BOOL; message 'outlineView:shouldCollapseItem:';
+    function outlineView_isGroupItem(outlineView: NSOutlineView; item: id): ObjCBOOL; message 'outlineView:isGroupItem:';
+    function outlineView_shouldExpandItem(outlineView: NSOutlineView; item: id): ObjCBOOL; message 'outlineView:shouldExpandItem:';
+    function outlineView_shouldCollapseItem(outlineView: NSOutlineView; item: id): ObjCBOOL; message 'outlineView:shouldCollapseItem:';
     procedure outlineView_willDisplayOutlineCell_forTableColumn_item(outlineView: NSOutlineView; cell: id; tableColumn: NSTableColumn; item: id); message 'outlineView:willDisplayOutlineCell:forTableColumn:item:';
     function outlineView_sizeToFitWidthOfColumn(outlineView: NSOutlineView; column: NSInteger): CGFloat; message 'outlineView:sizeToFitWidthOfColumn:';
-    function outlineView_shouldReorderColumn_toColumn(outlineView: NSOutlineView; columnIndex: NSInteger; newColumnIndex: NSInteger): BOOL; message 'outlineView:shouldReorderColumn:toColumn:';
-    function outlineView_shouldShowOutlineCellForItem(outlineView: NSOutlineView; item: id): BOOL; message 'outlineView:shouldShowOutlineCellForItem:';
+    function outlineView_shouldReorderColumn_toColumn(outlineView: NSOutlineView; columnIndex: NSInteger; newColumnIndex: NSInteger): ObjCBOOL; message 'outlineView:shouldReorderColumn:toColumn:';
+    function outlineView_shouldShowOutlineCellForItem(outlineView: NSOutlineView; item: id): ObjCBOOL; message 'outlineView:shouldShowOutlineCellForItem:';
   end;
 {$endif}
 {$endif}

packages/cocoaint/src/appkit/NSPanel.inc

@@ -80,12 +80,12 @@ procedure NSReleaseAlertPanel(panel: id); cdecl; external;
   NSPanel = objcclass external (NSWindow)
     
   public
-    function isFloatingPanel: BOOL; message 'isFloatingPanel';
-    procedure setFloatingPanel(flag: BOOL); message 'setFloatingPanel:';
-    function becomesKeyOnlyIfNeeded: BOOL; message 'becomesKeyOnlyIfNeeded';
-    procedure setBecomesKeyOnlyIfNeeded(flag: BOOL); message 'setBecomesKeyOnlyIfNeeded:';
-    function worksWhenModal: BOOL; message 'worksWhenModal';
-    procedure setWorksWhenModal(flag: BOOL); message 'setWorksWhenModal:';
+    function isFloatingPanel: ObjCBOOL; message 'isFloatingPanel';
+    procedure setFloatingPanel(flag: ObjCBOOL); message 'setFloatingPanel:';
+    function becomesKeyOnlyIfNeeded: ObjCBOOL; message 'becomesKeyOnlyIfNeeded';
+    procedure setBecomesKeyOnlyIfNeeded(flag: ObjCBOOL); message 'setBecomesKeyOnlyIfNeeded:';
+    function worksWhenModal: ObjCBOOL; message 'worksWhenModal';
+    procedure setWorksWhenModal(flag: ObjCBOOL); message 'setWorksWhenModal:';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSPasteboard.inc

@@ -129,19 +129,19 @@ var
     function changeCount: NSInteger; message 'changeCount';
     procedure releaseGlobally; message 'releaseGlobally';
     function clearContents: NSInteger; message 'clearContents';
-    function writeObjects(objects: NSArray): BOOL; message 'writeObjects:';
+    function writeObjects(objects: NSArray): ObjCBOOL; message 'writeObjects:';
     function readObjectsForClasses_options(classArray: NSArray; options: NSDictionary): NSArray; message 'readObjectsForClasses:options:';
     function pasteboardItems: NSArray; message 'pasteboardItems';
     function indexOfPasteboardItem(pasteboardItem: NSPasteboardItem): NSUInteger; message 'indexOfPasteboardItem:';
-    function canReadItemWithDataConformingToTypes(types_: NSArray): BOOL; message 'canReadItemWithDataConformingToTypes:';
-    function canReadObjectForClasses_options(classArray: NSArray; options: NSDictionary): BOOL; message 'canReadObjectForClasses:options:';
+    function canReadItemWithDataConformingToTypes(types_: NSArray): ObjCBOOL; message 'canReadItemWithDataConformingToTypes:';
+    function canReadObjectForClasses_options(classArray: NSArray; options: NSDictionary): ObjCBOOL; message 'canReadObjectForClasses:options:';
     function declareTypes_owner(newTypes: NSArray; newOwner: id): NSInteger; message 'declareTypes:owner:';
     function addTypes_owner(newTypes: NSArray; newOwner: id): NSInteger; message 'addTypes:owner:';
     function types: NSArray; message 'types';
     function availableTypeFromArray(types_: NSArray): NSString; message 'availableTypeFromArray:';
-    function setData_forType(data: NSData; dataType: NSString): BOOL; message 'setData:forType:';
-    function setPropertyList_forType(plist: id; dataType: NSString): BOOL; message 'setPropertyList:forType:';
-    function setString_forType(string_: NSString; dataType: NSString): BOOL; message 'setString:forType:';
+    function setData_forType(data: NSData; dataType: NSString): ObjCBOOL; message 'setData:forType:';
+    function setPropertyList_forType(plist: id; dataType: NSString): ObjCBOOL; message 'setPropertyList:forType:';
+    function setString_forType(string_: NSString; dataType: NSString): ObjCBOOL; message 'setString:forType:';
     function dataForType(dataType: NSString): NSData; message 'dataForType:';
     function propertyListForType(dataType: NSString): id; message 'propertyListForType:';
     function stringForType(dataType: NSString): NSString; message 'stringForType:';
@@ -173,9 +173,9 @@ var
 
 { NSFileContentsCategory }
   NSFileContentsCategory = objccategory external (NSPasteboard)
-    function writeFileContents(filename: NSString): BOOL; message 'writeFileContents:';
+    function writeFileContents(filename: NSString): ObjCBOOL; message 'writeFileContents:';
     function readFileContentsType_toFile(type_: NSString; filename: NSString): NSString; message 'readFileContentsType:toFile:';
-    function writeFileWrapper(wrapper: NSFileWrapper): BOOL; message 'writeFileWrapper:';
+    function writeFileWrapper(wrapper: NSFileWrapper): ObjCBOOL; message 'writeFileWrapper:';
     function readFileWrapper: NSFileWrapper; message 'readFileWrapper';
   end;
 

packages/cocoaint/src/appkit/NSPasteboardItem.inc

@@ -52,10 +52,10 @@
   public
     function types: NSArray; message 'types';
     function availableTypeFromArray(types_: NSArray): NSString; message 'availableTypeFromArray:';
-    function setDataProvider_forTypes(dataProvider: NSPasteboardItemDataProviderProtocol; types_: NSArray): BOOL; message 'setDataProvider:forTypes:';
-    function setData_forType(data: NSData; type_: NSString): BOOL; message 'setData:forType:';
-    function setString_forType(string_: NSString; type_: NSString): BOOL; message 'setString:forType:';
-    function setPropertyList_forType(propertyList: id; type_: NSString): BOOL; message 'setPropertyList:forType:';
+    function setDataProvider_forTypes(dataProvider: NSPasteboardItemDataProviderProtocol; types_: NSArray): ObjCBOOL; message 'setDataProvider:forTypes:';
+    function setData_forType(data: NSData; type_: NSString): ObjCBOOL; message 'setData:forType:';
+    function setString_forType(string_: NSString; type_: NSString): ObjCBOOL; message 'setString:forType:';
+    function setPropertyList_forType(propertyList: id; type_: NSString): ObjCBOOL; message 'setPropertyList:forType:';
     function dataForType(type_: NSString): NSData; message 'dataForType:';
     function stringForType(type_: NSString): NSString; message 'stringForType:';
     function propertyListForType(type_: NSString): id; message 'propertyListForType:';

packages/cocoaint/src/appkit/NSPathCell.inc

@@ -106,11 +106,11 @@ type
     procedure setControlSize(size: NSControlSize); message 'setControlSize:';
 
     { Adopted Protocols }
-    function panel_shouldEnableURL(sender: id; url: NSURL): BOOL;
-    function panel_validateURL_error(sender: id; url: NSURL; outError: NSErrorPointer): BOOL;
+    function panel_shouldEnableURL(sender: id; url: NSURL): ObjCBOOL;
+    function panel_validateURL_error(sender: id; url: NSURL; outError: NSErrorPointer): ObjCBOOL;
     procedure panel_didChangeToDirectoryURL(sender: id; url: NSURL);
-    function panel_userEnteredFilename_confirmed(sender: id; filename: NSString; okFlag: BOOL): NSString;
-    procedure panel_willExpand(sender: id; expanding: BOOL);
+    function panel_userEnteredFilename_confirmed(sender: id; filename: NSString; okFlag: ObjCBOOL): NSString;
+    procedure panel_willExpand(sender: id; expanding: ObjCBOOL);
     procedure panelSelectionDidChange(sender: id);
   end;
 

packages/cocoaint/src/appkit/NSPathControl.inc

@@ -63,7 +63,7 @@
     function backgroundColor: NSColor; message 'backgroundColor';
     function delegate: NSPathControlDelegateProtocol; message 'delegate';
     procedure setDelegate(delegate_: NSPathControlDelegateProtocol); message 'setDelegate:';
-    procedure setDraggingSourceOperationMask_forLocal(mask: NSDragOperation; isLocal: BOOL); message 'setDraggingSourceOperationMask:forLocal:';
+    procedure setDraggingSourceOperationMask_forLocal(mask: NSDragOperation; isLocal: ObjCBOOL); message 'setDraggingSourceOperationMask:forLocal:';
     procedure setMenu(menu_: NSMenu); message 'setMenu:';
     function menu: NSMenu; message 'menu';
   end;
@@ -77,9 +77,9 @@
 { NSPathControlDelegate Protocol }
   NSPathControlDelegateProtocol = objcprotocol external name 'NSPathControlDelegate'
   optional
-    function pathControl_shouldDragPathComponentCell_withPasteboard(pathControl: NSPathControl; pathComponentCell: NSPathComponentCell; pasteboard: NSPasteboard): BOOL; message 'pathControl:shouldDragPathComponentCell:withPasteboard:';
+    function pathControl_shouldDragPathComponentCell_withPasteboard(pathControl: NSPathControl; pathComponentCell: NSPathComponentCell; pasteboard: NSPasteboard): ObjCBOOL; message 'pathControl:shouldDragPathComponentCell:withPasteboard:';
     function pathControl_validateDrop(pathControl: NSPathControl; info: NSDraggingInfoProtocol): NSDragOperation; message 'pathControl:validateDrop:';
-    function pathControl_acceptDrop(pathControl: NSPathControl; info: NSDraggingInfoProtocol): BOOL; message 'pathControl:acceptDrop:';
+    function pathControl_acceptDrop(pathControl: NSPathControl; info: NSDraggingInfoProtocol): ObjCBOOL; message 'pathControl:acceptDrop:';
     procedure pathControl_willDisplayOpenPanel(pathControl: NSPathControl; openPanel: NSOpenPanel); message 'pathControl:willDisplayOpenPanel:';
     procedure pathControl_willPopUpMenu(pathControl: NSPathControl; menu: NSMenu); message 'pathControl:willPopUpMenu:';
   end;

packages/cocoaint/src/appkit/NSPersistentDocument.inc

@@ -54,16 +54,16 @@
     function managedObjectContext: NSManagedObjectContext; message 'managedObjectContext';
     procedure setManagedObjectContext(managedObjectContext_: NSManagedObjectContext); message 'setManagedObjectContext:';
     function managedObjectModel: id; message 'managedObjectModel';
-    function configurePersistentStoreCoordinatorForURL_ofType_modelConfiguration_storeOptions_error(url: NSURL; fileType_: NSString; configuration: NSString; storeOptions: NSDictionary; error: NSErrorPointer): BOOL; message 'configurePersistentStoreCoordinatorForURL:ofType:modelConfiguration:storeOptions:error:';
+    function configurePersistentStoreCoordinatorForURL_ofType_modelConfiguration_storeOptions_error(url: NSURL; fileType_: NSString; configuration: NSString; storeOptions: NSDictionary; error: NSErrorPointer): ObjCBOOL; message 'configurePersistentStoreCoordinatorForURL:ofType:modelConfiguration:storeOptions:error:';
     function persistentStoreTypeForFileType(fileType_: NSString): NSString; message 'persistentStoreTypeForFileType:';
-    function writeToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; error: NSErrorPointer): BOOL; message 'writeToURL:ofType:forSaveOperation:originalContentsURL:error:';
-    function readFromURL_ofType_error(absoluteURL: NSURL; typeName: NSString; error: NSErrorPointer): BOOL; message 'readFromURL:ofType:error:';
-    function revertToContentsOfURL_ofType_error(inAbsoluteURL: NSURL; inTypeName: NSString; outError: NSErrorPointer): BOOL; message 'revertToContentsOfURL:ofType:error:';
+    function writeToURL_ofType_forSaveOperation_originalContentsURL_error(absoluteURL: NSURL; typeName: NSString; saveOperation: NSSaveOperationType; absoluteOriginalContentsURL: NSURL; error: NSErrorPointer): ObjCBOOL; message 'writeToURL:ofType:forSaveOperation:originalContentsURL:error:';
+    function readFromURL_ofType_error(absoluteURL: NSURL; typeName: NSString; error: NSErrorPointer): ObjCBOOL; message 'readFromURL:ofType:error:';
+    function revertToContentsOfURL_ofType_error(inAbsoluteURL: NSURL; inTypeName: NSString; outError: NSErrorPointer): ObjCBOOL; message 'revertToContentsOfURL:ofType:error:';
   end;
 
 { NSDeprecated_NSPersistentDocumentCategory }
   NSDeprecated_NSPersistentDocumentCategory = objccategory external name 'NSDeprecated' (NSPersistentDocument)
-    function configurePersistentStoreCoordinatorForURL_ofType_error(url: NSURL; fileType_: NSString; error: NSErrorPointer): BOOL; message 'configurePersistentStoreCoordinatorForURL:ofType:error:'; deprecated 'in Mac OS X 10.5 and later';
+    function configurePersistentStoreCoordinatorForURL_ofType_error(url: NSURL; fileType_: NSString; error: NSErrorPointer): ObjCBOOL; message 'configurePersistentStoreCoordinatorForURL:ofType:error:'; deprecated 'in Mac OS X 10.5 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSPopUpButton.inc

@@ -60,13 +60,13 @@ var
     {$endif}
     
   public
-    function initWithFrame_pullsDown(buttonFrame: NSRect; flag: BOOL): id; message 'initWithFrame:pullsDown:';
+    function initWithFrame_pullsDown(buttonFrame: NSRect; flag: ObjCBOOL): id; message 'initWithFrame:pullsDown:';
     procedure setMenu(menu_: NSMenu); message 'setMenu:';
     function menu: NSMenu; message 'menu';
-    procedure setPullsDown(flag: BOOL); message 'setPullsDown:';
-    function pullsDown: BOOL; message 'pullsDown';
-    procedure setAutoenablesItems(flag: BOOL); message 'setAutoenablesItems:';
-    function autoenablesItems: BOOL; message 'autoenablesItems';
+    procedure setPullsDown(flag: ObjCBOOL); message 'setPullsDown:';
+    function pullsDown: ObjCBOOL; message 'pullsDown';
+    procedure setAutoenablesItems(flag: ObjCBOOL); message 'setAutoenablesItems:';
+    function autoenablesItems: ObjCBOOL; message 'autoenablesItems';
     procedure setPreferredEdge(edge: NSRectEdge); message 'setPreferredEdge:';
     function preferredEdge: NSRectEdge; message 'preferredEdge';
     procedure addItemWithTitle(title_: NSString); message 'addItemWithTitle:';
@@ -88,7 +88,7 @@ var
     procedure selectItem(item: NSMenuItem); message 'selectItem:';
     procedure selectItemAtIndex(index: NSInteger); message 'selectItemAtIndex:';
     procedure selectItemWithTitle(title_: NSString); message 'selectItemWithTitle:';
-    function selectItemWithTag(tag_: NSInteger): BOOL; message 'selectItemWithTag:';
+    function selectItemWithTag(tag_: NSInteger): ObjCBOOL; message 'selectItemWithTag:';
     procedure setTitle(aString: NSString); message 'setTitle:';
     function selectedItem: NSMenuItem; message 'selectedItem';
     function indexOfSelectedItem: NSInteger; message 'indexOfSelectedItem';

packages/cocoaint/src/appkit/NSPopUpButtonCell.inc

@@ -83,19 +83,19 @@ var
     {$endif}
     
   public
-    function initTextCell_pullsDown(stringValue_: NSString; pullDown: BOOL): id; message 'initTextCell:pullsDown:';
+    function initTextCell_pullsDown(stringValue_: NSString; pullDown: ObjCBOOL): id; message 'initTextCell:pullsDown:';
     procedure setMenu(menu_: NSMenu); message 'setMenu:';
     function menu: NSMenu; message 'menu';
-    procedure setPullsDown(flag: BOOL); message 'setPullsDown:';
-    function pullsDown: BOOL; message 'pullsDown';
-    procedure setAutoenablesItems(flag: BOOL); message 'setAutoenablesItems:';
-    function autoenablesItems: BOOL; message 'autoenablesItems';
+    procedure setPullsDown(flag: ObjCBOOL); message 'setPullsDown:';
+    function pullsDown: ObjCBOOL; message 'pullsDown';
+    procedure setAutoenablesItems(flag: ObjCBOOL); message 'setAutoenablesItems:';
+    function autoenablesItems: ObjCBOOL; message 'autoenablesItems';
     procedure setPreferredEdge(edge: NSRectEdge); message 'setPreferredEdge:';
     function preferredEdge: NSRectEdge; message 'preferredEdge';
-    procedure setUsesItemFromMenu(flag: BOOL); message 'setUsesItemFromMenu:';
-    function usesItemFromMenu: BOOL; message 'usesItemFromMenu';
-    procedure setAltersStateOfSelectedItem(flag: BOOL); message 'setAltersStateOfSelectedItem:';
-    function altersStateOfSelectedItem: BOOL; message 'altersStateOfSelectedItem';
+    procedure setUsesItemFromMenu(flag: ObjCBOOL); message 'setUsesItemFromMenu:';
+    function usesItemFromMenu: ObjCBOOL; message 'usesItemFromMenu';
+    procedure setAltersStateOfSelectedItem(flag: ObjCBOOL); message 'setAltersStateOfSelectedItem:';
+    function altersStateOfSelectedItem: ObjCBOOL; message 'altersStateOfSelectedItem';
     procedure addItemWithTitle(title_: NSString); message 'addItemWithTitle:';
     procedure addItemsWithTitles(itemTitles_: NSArray); message 'addItemsWithTitles:';
     procedure insertItemWithTitle_atIndex(title_: NSString; index: NSInteger); message 'insertItemWithTitle:atIndex:';
@@ -115,7 +115,7 @@ var
     procedure selectItem(item: NSMenuItem); message 'selectItem:';
     procedure selectItemAtIndex(index: NSInteger); message 'selectItemAtIndex:';
     procedure selectItemWithTitle(title_: NSString); message 'selectItemWithTitle:';
-    function selectItemWithTag(tag_: NSInteger): BOOL; message 'selectItemWithTag:';
+    function selectItemWithTag(tag_: NSInteger): ObjCBOOL; message 'selectItemWithTag:';
     procedure setTitle(aString: NSString); message 'setTitle:';
     function selectedItem: NSMenuItem; message 'selectedItem';
     function indexOfSelectedItem: NSInteger; message 'indexOfSelectedItem';

packages/cocoaint/src/appkit/NSPrintInfo.inc

@@ -127,10 +127,10 @@ var
     function rightMargin: CGFloat; message 'rightMargin';
     function topMargin: CGFloat; message 'topMargin';
     function bottomMargin: CGFloat; message 'bottomMargin';
-    procedure setHorizontallyCentered(flag: BOOL); message 'setHorizontallyCentered:';
-    procedure setVerticallyCentered(flag: BOOL); message 'setVerticallyCentered:';
-    function isHorizontallyCentered: BOOL; message 'isHorizontallyCentered';
-    function isVerticallyCentered: BOOL; message 'isVerticallyCentered';
+    procedure setHorizontallyCentered(flag: ObjCBOOL); message 'setHorizontallyCentered:';
+    procedure setVerticallyCentered(flag: ObjCBOOL); message 'setVerticallyCentered:';
+    function isHorizontallyCentered: ObjCBOOL; message 'isHorizontallyCentered';
+    function isVerticallyCentered: ObjCBOOL; message 'isVerticallyCentered';
     procedure setHorizontalPagination(mode: NSPrintingPaginationMode); message 'setHorizontalPagination:';
     procedure setVerticalPagination(mode: NSPrintingPaginationMode); message 'setVerticalPagination:';
     function horizontalPagination: NSPrintingPaginationMode; message 'horizontalPagination';
@@ -149,8 +149,8 @@ var
     function PMPrintSettings: Pointer; message 'PMPrintSettings';
     procedure updateFromPMPageFormat; message 'updateFromPMPageFormat';
     procedure updateFromPMPrintSettings; message 'updateFromPMPrintSettings';
-    procedure setSelectionOnly(selectionOnly: BOOL); message 'setSelectionOnly:';
-    function isSelectionOnly: BOOL; message 'isSelectionOnly';
+    procedure setSelectionOnly(selectionOnly: ObjCBOOL); message 'setSelectionOnly:';
+    function isSelectionOnly: ObjCBOOL; message 'isSelectionOnly';
 
     { Adopted Protocols }
     function copyWithZone(zone_: NSZonePtr): id;

packages/cocoaint/src/appkit/NSPrintOperation.inc

@@ -70,21 +70,21 @@ var
     class function EPSOperationWithView_insideRect_toData(view_: NSView; rect: NSRect; data: NSMutableData): NSPrintOperation; message 'EPSOperationWithView:insideRect:toData:';
     class function currentOperation: NSPrintOperation; message 'currentOperation';
     class procedure setCurrentOperation(operation: NSPrintOperation); message 'setCurrentOperation:';
-    function isCopyingOperation: BOOL; message 'isCopyingOperation';
+    function isCopyingOperation: ObjCBOOL; message 'isCopyingOperation';
     procedure setJobTitle(jobTitle_: NSString); message 'setJobTitle:';
     function jobTitle: NSString; message 'jobTitle';
-    procedure setShowsPrintPanel(flag: BOOL); message 'setShowsPrintPanel:';
-    function showsPrintPanel: BOOL; message 'showsPrintPanel';
-    procedure setShowsProgressPanel(flag: BOOL); message 'setShowsProgressPanel:';
-    function showsProgressPanel: BOOL; message 'showsProgressPanel';
+    procedure setShowsPrintPanel(flag: ObjCBOOL); message 'setShowsPrintPanel:';
+    function showsPrintPanel: ObjCBOOL; message 'showsPrintPanel';
+    procedure setShowsProgressPanel(flag: ObjCBOOL); message 'setShowsProgressPanel:';
+    function showsProgressPanel: ObjCBOOL; message 'showsProgressPanel';
     procedure setPrintPanel(panel: NSPrintPanel); message 'setPrintPanel:';
     function printPanel: NSPrintPanel; message 'printPanel';
-    procedure setCanSpawnSeparateThread(canSpawnSeparateThread_: BOOL); message 'setCanSpawnSeparateThread:';
-    function canSpawnSeparateThread: BOOL; message 'canSpawnSeparateThread';
+    procedure setCanSpawnSeparateThread(canSpawnSeparateThread_: ObjCBOOL); message 'setCanSpawnSeparateThread:';
+    function canSpawnSeparateThread: ObjCBOOL; message 'canSpawnSeparateThread';
     procedure setPageOrder(pageOrder_: NSPrintingPageOrder); message 'setPageOrder:';
     function pageOrder: NSPrintingPageOrder; message 'pageOrder';
     procedure runOperationModalForWindow_delegate_didRunSelector_contextInfo(docWindow: NSWindow; delegate: id; didRunSelector: SEL; contextInfo: Pointer); message 'runOperationModalForWindow:delegate:didRunSelector:contextInfo:';
-    function runOperation: BOOL; message 'runOperation';
+    function runOperation: ObjCBOOL; message 'runOperation';
     function view: NSView; message 'view';
     function printInfo: NSPrintInfo; message 'printInfo';
     procedure setPrintInfo(printInfo_: NSPrintInfo); message 'setPrintInfo:';
@@ -93,7 +93,7 @@ var
     function currentPage: NSInteger; message 'currentPage';
     function createContext: NSGraphicsContext; message 'createContext';
     procedure destroyContext; message 'destroyContext';
-    function deliverResult: BOOL; message 'deliverResult';
+    function deliverResult: ObjCBOOL; message 'deliverResult';
     procedure cleanUpOperation; message 'cleanUpOperation';
   end;
 
@@ -103,8 +103,8 @@ var
     function accessoryView: NSView; message 'accessoryView'; deprecated 'in Mac OS X 10.5 and later';
     procedure setJobStyleHint(hint: NSString); message 'setJobStyleHint:'; deprecated 'in Mac OS X 10.5 and later';
     function jobStyleHint: NSString; message 'jobStyleHint'; deprecated 'in Mac OS X 10.5 and later';
-    procedure setShowPanels(flag: BOOL); message 'setShowPanels:'; deprecated 'in Mac OS X 10.4 and later';
-    function showPanels: BOOL; message 'showPanels'; deprecated 'in Mac OS X 10.4 and later';
+    procedure setShowPanels(flag: ObjCBOOL); message 'setShowPanels:'; deprecated 'in Mac OS X 10.4 and later';
+    function showPanels: ObjCBOOL; message 'showPanels'; deprecated 'in Mac OS X 10.4 and later';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSPrinter.inc

@@ -76,8 +76,8 @@ type
     function languageLevel: NSInteger; message 'languageLevel';
     function pageSizeForPaper(paperName: NSString): NSSize; message 'pageSizeForPaper:';
     function statusForTable(tableName: NSString): NSPrinterTableStatus; message 'statusForTable:';
-    function isKey_inTable(key: NSString; table: NSString): BOOL; message 'isKey:inTable:';
-    function BOOLForKey_inTable(key: NSString; table: NSString): BOOL; message 'BOOLForKey:inTable:';
+    function isKey_inTable(key: NSString; table: NSString): ObjCBOOL; message 'isKey:inTable:';
+    function ObjCBOOLForKey_inTable(key: NSString; table: NSString): ObjCBOOL; message 'ObjCBOOLForKey:inTable:';
     function floatForKey_inTable(key: NSString; table: NSString): single; message 'floatForKey:inTable:';
     function intForKey_inTable(key: NSString; table: NSString): cint; message 'intForKey:inTable:';
     function rectForKey_inTable(key: NSString; table: NSString): NSRect; message 'rectForKey:inTable:';
@@ -95,11 +95,11 @@ type
 { NSDeprecated_NSPrinterCategory }
   NSDeprecated_NSPrinterCategory = objccategory external name 'NSDeprecated' (NSPrinter)
     function imageRectForPaper(paperName: NSString): NSRect; message 'imageRectForPaper:'; deprecated 'in Mac OS X 10.2 and later';
-    function acceptsBinary: BOOL; message 'acceptsBinary'; deprecated 'in Mac OS X 10.2 and later';
-    function isColor: BOOL; message 'isColor'; deprecated 'in Mac OS X 10.2 and later';
-    function isFontAvailable(faceName: NSString): BOOL; message 'isFontAvailable:'; deprecated 'in Mac OS X 10.2 and later';
-    function isOutputStackInReverseOrder: BOOL; message 'isOutputStackInReverseOrder'; deprecated 'in Mac OS X 10.2 and later';
-    class function printerWithName_domain_includeUnavailable(name_: NSString; domain_: NSString; flag: BOOL): NSPrinter; message 'printerWithName:domain:includeUnavailable:'; deprecated 'in Mac OS X 10.2 and later';
+    function acceptsBinary: ObjCBOOL; message 'acceptsBinary'; deprecated 'in Mac OS X 10.2 and later';
+    function isColor: ObjCBOOL; message 'isColor'; deprecated 'in Mac OS X 10.2 and later';
+    function isFontAvailable(faceName: NSString): ObjCBOOL; message 'isFontAvailable:'; deprecated 'in Mac OS X 10.2 and later';
+    function isOutputStackInReverseOrder: ObjCBOOL; message 'isOutputStackInReverseOrder'; deprecated 'in Mac OS X 10.2 and later';
+    class function printerWithName_domain_includeUnavailable(name_: NSString; domain_: NSString; flag: ObjCBOOL): NSPrinter; message 'printerWithName:domain:includeUnavailable:'; deprecated 'in Mac OS X 10.2 and later';
     function domain: NSString; message 'domain'; deprecated 'in Mac OS X 10.2 and later';
     function host: NSString; message 'host'; deprecated 'in Mac OS X 10.2 and later';
     function note: NSString; message 'note'; deprecated 'in Mac OS X 10.2 and later';

packages/cocoaint/src/appkit/NSProgressIndicator.inc

@@ -64,9 +64,9 @@ const
 { NSProgressIndicator }
   NSProgressIndicator = objcclass external (NSView)
   private
-    _isBezeled: BOOL;
-    _isIndeterminate: BOOL;
-    _threadedAnimation: BOOL;
+    _isBezeled: ObjCBOOL;
+    _isIndeterminate: ObjCBOOL;
+    _threadedAnimation: ObjCBOOL;
     _minimum: double;
     _maximum: double;
     _value: double;
@@ -102,10 +102,10 @@ const
     _NSProgressIndicatorReserved1: id;
     
   public
-    function isIndeterminate: BOOL; message 'isIndeterminate';
-    procedure setIndeterminate(flag: BOOL); message 'setIndeterminate:';
-    function isBezeled: BOOL; message 'isBezeled';
-    procedure setBezeled(flag: BOOL); message 'setBezeled:';
+    function isIndeterminate: ObjCBOOL; message 'isIndeterminate';
+    procedure setIndeterminate(flag: ObjCBOOL); message 'setIndeterminate:';
+    function isBezeled: ObjCBOOL; message 'isBezeled';
+    procedure setBezeled(flag: ObjCBOOL); message 'setBezeled:';
     function controlTint: NSControlTint; message 'controlTint';
     procedure setControlTint(tint: NSControlTint); message 'setControlTint:';
     function controlSize: NSControlSize; message 'controlSize';
@@ -117,15 +117,15 @@ const
     function maxValue: double; message 'maxValue';
     procedure setMinValue(newMinimum: double); message 'setMinValue:';
     procedure setMaxValue(newMaximum: double); message 'setMaxValue:';
-    function usesThreadedAnimation: BOOL; message 'usesThreadedAnimation';
-    procedure setUsesThreadedAnimation(threadedAnimation: BOOL); message 'setUsesThreadedAnimation:';
+    function usesThreadedAnimation: ObjCBOOL; message 'usesThreadedAnimation';
+    procedure setUsesThreadedAnimation(threadedAnimation: ObjCBOOL); message 'setUsesThreadedAnimation:';
     procedure startAnimation(sender: id); message 'startAnimation:';
     procedure stopAnimation(sender: id); message 'stopAnimation:';
     procedure setStyle(style_: NSProgressIndicatorStyle); message 'setStyle:';
     function style: NSProgressIndicatorStyle; message 'style';
     procedure sizeToFit; message 'sizeToFit';
-    function isDisplayedWhenStopped: BOOL; message 'isDisplayedWhenStopped';
-    procedure setDisplayedWhenStopped(isDisplayed: BOOL); message 'setDisplayedWhenStopped:';
+    function isDisplayedWhenStopped: ObjCBOOL; message 'isDisplayedWhenStopped';
+    procedure setDisplayedWhenStopped(isDisplayed: ObjCBOOL); message 'setDisplayedWhenStopped:';
   end;
 
 { NSProgressIndicatorDeprecatedCategory }

packages/cocoaint/src/appkit/NSQuickDrawView.inc

@@ -44,7 +44,7 @@
   private
     _qdPort: Pointer;
     _savePort: Pointer;
-    _synchToView: BOOL;
+    _synchToView: ObjCBOOL;
     
   public
     function qdPort: Pointer; message 'qdPort'; deprecated 'in Mac OS X 10.4 and later';

packages/cocoaint/src/appkit/NSResponder.inc

@@ -47,8 +47,8 @@
   public
     function nextResponder: NSResponder; message 'nextResponder';
     procedure setNextResponder(aResponder: NSResponder); message 'setNextResponder:';
-    function tryToPerform_with(anAction: SEL; anObject: id): BOOL; message 'tryToPerform:with:';
-    function performKeyEquivalent(theEvent: NSEvent): BOOL; message 'performKeyEquivalent:';
+    function tryToPerform_with(anAction: SEL; anObject: id): ObjCBOOL; message 'tryToPerform:with:';
+    function performKeyEquivalent(theEvent: NSEvent): ObjCBOOL; message 'performKeyEquivalent:';
     function validRequestorForSendType_returnType(sendType: NSString; returnType: NSString): id; message 'validRequestorForSendType:returnType:';
     procedure mouseDown(theEvent: NSEvent); message 'mouseDown:';
     procedure rightMouseDown(theEvent: NSEvent); message 'rightMouseDown:';
@@ -79,16 +79,16 @@
     procedure touchesEndedWithEvent(event: NSEvent); message 'touchesEndedWithEvent:';
     procedure touchesCancelledWithEvent(event: NSEvent); message 'touchesCancelledWithEvent:';
     procedure noResponderFor(eventSelector: SEL); message 'noResponderFor:';
-    function acceptsFirstResponder: BOOL; message 'acceptsFirstResponder';
-    function becomeFirstResponder: BOOL; message 'becomeFirstResponder';
-    function resignFirstResponder: BOOL; message 'resignFirstResponder';
+    function acceptsFirstResponder: ObjCBOOL; message 'acceptsFirstResponder';
+    function becomeFirstResponder: ObjCBOOL; message 'becomeFirstResponder';
+    function resignFirstResponder: ObjCBOOL; message 'resignFirstResponder';
     procedure interpretKeyEvents(eventArray: NSArray); message 'interpretKeyEvents:';
     procedure flushBufferedKeyEvents; message 'flushBufferedKeyEvents';
     procedure setMenu(menu_: NSMenu); message 'setMenu:';
     function menu: NSMenu; message 'menu';
     procedure showContextHelp(sender: id); message 'showContextHelp:';
     procedure helpRequested(eventPtr: NSEvent); message 'helpRequested:';
-    function shouldBeTreatedAsInkEvent(theEvent: NSEvent): BOOL; message 'shouldBeTreatedAsInkEvent:';
+    function shouldBeTreatedAsInkEvent(theEvent: NSEvent): ObjCBOOL; message 'shouldBeTreatedAsInkEvent:';
 
     { Adopted Protocols }
     procedure encodeWithCoder(aCoder: NSCoder);
@@ -97,7 +97,7 @@
 
 { NSKeyboardUICategory }
   NSKeyboardUICategory = objccategory external (NSResponder)
-    function performMnemonic(theString: NSString): BOOL; message 'performMnemonic:';
+    function performMnemonic(theString: NSString): ObjCBOOL; message 'performMnemonic:';
   end;
 
 { NSStandardKeyBindingMethodsCategory }
@@ -206,7 +206,7 @@
 { NSErrorPresentationCategory }
   NSErrorPresentationCategory = objccategory external (NSResponder)
     procedure presentError_modalForWindow_delegate_didPresentSelector_contextInfo(error: NSError; window: NSWindow; delegate: id; didPresentSelector: SEL; contextInfo: Pointer); message 'presentError:modalForWindow:delegate:didPresentSelector:contextInfo:';
-    function presentError(error: NSError): BOOL; message 'presentError:';
+    function presentError(error: NSError): ObjCBOOL; message 'presentError:';
     function willPresentError(error: NSError): NSError; message 'willPresentError:';
   end;
 

packages/cocoaint/src/appkit/NSRuleEditor.inc

@@ -133,10 +133,10 @@ var
     function nestingMode: NSRuleEditorNestingMode; message 'nestingMode';
     procedure setRowHeight(height: CGFloat); message 'setRowHeight:';
     function rowHeight: CGFloat; message 'rowHeight';
-    procedure setEditable(editable: BOOL); message 'setEditable:';
-    function isEditable: BOOL; message 'isEditable';
-    procedure setCanRemoveAllRows(val: BOOL); message 'setCanRemoveAllRows:';
-    function canRemoveAllRows: BOOL; message 'canRemoveAllRows';
+    procedure setEditable(editable: ObjCBOOL); message 'setEditable:';
+    function isEditable: ObjCBOOL; message 'isEditable';
+    procedure setCanRemoveAllRows(val: ObjCBOOL); message 'setCanRemoveAllRows:';
+    function canRemoveAllRows: ObjCBOOL; message 'canRemoveAllRows';
     function predicate: NSPredicate; message 'predicate';
     procedure reloadPredicate; message 'reloadPredicate';
     function predicateForRow(row: NSInteger): NSPredicate; message 'predicateForRow:';
@@ -148,12 +148,12 @@ var
     function rowTypeForRow(rowIndex: NSInteger): NSRuleEditorRowType; message 'rowTypeForRow:';
     function parentRowForRow(rowIndex: NSInteger): NSInteger; message 'parentRowForRow:';
     procedure addRow(sender: id); message 'addRow:';
-    procedure insertRowAtIndex_withType_asSubrowOfRow_animate(rowIndex: NSInteger; rowType: NSRuleEditorRowType; parentRow: NSInteger; shouldAnimate: BOOL); message 'insertRowAtIndex:withType:asSubrowOfRow:animate:';
+    procedure insertRowAtIndex_withType_asSubrowOfRow_animate(rowIndex: NSInteger; rowType: NSRuleEditorRowType; parentRow: NSInteger; shouldAnimate: ObjCBOOL); message 'insertRowAtIndex:withType:asSubrowOfRow:animate:';
     procedure setCriteria_andDisplayValues_forRowAtIndex(criteria: NSArray; values: NSArray; rowIndex: NSInteger); message 'setCriteria:andDisplayValues:forRowAtIndex:';
     procedure removeRowAtIndex(rowIndex: NSInteger); message 'removeRowAtIndex:';
-    procedure removeRowsAtIndexes_includeSubrows(rowIndexes: NSIndexSet; includeSubrows: BOOL); message 'removeRowsAtIndexes:includeSubrows:';
+    procedure removeRowsAtIndexes_includeSubrows(rowIndexes: NSIndexSet; includeSubrows: ObjCBOOL); message 'removeRowsAtIndexes:includeSubrows:';
     function selectedRowIndexes: NSIndexSet; message 'selectedRowIndexes';
-    procedure selectRowIndexes_byExtendingSelection(indexes: NSIndexSet; extend: BOOL); message 'selectRowIndexes:byExtendingSelection:';
+    procedure selectRowIndexes_byExtendingSelection(indexes: NSIndexSet; extend: ObjCBOOL); message 'selectRowIndexes:byExtendingSelection:';
     procedure setRowClass(rowClass_: Pobjc_class); message 'setRowClass:';
     function rowClass: Pobjc_class; message 'rowClass';
     procedure setRowTypeKeyPath(keyPath: NSString); message 'setRowTypeKeyPath:';

packages/cocoaint/src/appkit/NSRulerMarker.inc

@@ -69,17 +69,17 @@
     function image: NSImage; message 'image';
     procedure setImageOrigin(imageOrigin_: NSPoint); message 'setImageOrigin:';
     function imageOrigin: NSPoint; message 'imageOrigin';
-    procedure setMovable(flag: BOOL); message 'setMovable:';
-    procedure setRemovable(flag: BOOL); message 'setRemovable:';
-    function isMovable: BOOL; message 'isMovable';
-    function isRemovable: BOOL; message 'isRemovable';
-    function isDragging: BOOL; message 'isDragging';
+    procedure setMovable(flag: ObjCBOOL); message 'setMovable:';
+    procedure setRemovable(flag: ObjCBOOL); message 'setRemovable:';
+    function isMovable: ObjCBOOL; message 'isMovable';
+    function isRemovable: ObjCBOOL; message 'isRemovable';
+    function isDragging: ObjCBOOL; message 'isDragging';
     procedure setRepresentedObject(representedObject_: NSCopyingProtocol); message 'setRepresentedObject:';
     function representedObject: NSCopyingProtocol; message 'representedObject';
     function imageRectInRuler: NSRect; message 'imageRectInRuler';
     function thicknessRequiredInRuler: CGFloat; message 'thicknessRequiredInRuler';
     procedure drawRect(rect: NSRect); message 'drawRect:';
-    function trackMouse_adding(mouseDownEvent: NSEvent; isAdding: BOOL): BOOL; message 'trackMouse:adding:';
+    function trackMouse_adding(mouseDownEvent: NSEvent; isAdding: ObjCBOOL): ObjCBOOL; message 'trackMouse:adding:';
 
     { Adopted Protocols }
     function copyWithZone(zone_: NSZonePtr): id;

packages/cocoaint/src/appkit/NSRulerView.inc

@@ -94,24 +94,24 @@ type
     procedure addMarker(marker: NSRulerMarker); message 'addMarker:';
     procedure removeMarker(marker: NSRulerMarker); message 'removeMarker:';
     function markers: NSArray; message 'markers';
-    function trackMarker_withMouseEvent(marker: NSRulerMarker; event: NSEvent): BOOL; message 'trackMarker:withMouseEvent:';
+    function trackMarker_withMouseEvent(marker: NSRulerMarker; event: NSEvent): ObjCBOOL; message 'trackMarker:withMouseEvent:';
     procedure setAccessoryView(accessory: NSView); message 'setAccessoryView:';
     function accessoryView: NSView; message 'accessoryView';
     procedure moveRulerlineFromLocation_toLocation(oldLocation: CGFloat; newLocation: CGFloat); message 'moveRulerlineFromLocation:toLocation:';
     procedure invalidateHashMarks; message 'invalidateHashMarks';
     procedure drawHashMarksAndLabelsInRect(rect: NSRect); message 'drawHashMarksAndLabelsInRect:';
     procedure drawMarkersInRect(rect: NSRect); message 'drawMarkersInRect:';
-    function isFlipped: BOOL; message 'isFlipped';
+    function isFlipped: ObjCBOOL; message 'isFlipped';
   end;
 
 { NSRulerMarkerClientViewDelegationCategory }
   NSRulerMarkerClientViewDelegationCategory = objccategory external (NSView)
-    function rulerView_shouldMoveMarker(ruler: NSRulerView; marker: NSRulerMarker): BOOL; message 'rulerView:shouldMoveMarker:';
+    function rulerView_shouldMoveMarker(ruler: NSRulerView; marker: NSRulerMarker): ObjCBOOL; message 'rulerView:shouldMoveMarker:';
     function rulerView_willMoveMarker_toLocation(ruler: NSRulerView; marker: NSRulerMarker; location: CGFloat): CGFloat; message 'rulerView:willMoveMarker:toLocation:';
     procedure rulerView_didMoveMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didMoveMarker:';
-    function rulerView_shouldRemoveMarker(ruler: NSRulerView; marker: NSRulerMarker): BOOL; message 'rulerView:shouldRemoveMarker:';
+    function rulerView_shouldRemoveMarker(ruler: NSRulerView; marker: NSRulerMarker): ObjCBOOL; message 'rulerView:shouldRemoveMarker:';
     procedure rulerView_didRemoveMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didRemoveMarker:';
-    function rulerView_shouldAddMarker(ruler: NSRulerView; marker: NSRulerMarker): BOOL; message 'rulerView:shouldAddMarker:';
+    function rulerView_shouldAddMarker(ruler: NSRulerView; marker: NSRulerMarker): ObjCBOOL; message 'rulerView:shouldAddMarker:';
     function rulerView_willAddMarker_atLocation(ruler: NSRulerView; marker: NSRulerMarker; location: CGFloat): CGFloat; message 'rulerView:willAddMarker:atLocation:';
     procedure rulerView_didAddMarker(ruler: NSRulerView; marker: NSRulerMarker); message 'rulerView:didAddMarker:';
     procedure rulerView_handleMouseDown(ruler: NSRulerView; event: NSEvent); message 'rulerView:handleMouseDown:';

packages/cocoaint/src/appkit/NSRunningApplication.inc

@@ -95,10 +95,10 @@ type
     _appReserved: id;
     
   public
-    function isTerminated: BOOL; message 'isTerminated';
-    function isFinishedLaunching: BOOL; message 'isFinishedLaunching';
-    function isHidden: BOOL; message 'isHidden';
-    function isActive: BOOL; message 'isActive';
+    function isTerminated: ObjCBOOL; message 'isTerminated';
+    function isFinishedLaunching: ObjCBOOL; message 'isFinishedLaunching';
+    function isHidden: ObjCBOOL; message 'isHidden';
+    function isActive: ObjCBOOL; message 'isActive';
     function activationPolicy: NSApplicationActivationPolicy; message 'activationPolicy';
     function localizedName: NSString; message 'localizedName';
     function bundleIdentifier: NSString; message 'bundleIdentifier';
@@ -108,11 +108,11 @@ type
     function launchDate: NSDate; message 'launchDate';
     function icon: NSImage; message 'icon';
     function executableArchitecture: NSInteger; message 'executableArchitecture';
-    function hide: BOOL; message 'hide';
-    function unhide: BOOL; message 'unhide';
-    function activateWithOptions(options: NSApplicationActivationOptions): BOOL; message 'activateWithOptions:';
-    function terminate: BOOL; message 'terminate';
-    function forceTerminate: BOOL; message 'forceTerminate';
+    function hide: ObjCBOOL; message 'hide';
+    function unhide: ObjCBOOL; message 'unhide';
+    function activateWithOptions(options: NSApplicationActivationOptions): ObjCBOOL; message 'activateWithOptions:';
+    function terminate: ObjCBOOL; message 'terminate';
+    function forceTerminate: ObjCBOOL; message 'forceTerminate';
     class function runningApplicationsWithBundleIdentifier(bundleIdentifier_: NSString): NSArray; message 'runningApplicationsWithBundleIdentifier:';
     class function runningApplicationWithProcessIdentifier(pid: pid_t): NSRunningApplication; message 'runningApplicationWithProcessIdentifier:';
     class function currentApplication: NSRunningApplication; message 'currentApplication';

packages/cocoaint/src/appkit/NSSavePanel.inc

@@ -113,21 +113,21 @@ __SPFlagsPtr = ^__SPFlags;
     procedure setDirectoryURL(url_: NSURL); message 'setDirectoryURL:';
     function allowedFileTypes: NSArray; message 'allowedFileTypes';
     procedure setAllowedFileTypes(types: NSArray); message 'setAllowedFileTypes:';
-    function allowsOtherFileTypes: BOOL; message 'allowsOtherFileTypes';
-    procedure setAllowsOtherFileTypes(flag: BOOL); message 'setAllowsOtherFileTypes:';
+    function allowsOtherFileTypes: ObjCBOOL; message 'allowsOtherFileTypes';
+    procedure setAllowsOtherFileTypes(flag: ObjCBOOL); message 'setAllowsOtherFileTypes:';
     function accessoryView: NSView; message 'accessoryView';
     procedure setAccessoryView(view: NSView); message 'setAccessoryView:';
     function delegate: NSOpenSavePanelDelegateProtocol; message 'delegate';
     procedure setDelegate(delegate_: NSOpenSavePanelDelegateProtocol); message 'setDelegate:';
-    function isExpanded: BOOL; message 'isExpanded';
-    function canCreateDirectories: BOOL; message 'canCreateDirectories';
-    procedure setCanCreateDirectories(flag: BOOL); message 'setCanCreateDirectories:';
-    function canSelectHiddenExtension: BOOL; message 'canSelectHiddenExtension';
-    procedure setCanSelectHiddenExtension(flag: BOOL); message 'setCanSelectHiddenExtension:';
-    function isExtensionHidden: BOOL; message 'isExtensionHidden';
-    procedure setExtensionHidden(flag: BOOL); message 'setExtensionHidden:';
-    function treatsFilePackagesAsDirectories: BOOL; message 'treatsFilePackagesAsDirectories';
-    procedure setTreatsFilePackagesAsDirectories(flag: BOOL); message 'setTreatsFilePackagesAsDirectories:';
+    function isExpanded: ObjCBOOL; message 'isExpanded';
+    function canCreateDirectories: ObjCBOOL; message 'canCreateDirectories';
+    procedure setCanCreateDirectories(flag: ObjCBOOL); message 'setCanCreateDirectories:';
+    function canSelectHiddenExtension: ObjCBOOL; message 'canSelectHiddenExtension';
+    procedure setCanSelectHiddenExtension(flag: ObjCBOOL); message 'setCanSelectHiddenExtension:';
+    function isExtensionHidden: ObjCBOOL; message 'isExtensionHidden';
+    procedure setExtensionHidden(flag: ObjCBOOL); message 'setExtensionHidden:';
+    function treatsFilePackagesAsDirectories: ObjCBOOL; message 'treatsFilePackagesAsDirectories';
+    procedure setTreatsFilePackagesAsDirectories(flag: ObjCBOOL); message 'setTreatsFilePackagesAsDirectories:';
     function prompt: NSString; message 'prompt';
     procedure setPrompt(prompt_: NSString); message 'setPrompt:';
     function title: NSString; message 'title';
@@ -139,8 +139,8 @@ __SPFlagsPtr = ^__SPFlags;
     function message: NSString; message 'message';
     procedure setMessage(message_: NSString); message 'setMessage:';
     procedure validateVisibleColumns; message 'validateVisibleColumns';
-    function showsHiddenFiles: BOOL; message 'showsHiddenFiles';
-    procedure setShowsHiddenFiles(flag: BOOL); message 'setShowsHiddenFiles:';
+    function showsHiddenFiles: ObjCBOOL; message 'showsHiddenFiles';
+    procedure setShowsHiddenFiles(flag: ObjCBOOL); message 'setShowsHiddenFiles:';
     procedure ok(sender: id); message 'ok:';
     procedure cancel(sender: id); message 'cancel:';
     function runModal: NSInteger; message 'runModal';
@@ -148,9 +148,9 @@ __SPFlagsPtr = ^__SPFlags;
 
 { NSSavePanelDelegateDeprecatedCategory }
   NSSavePanelDelegateDeprecatedCategory = objccategory external (NSObject)
-    function panel_isValidFilename(sender: id; filename: NSString): BOOL; message 'panel:isValidFilename:';
+    function panel_isValidFilename(sender: id; filename: NSString): ObjCBOOL; message 'panel:isValidFilename:';
     procedure panel_directoryDidChange(sender: id; path: NSString); message 'panel:directoryDidChange:';
-    function panel_shouldShowFilename(sender: id; filename: NSString): BOOL; message 'panel:shouldShowFilename:';
+    function panel_shouldShowFilename(sender: id; filename: NSString): ObjCBOOL; message 'panel:shouldShowFilename:';
   end;
 
 { NSDeprecated_NSSavePanelCategory }
@@ -174,11 +174,11 @@ __SPFlagsPtr = ^__SPFlags;
 { NSOpenSavePanelDelegate Protocol }
   NSOpenSavePanelDelegateProtocol = objcprotocol external name 'NSOpenSavePanelDelegate'
   optional
-    function panel_shouldEnableURL(sender: id; url: NSURL): BOOL; message 'panel:shouldEnableURL:';
-    function panel_validateURL_error(sender: id; url: NSURL; outError: NSErrorPointer): BOOL; message 'panel:validateURL:error:';
+    function panel_shouldEnableURL(sender: id; url: NSURL): ObjCBOOL; message 'panel:shouldEnableURL:';
+    function panel_validateURL_error(sender: id; url: NSURL; outError: NSErrorPointer): ObjCBOOL; message 'panel:validateURL:error:';
     procedure panel_didChangeToDirectoryURL(sender: id; url: NSURL); message 'panel:didChangeToDirectoryURL:';
-    function panel_userEnteredFilename_confirmed(sender: id; filename: NSString; okFlag: BOOL): NSString; message 'panel:userEnteredFilename:confirmed:';
-    procedure panel_willExpand(sender: id; expanding: BOOL); message 'panel:willExpand:';
+    function panel_userEnteredFilename_confirmed(sender: id; filename: NSString; okFlag: ObjCBOOL): NSString; message 'panel:userEnteredFilename:confirmed:';
+    procedure panel_willExpand(sender: id; expanding: ObjCBOOL); message 'panel:willExpand:';
     procedure panelSelectionDidChange(sender: id); message 'panelSelectionDidChange:';
   end;
 {$endif}

packages/cocoaint/src/appkit/NSScrollView.inc

@@ -106,8 +106,8 @@ __SFlagsPtr = ^__SFlags;
     _verticalRuler: NSRulerView;
     
   public
-    class function frameSizeForContentSize_hasHorizontalScroller_hasVerticalScroller_borderType(cSize: NSSize; hFlag: BOOL; vFlag: BOOL; aType: NSBorderType): NSSize; message 'frameSizeForContentSize:hasHorizontalScroller:hasVerticalScroller:borderType:';
-    class function contentSizeForFrameSize_hasHorizontalScroller_hasVerticalScroller_borderType(fSize: NSSize; hFlag: BOOL; vFlag: BOOL; aType: NSBorderType): NSSize; message 'contentSizeForFrameSize:hasHorizontalScroller:hasVerticalScroller:borderType:';
+    class function frameSizeForContentSize_hasHorizontalScroller_hasVerticalScroller_borderType(cSize: NSSize; hFlag: ObjCBOOL; vFlag: ObjCBOOL; aType: NSBorderType): NSSize; message 'frameSizeForContentSize:hasHorizontalScroller:hasVerticalScroller:borderType:';
+    class function contentSizeForFrameSize_hasHorizontalScroller_hasVerticalScroller_borderType(fSize: NSSize; hFlag: ObjCBOOL; vFlag: ObjCBOOL; aType: NSBorderType): NSSize; message 'contentSizeForFrameSize:hasHorizontalScroller:hasVerticalScroller:borderType:';
     function documentVisibleRect: NSRect; message 'documentVisibleRect';
     function contentSize: NSSize; message 'contentSize';
     procedure setDocumentView(aView: NSView); message 'setDocumentView:';
@@ -120,18 +120,18 @@ __SFlagsPtr = ^__SFlags;
     function borderType: NSBorderType; message 'borderType';
     procedure setBackgroundColor(color: NSColor); message 'setBackgroundColor:';
     function backgroundColor: NSColor; message 'backgroundColor';
-    procedure setDrawsBackground(flag: BOOL); message 'setDrawsBackground:';
-    function drawsBackground: BOOL; message 'drawsBackground';
-    procedure setHasVerticalScroller(flag: BOOL); message 'setHasVerticalScroller:';
-    function hasVerticalScroller: BOOL; message 'hasVerticalScroller';
-    procedure setHasHorizontalScroller(flag: BOOL); message 'setHasHorizontalScroller:';
-    function hasHorizontalScroller: BOOL; message 'hasHorizontalScroller';
+    procedure setDrawsBackground(flag: ObjCBOOL); message 'setDrawsBackground:';
+    function drawsBackground: ObjCBOOL; message 'drawsBackground';
+    procedure setHasVerticalScroller(flag: ObjCBOOL); message 'setHasVerticalScroller:';
+    function hasVerticalScroller: ObjCBOOL; message 'hasVerticalScroller';
+    procedure setHasHorizontalScroller(flag: ObjCBOOL); message 'setHasHorizontalScroller:';
+    function hasHorizontalScroller: ObjCBOOL; message 'hasHorizontalScroller';
     procedure setVerticalScroller(anObject: NSScroller); message 'setVerticalScroller:';
     function verticalScroller: NSScroller; message 'verticalScroller';
     procedure setHorizontalScroller(anObject: NSScroller); message 'setHorizontalScroller:';
     function horizontalScroller: NSScroller; message 'horizontalScroller';
-    function autohidesScrollers: BOOL; message 'autohidesScrollers';
-    procedure setAutohidesScrollers(flag: BOOL); message 'setAutohidesScrollers:';
+    function autohidesScrollers: ObjCBOOL; message 'autohidesScrollers';
+    procedure setAutohidesScrollers(flag: ObjCBOOL); message 'setAutohidesScrollers:';
     procedure setHorizontalLineScroll(value: CGFloat); message 'setHorizontalLineScroll:';
     procedure setVerticalLineScroll(value: CGFloat); message 'setVerticalLineScroll:';
     procedure setLineScroll(value: CGFloat); message 'setLineScroll:';
@@ -144,8 +144,8 @@ __SFlagsPtr = ^__SFlags;
     function horizontalPageScroll: CGFloat; message 'horizontalPageScroll';
     function verticalPageScroll: CGFloat; message 'verticalPageScroll';
     function pageScroll: CGFloat; message 'pageScroll';
-    procedure setScrollsDynamically(flag: BOOL); message 'setScrollsDynamically:';
-    function scrollsDynamically: BOOL; message 'scrollsDynamically';
+    procedure setScrollsDynamically(flag: ObjCBOOL); message 'setScrollsDynamically:';
+    function scrollsDynamically: ObjCBOOL; message 'scrollsDynamically';
     procedure tile; message 'tile';
     procedure reflectScrolledClipView(cView: NSClipView); message 'reflectScrolledClipView:';
     procedure scrollWheel(theEvent: NSEvent); message 'scrollWheel:';
@@ -155,12 +155,12 @@ __SFlagsPtr = ^__SFlags;
   NSRulerSupportCategory = objccategory external (NSScrollView)
     class procedure setRulerViewClass(rulerViewClass_: Pobjc_class); message 'setRulerViewClass:';
     class function rulerViewClass: Pobjc_class; message 'rulerViewClass';
-    procedure setRulersVisible(flag: BOOL); message 'setRulersVisible:';
-    function rulersVisible: BOOL; message 'rulersVisible';
-    procedure setHasHorizontalRuler(flag: BOOL); message 'setHasHorizontalRuler:';
-    function hasHorizontalRuler: BOOL; message 'hasHorizontalRuler';
-    procedure setHasVerticalRuler(flag: BOOL); message 'setHasVerticalRuler:';
-    function hasVerticalRuler: BOOL; message 'hasVerticalRuler';
+    procedure setRulersVisible(flag: ObjCBOOL); message 'setRulersVisible:';
+    function rulersVisible: ObjCBOOL; message 'rulersVisible';
+    procedure setHasHorizontalRuler(flag: ObjCBOOL); message 'setHasHorizontalRuler:';
+    function hasHorizontalRuler: ObjCBOOL; message 'hasHorizontalRuler';
+    procedure setHasVerticalRuler(flag: ObjCBOOL); message 'setHasVerticalRuler:';
+    function hasVerticalRuler: ObjCBOOL; message 'hasVerticalRuler';
     procedure setHorizontalRulerView(ruler: NSRulerView); message 'setHorizontalRulerView:';
     function horizontalRulerView: NSRulerView; message 'horizontalRulerView';
     procedure setVerticalRulerView(ruler: NSRulerView); message 'setVerticalRulerView:';

packages/cocoaint/src/appkit/NSScroller.inc

@@ -131,10 +131,10 @@ type
     function controlTint: NSControlTint; message 'controlTint';
     procedure setControlSize(controlSize_: NSControlSize); message 'setControlSize:';
     function controlSize: NSControlSize; message 'controlSize';
-    procedure drawArrow_highlight(whichArrow: NSScrollerArrow; flag: BOOL); message 'drawArrow:highlight:';
+    procedure drawArrow_highlight(whichArrow: NSScrollerArrow; flag: ObjCBOOL); message 'drawArrow:highlight:';
     procedure drawKnob; message 'drawKnob';
-    procedure drawKnobSlotInRect_highlight(slotRect: NSRect; flag: BOOL); message 'drawKnobSlotInRect:highlight:';
-    procedure highlight(flag: BOOL); message 'highlight:';
+    procedure drawKnobSlotInRect_highlight(slotRect: NSRect; flag: ObjCBOOL); message 'drawKnobSlotInRect:highlight:';
+    procedure highlight(flag: ObjCBOOL); message 'highlight:';
     function testPart(thePoint: NSPoint): NSScrollerPart; message 'testPart:';
     procedure trackKnob(theEvent: NSEvent); message 'trackKnob:';
     procedure trackScrollButtons(theEvent: NSEvent); message 'trackScrollButtons:';

packages/cocoaint/src/appkit/NSSearchFieldCell.inc

@@ -90,16 +90,16 @@ const
     function cancelButtonRectForBounds(rect: NSRect): NSRect; message 'cancelButtonRectForBounds:';
     procedure setSearchMenuTemplate(menu_: NSMenu); message 'setSearchMenuTemplate:';
     function searchMenuTemplate: NSMenu; message 'searchMenuTemplate';
-    procedure setSendsWholeSearchString(flag: BOOL); message 'setSendsWholeSearchString:';
-    function sendsWholeSearchString: BOOL; message 'sendsWholeSearchString';
+    procedure setSendsWholeSearchString(flag: ObjCBOOL); message 'setSendsWholeSearchString:';
+    function sendsWholeSearchString: ObjCBOOL; message 'sendsWholeSearchString';
     procedure setMaximumRecents(maxRecents: NSInteger); message 'setMaximumRecents:';
     function maximumRecents: NSInteger; message 'maximumRecents';
     procedure setRecentSearches(searches: NSArray); message 'setRecentSearches:';
     function recentSearches: NSArray; message 'recentSearches';
     procedure setRecentsAutosaveName(string_: NSString); message 'setRecentsAutosaveName:';
     function recentsAutosaveName: NSString; message 'recentsAutosaveName';
-    function sendsSearchStringImmediately: BOOL; message 'sendsSearchStringImmediately';
-    procedure setSendsSearchStringImmediately(flag: BOOL); message 'setSendsSearchStringImmediately:';
+    function sendsSearchStringImmediately: ObjCBOOL; message 'sendsSearchStringImmediately';
+    procedure setSendsSearchStringImmediately(flag: ObjCBOOL); message 'setSendsSearchStringImmediately:';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSSecureTextField.inc

@@ -51,11 +51,11 @@
 { NSSecureTextFieldCell }
   NSSecureTextFieldCell = objcclass external (NSTextFieldCell)
   private
-    _echosBullets: BOOL;
+    _echosBullets: ObjCBOOL;
     
   public
-    procedure setEchosBullets(flag: BOOL); message 'setEchosBullets:';
-    function echosBullets: BOOL; message 'echosBullets';
+    procedure setEchosBullets(flag: ObjCBOOL); message 'setEchosBullets:';
+    function echosBullets: ObjCBOOL; message 'echosBullets';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSSegmentedControl.inc

@@ -68,7 +68,7 @@ type
     function segmentCount: NSInteger; message 'segmentCount';
     procedure setSelectedSegment(selectedSegment_: NSInteger); message 'setSelectedSegment:';
     function selectedSegment: NSInteger; message 'selectedSegment';
-    function selectSegmentWithTag(tag_: NSInteger): BOOL; message 'selectSegmentWithTag:';
+    function selectSegmentWithTag(tag_: NSInteger): ObjCBOOL; message 'selectSegmentWithTag:';
     procedure setWidth_forSegment(width: CGFloat; segment: NSInteger); message 'setWidth:forSegment:';
     function widthForSegment(segment: NSInteger): CGFloat; message 'widthForSegment:';
     procedure setImage_forSegment(image: NSImage; segment: NSInteger); message 'setImage:forSegment:';
@@ -79,10 +79,10 @@ type
     function labelForSegment(segment: NSInteger): NSString; message 'labelForSegment:';
     procedure setMenu_forSegment(menu_: NSMenu; segment: NSInteger); message 'setMenu:forSegment:';
     function menuForSegment(segment: NSInteger): NSMenu; message 'menuForSegment:';
-    procedure setSelected_forSegment(selected: BOOL; segment: NSInteger); message 'setSelected:forSegment:';
-    function isSelectedForSegment(segment: NSInteger): BOOL; message 'isSelectedForSegment:';
-    procedure setEnabled_forSegment(enabled: BOOL; segment: NSInteger); message 'setEnabled:forSegment:';
-    function isEnabledForSegment(segment: NSInteger): BOOL; message 'isEnabledForSegment:';
+    procedure setSelected_forSegment(selected: ObjCBOOL; segment: NSInteger); message 'setSelected:forSegment:';
+    function isSelectedForSegment(segment: NSInteger): ObjCBOOL; message 'isSelectedForSegment:';
+    procedure setEnabled_forSegment(enabled: ObjCBOOL; segment: NSInteger); message 'setEnabled:forSegment:';
+    function isEnabledForSegment(segment: NSInteger): ObjCBOOL; message 'isEnabledForSegment:';
     procedure setSegmentStyle(segmentStyle_: NSSegmentStyle); message 'setSegmentStyle:';
     function segmentStyle: NSSegmentStyle; message 'segmentStyle';
   end;

packages/cocoaint/src/appkit/NSSlider.inc

@@ -62,7 +62,7 @@
     procedure setImage(backgroundImage: NSImage); message 'setImage:';
     function image: NSImage; message 'image';
     function isVertical: NSInteger; message 'isVertical';
-    function acceptsFirstMouse(theEvent: NSEvent): BOOL; message 'acceptsFirstMouse:';
+    function acceptsFirstMouse(theEvent: NSEvent): ObjCBOOL; message 'acceptsFirstMouse:';
   end;
 
 { NSTickMarkSupport_NSSliderCategory }
@@ -71,8 +71,8 @@
     function numberOfTickMarks: NSInteger; message 'numberOfTickMarks';
     procedure setTickMarkPosition(position: NSTickMarkPosition); message 'setTickMarkPosition:';
     function tickMarkPosition: NSTickMarkPosition; message 'tickMarkPosition';
-    procedure setAllowsTickMarkValuesOnly(yorn: BOOL); message 'setAllowsTickMarkValuesOnly:';
-    function allowsTickMarkValuesOnly: BOOL; message 'allowsTickMarkValuesOnly';
+    procedure setAllowsTickMarkValuesOnly(yorn: ObjCBOOL); message 'setAllowsTickMarkValuesOnly:';
+    function allowsTickMarkValuesOnly: ObjCBOOL; message 'allowsTickMarkValuesOnly';
     function tickMarkValueAtIndex(index: NSInteger): double; message 'tickMarkValueAtIndex:';
     function rectOfTickMarkAtIndex(index: NSInteger): NSRect; message 'rectOfTickMarkAtIndex:';
     function indexOfTickMarkAtPoint(point: NSPoint): NSInteger; message 'indexOfTickMarkAtPoint:';

packages/cocoaint/src/appkit/NSSliderCell.inc

@@ -86,7 +86,7 @@ type
       end;
     
   public
-    class function prefersTrackingUntilMouseUp: BOOL; message 'prefersTrackingUntilMouseUp';
+    class function prefersTrackingUntilMouseUp: ObjCBOOL; message 'prefersTrackingUntilMouseUp';
     function minValue: double; message 'minValue';
     procedure setMinValue(aDouble: double); message 'setMinValue:';
     function maxValue: double; message 'maxValue';
@@ -104,9 +104,9 @@ type
     function titleCell: id; message 'titleCell';
     procedure setKnobThickness(aFloat: CGFloat); message 'setKnobThickness:';
     function knobThickness: CGFloat; message 'knobThickness';
-    function knobRectFlipped(flipped: BOOL): NSRect; message 'knobRectFlipped:';
+    function knobRectFlipped(flipped: ObjCBOOL): NSRect; message 'knobRectFlipped:';
     procedure drawKnob(knobRect: NSRect); message 'drawKnob:';
-    procedure drawBarInside_flipped(aRect: NSRect; flipped: BOOL); message 'drawBarInside:flipped:';
+    procedure drawBarInside_flipped(aRect: NSRect; flipped: ObjCBOOL); message 'drawBarInside:flipped:';
     function trackRect: NSRect; message 'trackRect';
     procedure setSliderType(sliderType_: NSSliderType); message 'setSliderType:';
     function sliderType: NSSliderType; message 'sliderType';
@@ -118,8 +118,8 @@ type
     function numberOfTickMarks: NSInteger; message 'numberOfTickMarks';
     procedure setTickMarkPosition(position: NSTickMarkPosition); message 'setTickMarkPosition:';
     function tickMarkPosition: NSTickMarkPosition; message 'tickMarkPosition';
-    procedure setAllowsTickMarkValuesOnly(yorn: BOOL); message 'setAllowsTickMarkValuesOnly:';
-    function allowsTickMarkValuesOnly: BOOL; message 'allowsTickMarkValuesOnly';
+    procedure setAllowsTickMarkValuesOnly(yorn: ObjCBOOL); message 'setAllowsTickMarkValuesOnly:';
+    function allowsTickMarkValuesOnly: ObjCBOOL; message 'allowsTickMarkValuesOnly';
     function tickMarkValueAtIndex(index: NSInteger): double; message 'tickMarkValueAtIndex:';
     function rectOfTickMarkAtIndex(index: NSInteger): NSRect; message 'rectOfTickMarkAtIndex:';
     function indexOfTickMarkAtPoint(point: NSPoint): NSInteger; message 'indexOfTickMarkAtPoint:';

packages/cocoaint/src/appkit/NSSound.inc

@@ -54,20 +54,20 @@ var
     
   public
     class function soundNamed(name_: NSString): id; message 'soundNamed:';
-    function initWithContentsOfURL_byReference(url: NSURL; byRef: BOOL): id; message 'initWithContentsOfURL:byReference:';
-    function initWithContentsOfFile_byReference(path: NSString; byRef: BOOL): id; message 'initWithContentsOfFile:byReference:';
+    function initWithContentsOfURL_byReference(url: NSURL; byRef: ObjCBOOL): id; message 'initWithContentsOfURL:byReference:';
+    function initWithContentsOfFile_byReference(path: NSString; byRef: ObjCBOOL): id; message 'initWithContentsOfFile:byReference:';
     function initWithData(data: NSData): id; message 'initWithData:';
-    function setName(string_: NSString): BOOL; message 'setName:';
+    function setName(string_: NSString): ObjCBOOL; message 'setName:';
     function name: NSString; message 'name';
-    class function canInitWithPasteboard(pasteboard: NSPasteboard): BOOL; message 'canInitWithPasteboard:';
+    class function canInitWithPasteboard(pasteboard: NSPasteboard): ObjCBOOL; message 'canInitWithPasteboard:';
     class function soundUnfilteredTypes: NSArray; message 'soundUnfilteredTypes';
     function initWithPasteboard(pasteboard: NSPasteboard): id; message 'initWithPasteboard:';
     procedure writeToPasteboard(pasteboard: NSPasteboard); message 'writeToPasteboard:';
-    function play: BOOL; message 'play';
-    function pause: BOOL; message 'pause';
-    function resume: BOOL; message 'resume';
-    function stop: BOOL; message 'stop';
-    function isPlaying: BOOL; message 'isPlaying';
+    function play: ObjCBOOL; message 'play';
+    function pause: ObjCBOOL; message 'pause';
+    function resume: ObjCBOOL; message 'resume';
+    function stop: ObjCBOOL; message 'stop';
+    function isPlaying: ObjCBOOL; message 'isPlaying';
     function delegate: NSSoundDelegateProtocol; message 'delegate';
     procedure setDelegate(aDelegate: NSSoundDelegateProtocol); message 'setDelegate:';
     function duration: NSTimeInterval; message 'duration';
@@ -75,8 +75,8 @@ var
     function volume: single; message 'volume';
     function currentTime: NSTimeInterval; message 'currentTime';
     procedure setCurrentTime(seconds: NSTimeInterval); message 'setCurrentTime:';
-    procedure setLoops(val: BOOL); message 'setLoops:';
-    function loops: BOOL; message 'loops';
+    procedure setLoops(val: ObjCBOOL); message 'setLoops:';
+    function loops: ObjCBOOL; message 'loops';
     procedure setPlaybackDeviceIdentifier(deviceUID: NSString); message 'setPlaybackDeviceIdentifier:';
     function playbackDeviceIdentifier: NSString; message 'playbackDeviceIdentifier';
     procedure setChannelMapping(channelMapping_: NSArray); message 'setChannelMapping:';
@@ -103,7 +103,7 @@ var
 { NSSoundDelegate Protocol }
   NSSoundDelegateProtocol = objcprotocol external name 'NSSoundDelegate'
   optional
-    procedure sound_didFinishPlaying(sound: NSSound; aBool: BOOL); message 'sound:didFinishPlaying:';
+    procedure sound_didFinishPlaying(sound: NSSound; aBool: ObjCBOOL); message 'sound:didFinishPlaying:';
   end;
 {$endif}
 {$endif}

packages/cocoaint/src/appkit/NSSpeechRecognizer.inc

@@ -55,10 +55,10 @@
     procedure setCommands(commands_: NSArray); message 'setCommands:';
     function displayedCommandsTitle: NSString; message 'displayedCommandsTitle';
     procedure setDisplayedCommandsTitle(title: NSString); message 'setDisplayedCommandsTitle:';
-    function listensInForegroundOnly: BOOL; message 'listensInForegroundOnly';
-    procedure setListensInForegroundOnly(flag: BOOL); message 'setListensInForegroundOnly:';
-    function blocksOtherRecognizers: BOOL; message 'blocksOtherRecognizers';
-    procedure setBlocksOtherRecognizers(flag: BOOL); message 'setBlocksOtherRecognizers:';
+    function listensInForegroundOnly: ObjCBOOL; message 'listensInForegroundOnly';
+    procedure setListensInForegroundOnly(flag: ObjCBOOL); message 'setListensInForegroundOnly:';
+    function blocksOtherRecognizers: ObjCBOOL; message 'blocksOtherRecognizers';
+    procedure setBlocksOtherRecognizers(flag: ObjCBOOL); message 'setBlocksOtherRecognizers:';
   end;
 
 {$endif}

packages/cocoaint/src/appkit/NSSpeechSynthesizer.inc

@@ -118,9 +118,9 @@ var
     
   public
     function initWithVoice(voice_: NSString): id; message 'initWithVoice:';
-    function startSpeakingString(string_: NSString): BOOL; message 'startSpeakingString:';
-    function startSpeakingString_toURL(string_: NSString; url: NSURL): BOOL; message 'startSpeakingString:toURL:';
-    function isSpeaking: BOOL; message 'isSpeaking';
+    function startSpeakingString(string_: NSString): ObjCBOOL; message 'startSpeakingString:';
+    function startSpeakingString_toURL(string_: NSString; url: NSURL): ObjCBOOL; message 'startSpeakingString:toURL:';
+    function isSpeaking: ObjCBOOL; message 'isSpeaking';
     procedure stopSpeaking; message 'stopSpeaking';
     procedure stopSpeakingAtBoundary(boundary: NSSpeechBoundary); message 'stopSpeakingAtBoundary:';
     procedure pauseSpeakingAtBoundary(boundary: NSSpeechBoundary); message 'pauseSpeakingAtBoundary:';
@@ -128,18 +128,18 @@ var
     function delegate: NSSpeechSynthesizerDelegateProtocol; message 'delegate';
     procedure setDelegate(anObject: NSSpeechSynthesizerDelegateProtocol); message 'setDelegate:';
     function voice: NSString; message 'voice';
-    function setVoice(voice_: NSString): BOOL; message 'setVoice:';
+    function setVoice(voice_: NSString): ObjCBOOL; message 'setVoice:';
     function rate: single; message 'rate';
     procedure setRate(rate_: single); message 'setRate:';
     function volume: single; message 'volume';
     procedure setVolume(volume_: single); message 'setVolume:';
-    function usesFeedbackWindow: BOOL; message 'usesFeedbackWindow';
-    procedure setUsesFeedbackWindow(flag: BOOL); message 'setUsesFeedbackWindow:';
+    function usesFeedbackWindow: ObjCBOOL; message 'usesFeedbackWindow';
+    procedure setUsesFeedbackWindow(flag: ObjCBOOL); message 'setUsesFeedbackWindow:';
     procedure addSpeechDictionary(speechDictionary: NSDictionary); message 'addSpeechDictionary:';
     function phonemesFromText(text: NSString): NSString; message 'phonemesFromText:';
     function objectForProperty_error(property_: NSString; outError: NSErrorPointer): id; message 'objectForProperty:error:';
-    function setObject_forProperty_error(object_: id; property_: NSString; outError: NSErrorPointer): BOOL; message 'setObject:forProperty:error:';
-    class function isAnyApplicationSpeaking: BOOL; message 'isAnyApplicationSpeaking';
+    function setObject_forProperty_error(object_: id; property_: NSString; outError: NSErrorPointer): ObjCBOOL; message 'setObject:forProperty:error:';
+    class function isAnyApplicationSpeaking: ObjCBOOL; message 'isAnyApplicationSpeaking';
     class function defaultVoice: NSString; message 'defaultVoice';
     class function availableVoices: NSArray; message 'availableVoices';
     class function attributesForVoice(voice_: NSString): NSDictionary; message 'attributesForVoice:';
@@ -154,7 +154,7 @@ var
 { NSSpeechSynthesizerDelegate Protocol }
   NSSpeechSynthesizerDelegateProtocol = objcprotocol external name 'NSSpeechSynthesizerDelegate'
   optional
-    procedure speechSynthesizer_didFinishSpeaking(sender: NSSpeechSynthesizer; finishedSpeaking: BOOL); message 'speechSynthesizer:didFinishSpeaking:';
+    procedure speechSynthesizer_didFinishSpeaking(sender: NSSpeechSynthesizer; finishedSpeaking: ObjCBOOL); message 'speechSynthesizer:didFinishSpeaking:';
     procedure speechSynthesizer_willSpeakWord_ofString(sender: NSSpeechSynthesizer; characterRange: NSRange; string_: NSString); message 'speechSynthesizer:willSpeakWord:ofString:';
     procedure speechSynthesizer_willSpeakPhoneme(sender: NSSpeechSynthesizer; phonemeOpcode: cshort); message 'speechSynthesizer:willSpeakPhoneme:';
     procedure speechSynthesizer_didEncounterErrorAtIndex_ofString_message(sender: NSSpeechSynthesizer; characterIndex: NSUInteger; string_: NSString; message: NSString); message 'speechSynthesizer:didEncounterErrorAtIndex:ofString:message:';

packages/cocoaint/src/appkit/NSSpellChecker.inc

@@ -94,12 +94,12 @@ var
     
   public
     class function sharedSpellChecker: NSSpellChecker; message 'sharedSpellChecker';
-    class function sharedSpellCheckerExists: BOOL; message 'sharedSpellCheckerExists';
+    class function sharedSpellCheckerExists: ObjCBOOL; message 'sharedSpellCheckerExists';
     class function uniqueSpellDocumentTag: NSInteger; message 'uniqueSpellDocumentTag';
-    function checkSpellingOfString_startingAt_language_wrap_inSpellDocumentWithTag_wordCount(stringToCheck: NSString; startingOffset: NSInteger; language_: NSString; wrapFlag: BOOL; tag: NSInteger; wordCount: NSIntegerPtr): NSRange; message 'checkSpellingOfString:startingAt:language:wrap:inSpellDocumentWithTag:wordCount:';
+    function checkSpellingOfString_startingAt_language_wrap_inSpellDocumentWithTag_wordCount(stringToCheck: NSString; startingOffset: NSInteger; language_: NSString; wrapFlag: ObjCBOOL; tag: NSInteger; wordCount: NSIntegerPtr): NSRange; message 'checkSpellingOfString:startingAt:language:wrap:inSpellDocumentWithTag:wordCount:';
     function checkSpellingOfString_startingAt(stringToCheck: NSString; startingOffset: NSInteger): NSRange; message 'checkSpellingOfString:startingAt:';
     function countWordsInString_language(stringToCount: NSString; language_: NSString): NSInteger; message 'countWordsInString:language:';
-    function checkGrammarOfString_startingAt_language_wrap_inSpellDocumentWithTag_details(stringToCheck: NSString; startingOffset: NSInteger; language_: NSString; wrapFlag: BOOL; tag: NSInteger; details: NSArrayPointer): NSRange; message 'checkGrammarOfString:startingAt:language:wrap:inSpellDocumentWithTag:details:';
+    function checkGrammarOfString_startingAt_language_wrap_inSpellDocumentWithTag_details(stringToCheck: NSString; startingOffset: NSInteger; language_: NSString; wrapFlag: ObjCBOOL; tag: NSInteger; details: NSArrayPointer): NSRange; message 'checkGrammarOfString:startingAt:language:wrap:inSpellDocumentWithTag:details:';
     function checkString_range_types_options_inSpellDocumentWithTag_orthography_wordCount(stringToCheck: NSString; range: NSRange; checkingTypes: NSTextCheckingTypes; options: NSDictionary; tag: NSInteger; orthography: NSOrthographyPointer; wordCount: NSIntegerPtr): NSArray; message 'checkString:range:types:options:inSpellDocumentWithTag:orthography:wordCount:';
     function menuForResult_string_options_atLocation_inView(result_: NSTextCheckingResult; checkedString: NSString; options: NSDictionary; location: NSPoint; view: NSView): NSMenu; message 'menuForResult:string:options:atLocation:inView:';
     function userQuotesArrayForLanguage(language_: NSString): NSArray; message 'userQuotesArrayForLanguage:';
@@ -121,13 +121,13 @@ var
     procedure closeSpellDocumentWithTag(tag: NSInteger); message 'closeSpellDocumentWithTag:';
     function availableLanguages: NSArray; message 'availableLanguages';
     function userPreferredLanguages: NSArray; message 'userPreferredLanguages';
-    function automaticallyIdentifiesLanguages: BOOL; message 'automaticallyIdentifiesLanguages';
-    procedure setAutomaticallyIdentifiesLanguages(flag: BOOL); message 'setAutomaticallyIdentifiesLanguages:';
+    function automaticallyIdentifiesLanguages: ObjCBOOL; message 'automaticallyIdentifiesLanguages';
+    procedure setAutomaticallyIdentifiesLanguages(flag: ObjCBOOL); message 'setAutomaticallyIdentifiesLanguages:';
     function language: NSString; message 'language';
-    function setLanguage(language_: NSString): BOOL; message 'setLanguage:';
+    function setLanguage(language_: NSString): ObjCBOOL; message 'setLanguage:';
     procedure setWordFieldStringValue(aString: NSString); message 'setWordFieldStringValue:';
     procedure learnWord(word: NSString); message 'learnWord:';
-    function hasLearnedWord(word: NSString): BOOL; message 'hasLearnedWord:';
+    function hasLearnedWord(word: NSString): ObjCBOOL; message 'hasLearnedWord:';
     procedure unlearnWord(word: NSString); message 'unlearnWord:';
   end;
 

packages/cocoaint/src/appkit/NSSplitView.inc

@@ -63,8 +63,8 @@ var
     _variables: id;
     
   public
-    procedure setVertical(flag: BOOL); message 'setVertical:';
-    function isVertical: BOOL; message 'isVertical';
+    procedure setVertical(flag: ObjCBOOL); message 'setVertical:';
+    function isVertical: ObjCBOOL; message 'isVertical';
     procedure setDividerStyle(dividerStyle_: NSSplitViewDividerStyle); message 'setDividerStyle:';
     function dividerStyle: NSSplitViewDividerStyle; message 'dividerStyle';
     procedure setAutosaveName(autosaveName_: NSString); message 'setAutosaveName:';
@@ -75,7 +75,7 @@ var
     function dividerColor: NSColor; message 'dividerColor';
     function dividerThickness: CGFloat; message 'dividerThickness';
     procedure adjustSubviews; message 'adjustSubviews';
-    function isSubviewCollapsed(subview: NSView): BOOL; message 'isSubviewCollapsed:';
+    function isSubviewCollapsed(subview: NSView): ObjCBOOL; message 'isSubviewCollapsed:';
     function minPossiblePositionOfDividerAtIndex(dividerIndex: NSInteger): CGFloat; message 'minPossiblePositionOfDividerAtIndex:';
     function maxPossiblePositionOfDividerAtIndex(dividerIndex: NSInteger): CGFloat; message 'maxPossiblePositionOfDividerAtIndex:';
     procedure setPosition_ofDividerAtIndex(position: CGFloat; dividerIndex: NSInteger); message 'setPosition:ofDividerAtIndex:';
@@ -83,8 +83,8 @@ var
 
 { NSDeprecated_NSSplitViewCategory }
   NSDeprecated_NSSplitViewCategory = objccategory external name 'NSDeprecated' (NSSplitView)
-    procedure setIsPaneSplitter(flag: BOOL); message 'setIsPaneSplitter:'; deprecated 'in Mac OS X 10.6 and later';
-    function isPaneSplitter: BOOL; message 'isPaneSplitter'; deprecated 'in Mac OS X 10.6 and later';
+    procedure setIsPaneSplitter(flag: ObjCBOOL); message 'setIsPaneSplitter:'; deprecated 'in Mac OS X 10.6 and later';
+    function isPaneSplitter: ObjCBOOL; message 'isPaneSplitter'; deprecated 'in Mac OS X 10.6 and later';
   end;
 
 {$endif}
@@ -96,14 +96,14 @@ var
 { NSSplitViewDelegate Protocol }
   NSSplitViewDelegateProtocol = objcprotocol external name 'NSSplitViewDelegate'
   optional
-    function splitView_canCollapseSubview(splitView: NSSplitView; subview: NSView): BOOL; message 'splitView:canCollapseSubview:';
-    function splitView_shouldCollapseSubview_forDoubleClickOnDividerAtIndex(splitView: NSSplitView; subview: NSView; dividerIndex: NSInteger): BOOL; message 'splitView:shouldCollapseSubview:forDoubleClickOnDividerAtIndex:';
+    function splitView_canCollapseSubview(splitView: NSSplitView; subview: NSView): ObjCBOOL; message 'splitView:canCollapseSubview:';
+    function splitView_shouldCollapseSubview_forDoubleClickOnDividerAtIndex(splitView: NSSplitView; subview: NSView; dividerIndex: NSInteger): ObjCBOOL; message 'splitView:shouldCollapseSubview:forDoubleClickOnDividerAtIndex:';
     function splitView_constrainMinCoordinate_ofSubviewAt(splitView: NSSplitView; proposedMinimumPosition: CGFloat; dividerIndex: NSInteger): CGFloat; message 'splitView:constrainMinCoordinate:ofSubviewAt:';
     function splitView_constrainMaxCoordinate_ofSubviewAt(splitView: NSSplitView; proposedMaximumPosition: CGFloat; dividerIndex: NSInteger): CGFloat; message 'splitView:constrainMaxCoordinate:ofSubviewAt:';
     function splitView_constrainSplitPosition_ofSubviewAt(splitView: NSSplitView; proposedPosition: CGFloat; dividerIndex: NSInteger): CGFloat; message 'splitView:constrainSplitPosition:ofSubviewAt:';
     procedure splitView_resizeSubviewsWithOldSize(splitView: NSSplitView; oldSize: NSSize); message 'splitView:resizeSubviewsWithOldSize:';
-    function splitView_shouldAdjustSizeOfSubview(splitView: NSSplitView; view: NSView): BOOL; message 'splitView:shouldAdjustSizeOfSubview:';
-    function splitView_shouldHideDividerAtIndex(splitView: NSSplitView; dividerIndex: NSInteger): BOOL; message 'splitView:shouldHideDividerAtIndex:';
+    function splitView_shouldAdjustSizeOfSubview(splitView: NSSplitView; view: NSView): ObjCBOOL; message 'splitView:shouldAdjustSizeOfSubview:';
+    function splitView_shouldHideDividerAtIndex(splitView: NSSplitView; dividerIndex: NSInteger): ObjCBOOL; message 'splitView:shouldHideDividerAtIndex:';
     function splitView_effectiveRect_forDrawnRect_ofDividerAtIndex(splitView: NSSplitView; proposedEffectiveRect: NSRect; drawnRect: NSRect; dividerIndex: NSInteger): NSRect; message 'splitView:effectiveRect:forDrawnRect:ofDividerAtIndex:';
     function splitView_additionalEffectiveRectOfDividerAtIndex(splitView: NSSplitView; dividerIndex: NSInteger): NSRect; message 'splitView:additionalEffectiveRectOfDividerAtIndex:';
     procedure splitViewWillResizeSubviews(notification: NSNotification); message 'splitViewWillResizeSubviews:';

packages/cocoaint/src/appkit/NSStatusBar.inc

@@ -56,7 +56,7 @@ const
     class function systemStatusBar: NSStatusBar; message 'systemStatusBar';
     function statusItemWithLength(length: CGFloat): NSStatusItem; message 'statusItemWithLength:';
     procedure removeStatusItem(item: NSStatusItem); message 'removeStatusItem:';
-    function isVertical: BOOL; message 'isVertical';
+    function isVertical: ObjCBOOL; message 'isVertical';
     function thickness: CGFloat; message 'thickness';
   end;
 

packages/cocoaint/src/appkit/NSStatusItem.inc

@@ -90,15 +90,15 @@
     procedure setAlternateImage(image_: NSImage); message 'setAlternateImage:';
     function menu: NSMenu; message 'menu';
     procedure setMenu(menu_: NSMenu); message 'setMenu:';
-    function isEnabled: BOOL; message 'isEnabled';
-    procedure setEnabled(enabled: BOOL); message 'setEnabled:';
+    function isEnabled: ObjCBOOL; message 'isEnabled';
+    procedure setEnabled(enabled: ObjCBOOL); message 'setEnabled:';
     function toolTip: NSString; message 'toolTip';
     procedure setToolTip(toolTip_: NSString); message 'setToolTip:';
-    procedure setHighlightMode(highlightMode_: BOOL); message 'setHighlightMode:';
-    function highlightMode: BOOL; message 'highlightMode';
+    procedure setHighlightMode(highlightMode_: ObjCBOOL); message 'setHighlightMode:';
+    function highlightMode: ObjCBOOL; message 'highlightMode';
     function sendActionOn(mask: NSInteger): NSInteger; message 'sendActionOn:';
     procedure popUpStatusItemMenu(menu_: NSMenu); message 'popUpStatusItemMenu:';
-    procedure drawStatusBarBackgroundInRect_withHighlight(rect: NSRect; highlight: BOOL); message 'drawStatusBarBackgroundInRect:withHighlight:';
+    procedure drawStatusBarBackgroundInRect_withHighlight(rect: NSRect; highlight: ObjCBOOL); message 'drawStatusBarBackgroundInRect:withHighlight:';
   end;
 
 { NSStatusItemViewCategory }