diff --git a/compiler/import.pas b/compiler/import.pas index b3e3f3da52..829981ac12 100644 --- a/compiler/import.pas +++ b/compiler/import.pas @@ -60,7 +60,6 @@ type procedure importprocedure(aprocdef:tprocdef;const module:string;index:longint;const name:string);virtual; procedure importvariable(vs:tglobalvarsym;const name,module:string);virtual; procedure generatelib;virtual; - procedure generatesmartlib;virtual; end; TDLLScanner=class @@ -189,12 +188,6 @@ begin end; -procedure timportlib.generatesmartlib; -begin - NotSupported; -end; - - {***************************************************************************** Init/Done *****************************************************************************} diff --git a/compiler/pmodules.pas b/compiler/pmodules.pas index de949acf2a..1cd11b381f 100644 --- a/compiler/pmodules.pas +++ b/compiler/pmodules.pas @@ -100,14 +100,6 @@ implementation if (cs_create_smart in aktmoduleswitches) and (not use_smartlink_section) then begin - { regenerate the importssection for win32 } - if assigned(current_asmdata.asmlists[al_imports]) and - (target_info.system in [system_i386_win32,system_i386_wdosx, system_arm_wince,system_i386_wince]) then - begin - current_asmdata.asmlists[al_imports].clear; - importlib.generatesmartlib; - end; - GenerateAsm(true); if (af_needar in target_asm.flags) then Linker.MakeStaticLibrary; diff --git a/compiler/systems/t_bsd.pas b/compiler/systems/t_bsd.pas index e5dd431132..82cc4ed1b5 100644 --- a/compiler/systems/t_bsd.pas +++ b/compiler/systems/t_bsd.pas @@ -53,7 +53,6 @@ implementation procedure importprocedure(aprocdef:tprocdef;const module:string;index:longint;const name:string);override; procedure importvariable(vs:tglobalvarsym;const name,module:string);override; procedure generatelib;override; - procedure generatesmartlib;override; end; timportlibbsd=class(timportlib) @@ -111,12 +110,6 @@ implementation end; - procedure timportlibdarwin.generatesmartlib; - begin - generatelib; - end; - - procedure timportlibdarwin.generatelib; begin end;