* initialize variables to avoid warnings

git-svn-id: trunk@32428 -
This commit is contained in:
florian 2015-11-21 14:14:30 +00:00
parent f60a33f5af
commit 1142fdeccd
4 changed files with 7 additions and 0 deletions

View File

@ -949,6 +949,7 @@ implementation
customsecname: boolean;
begin
fvectorized_finalize_called:=true;
sym:=nil;
customsecname:=get_vectorized_dead_strip_custom_section_name(basename,st,secname);
if customsecname then
sectype:=sec_user

View File

@ -471,6 +471,7 @@ implementation
block_type:=bt_type;
hdef:=nil;
first:=true;
had_generic:=false;
repeat
defpos:=current_tokenpos;
istyperenaming:=false;

View File

@ -1287,6 +1287,8 @@ implementation
sc:=TFPObjectList.create(false);
first:=true;
had_generic:=false;
vs:=nil;
fillchar(tmp_filepos,sizeof(tmp_filepos),0);
while (token=_ID) do
begin
semicoloneaten:=false;

View File

@ -2721,6 +2721,9 @@ implementation
p1:=nil;
spezcontext:=nil;
{ avoid warning }
fillchar(dummypos,sizeof(dummypos),0);
allowspecialize:=not (m_delphi in current_settings.modeswitches) and
not (ef_had_specialize in flags) and
(block_type in inline_specialization_block_types);