From bae3c0296e7068a5be968080640d7033db61b2d5 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 28 Jun 2013 08:41:46 +0000
Subject: [PATCH]   * fixed result type of StrBufSize(PWideChar) for 64 bit
 targets

git-svn-id: branches/cpstrrtl@25002 -
---
 rtl/objpas/sysutils/sysuni.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/objpas/sysutils/sysuni.inc b/rtl/objpas/sysutils/sysuni.inc
index 9dbda5d2f3..4827b2be22 100644
--- a/rtl/objpas/sysutils/sysuni.inc
+++ b/rtl/objpas/sysutils/sysuni.inc
@@ -428,7 +428,7 @@ function WideStrAlloc(Size: cardinal): PWideChar;
     inc(result,sizeof(cardinal));
   end;
 
-function StrBufSize(str: pwidechar): SizeUInt;
+function StrBufSize(str: pwidechar): cardinal;
   begin
     if assigned(str) then
       result:=cardinal(pointer(str-sizeof(cardinal))^)-sizeof(cardinal)