Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* Fix 2.6.4 compilation

git-svn-id: trunk@33176 -
michael 9 years ago
parent
94f8db4951
commit
3ee5661ff1
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      packages/fcl-pdf/src/fpparsettf.pp

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

@@ -843,7 +843,7 @@ begin
 
 {$IFDEF VER3}  
 {$IFDEF VER3}  
   N := Default(TNameRecord);
 
   N := Default(TNameRecord);
 
 {$ELSE}  
 {$ELSE}  
-  FillChar(N,SizeOf(TNameRecord),0)
 
+  FillChar(N,SizeOf(TNameRecord),0);
 
 {$ENDIF}
 
 {$ENDIF}
 
   for I:=0 to Count-1 do
 
   for I:=0 to Count-1 do
 
   begin
 
   begin