* Applied partial patch from barlone to change var->out for IdentToInt

git-svn-id: trunk@32825 -

rtl/objpas/classes/classes.inc

@@ -877,7 +877,7 @@ begin
   end;
 end;
 
-function IdentToInt(const Ident: String; var Int: LongInt;
+function IdentToInt(const Ident: String; out Int: LongInt;
   const Map: array of TIdentMapEntry): Boolean;
 var
   i: Integer;

rtl/objpas/classes/classesh.inc

@@ -2110,7 +2110,7 @@ var
 
 procedure RegisterIntegerConsts(IntegerType: Pointer; IdentToIntFn: TIdentToInt;
   IntToIdentFn: TIntToIdent);
-function IdentToInt(const Ident: string; var Int: Longint; const Map: array of TIdentMapEntry): Boolean;
+function IdentToInt(const Ident: string; out Int: Longint; const Map: array of TIdentMapEntry): Boolean;
 function IntToIdent(Int: Longint; var Ident: string; const Map: array of TIdentMapEntry): Boolean;
 function FindIntToIdent(AIntegerType: Pointer): TIntToIdent;
 function FindIdentToInt(AIntegerType: Pointer): TIdentToInt;