mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 16:29:24 +02:00
* Fix 2.6.4 compilation
git-svn-id: trunk@33176 -
This commit is contained in:
parent
94f8db4951
commit
3ee5661ff1
@ -843,7 +843,7 @@ begin
|
||||
{$IFDEF VER3}
|
||||
N := Default(TNameRecord);
|
||||
{$ELSE}
|
||||
FillChar(N,SizeOf(TNameRecord),0)
|
||||
FillChar(N,SizeOf(TNameRecord),0);
|
||||
{$ENDIF}
|
||||
for I:=0 to Count-1 do
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user