Jelajahi Sumber

Avoid warning with -O4 option

git-svn-id: trunk@49284 -
pierre 4 tahun lalu
induk
melakukan
72667f41ad
1 mengubah file dengan 1 tambahan dan 0 penghapusan
  1. 1 0
      compiler/systems/t_sinclairql.pas

+ 1 - 0
compiler/systems/t_sinclairql.pas

@@ -266,6 +266,7 @@ begin
   GCSectionsStr:='';
   DynLinkStr:='';
   FlagsStr:='';
+  QLFlagsStr:='';
   MapStr:='';
 
   if (cs_link_map in current_settings.globalswitches) then