From 4d0d14350108cf1f828b16e846de738b31861cf7 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Fri, 9 Feb 2018 15:51:35 +0000
Subject: [PATCH] * converted the 'size' parameter to RAUtils.SearchType to
 'out' instead of 'var'

git-svn-id: trunk@38169 -
---
 compiler/rautils.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/rautils.pas b/compiler/rautils.pas
index dd82e4ef2e..0de4a33756 100644
--- a/compiler/rautils.pas
+++ b/compiler/rautils.pas
@@ -187,7 +187,7 @@ Function EscapeToPascal(const s:string): string;
 
 procedure AsmSearchSym(const s:string;var srsym:tsym;var srsymtable:TSymtable);
 Function GetRecordOffsetSize(s:string;out Offset: tcgint;out Size:tcgint; out mangledname: string; needvmtofs: boolean; out hastypecast: boolean):boolean;
-Function SearchType(const hs:string;var size:tcgint): Boolean;
+Function SearchType(const hs:string;out size:tcgint): Boolean;
 Function SearchRecordType(const s:string): boolean;
 Function SearchIConstant(const s:string; var l:tcgint): boolean;
 Function AsmRegisterPara(sym: tabstractnormalvarsym): boolean;
@@ -1292,7 +1292,7 @@ begin
 end;
 
 
-Function SearchType(const hs:string;var size:tcgint): Boolean;
+Function SearchType(const hs:string;out size:tcgint): Boolean;
 var
   srsym : tsym;
   srsymtable : TSymtable;