Преглед на файлове

* Fix 2.6.4 compilation

git-svn-id: trunk@33176 -
michael преди 9 години
родител
ревизия
3ee5661ff1
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/fcl-pdf/src/fpparsettf.pp

+ 1 - 1
packages/fcl-pdf/src/fpparsettf.pp

@@ -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