another fix for the new warning introduced in r39347, hopefully it fixes win32 build

git-svn-id: trunk@39352 -

compiler/cfileutl.pas

@@ -1300,6 +1300,7 @@ end;
         GetShortName:=n;
 {$ifdef win32}
         hs:=n+#0;
+        hs2:='';
         { may become longer in case of e.g. ".a" -> "a~1" or so }
         setlength(hs2,length(hs)*2);
         i:=Windows.GetShortPathName(@hs[1],@hs2[1],length(hs)*2);