diff --git a/compiler/systems/t_win.pas b/compiler/systems/t_win.pas index 2a49fcfbe9..e292b4141a 100644 --- a/compiler/systems/t_win.pas +++ b/compiler/systems/t_win.pas @@ -581,14 +581,16 @@ implementation EList_nonindexed.Free; inherited; end; - - + + procedure TExportLibWin.preparelib(const s:string); begin if current_asmdata.asmlists[al_exports]=nil then current_asmdata.asmlists[al_exports]:=TAsmList.create; - EList_indexed:=tFPList.Create; - EList_nonindexed:=tFPList.Create; + if EList_indexed=nil then + EList_indexed:=tFPList.Create; + if EList_nonindexed=nil then + EList_nonindexed:=tFPList.Create; end;