Browse Source

* Fix 2.6.4 compilation

git-svn-id: trunk@33176 -
michael 9 years ago
parent
commit
3ee5661ff1
1 changed files with 1 additions and 1 deletions
  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