paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-01 23:09:32 +01:00
Code Issues Packages Projects Releases Wiki Activity

* remove obsolete generatesmartlib

Browse Source 
git-svn-id: trunk@3341 -
This commit is contained in:
peter 2006-04-27 06:40:19 +00:00
parent f073b1288d
commit d19c898b56
3 changed files with 0 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/import.pas
View File

@ -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
*****************************************************************************}

8
compiler/pmodules.pas
View File

@ -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;

7
compiler/systems/t_bsd.pas
View File

@ -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;