From 87849e1fc6dcde79881e635b56f9e2708c161ec2 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Thu, 24 Dec 2009 09:34:06 +0000
Subject: [PATCH]   + added missing NSApp declaration   * fixed
 NSAllocateMemoryPages declaration

git-svn-id: trunk@14473 -
---
 packages/cocoaint/src/appkit/NSApplication.inc | 1 +
 packages/cocoaint/src/foundation/NSZone.inc    | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/packages/cocoaint/src/appkit/NSApplication.inc b/packages/cocoaint/src/appkit/NSApplication.inc
index e7187e071f..0d89634183 100644
--- a/packages/cocoaint/src/appkit/NSApplication.inc
+++ b/packages/cocoaint/src/appkit/NSApplication.inc
@@ -89,6 +89,7 @@ procedure NSUnregisterServicesProvider(namePointer: NSString); cdecl; external n
 { External symbols }
 var
   NSAppKitVersionNumber: double; external name '_NSAppKitVersionNumber';
+  NSApp: id; external name '_NSApp';
 
 { External string constants }
 var
diff --git a/packages/cocoaint/src/foundation/NSZone.inc b/packages/cocoaint/src/foundation/NSZone.inc
index 391f825bf8..6c9a9acefb 100644
--- a/packages/cocoaint/src/foundation/NSZone.inc
+++ b/packages/cocoaint/src/foundation/NSZone.inc
@@ -48,7 +48,7 @@ function NSPageSize: NSUInteger; cdecl; external name 'NSPageSize';
 function NSLogPageSize: NSUInteger; cdecl; external name 'NSLogPageSize';
 function NSRoundUpToMultipleOfPageSize(bytes: NSUInteger): NSUInteger; cdecl; external name 'NSRoundUpToMultipleOfPageSize';
 function NSRoundDownToMultipleOfPageSize(bytes: NSUInteger): NSUInteger; cdecl; external name 'NSRoundDownToMultipleOfPageSize';
-procedure NSAllocateMemoryPages(bytes: NSUInteger); cdecl; external name 'NSAllocateMemoryPages';
+function NSAllocateMemoryPages(bytes: NSUInteger): pointer; cdecl; external name 'NSAllocateMemoryPages';
 procedure NSDeallocateMemoryPages(ptrPointer: Pointer; bytes: NSUInteger); cdecl; external name 'NSDeallocateMemoryPages';
 procedure NSCopyMemoryPages(sourcePointer: Pointer; destPointer: Pointer; bytes: NSUInteger); cdecl; external name 'NSCopyMemoryPages';
 function NSRealMemoryAvailable: NSUInteger; cdecl; external name 'NSRealMemoryAvailable';