paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-26 09:18:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* add notarget defines

Browse Source
This commit is contained in:
peter 2001-02-02 22:43:39 +00:00
parent 3dad8c73a5
commit 423463630c
2 changed files with 36 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
compiler/export.pas
View File

@ -190,14 +190,25 @@ procedure InitExport;
begin begin
case target_info.target of case target_info.target of
{$ifdef i386} {$ifdef i386}
{$ifndef NOTARGETLINUX}
target_i386_Linux : target_i386_Linux :
exportlib:=Texportliblinux.Create; exportlib:=Texportliblinux.Create;
{$endif NOTARGETLINUX}
{$ifndef NOTARGETFREEBSD}
target_i386_freebsd: target_i386_freebsd:
exportlib:=Texportlibfreebsd.Create; exportlib:=Texportlibfreebsd.Create;
{$endif NOTARGETFREEBSD}
// {$ifndef NOTARGETSOLARIS}
// target_i386_solaris:
// exportlib:=new(pexportlibsolaris,Init);
// {$endif NOTARGETSOLARIS}
{$ifndef NOTARGETWIN32}
target_i386_Win32 : target_i386_Win32 :
exportlib:=Texportlibwin32.Create; exportlib:=Texportlibwin32.Create;
target_i386_Netware : {$endif NOTARGETWIN32}
{$ifndef NOTARGETNETWARE}
exportlib:=Texportlibnetware.Create; exportlib:=Texportlibnetware.Create;
{$endif NOTARGETNETWARE}
{ {
target_i386_OS2 : target_i386_OS2 :
exportlib:=Texportlibos2.Create; exportlib:=Texportlibos2.Create;
@ -224,7 +235,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.9 2000-12-25 00:07:25 peter Revision 1.10 2001-02-02 22:43:39 peter
* add notarget defines
Revision 1.9 2000/12/25 00:07:25 peter
+ new tlinkedlist class (merge of old tstringqueue,tcontainer and + new tlinkedlist class (merge of old tstringqueue,tcontainer and
tlinkedlist objects) tlinkedlist objects)

21
compiler/import.pas
View File

@ -228,16 +228,30 @@ procedure InitImport;
begin begin
case target_info.target of case target_info.target of
{$ifdef i386} {$ifdef i386}
{$ifndef NOTARGETLINUX}
target_i386_Linux : target_i386_Linux :
importlib:=Timportliblinux.Create; importlib:=Timportliblinux.Create;
{$endif}
{$ifndef NOTARGETFREEBSD}
target_i386_freebsd: target_i386_freebsd:
importlib:=Timportlibfreebsd.Create; importlib:=Timportlibfreebsd.Create;
{$endif}
// {$ifndef NOTARGETSOLARIS}
// target_i386_solaris:
// importlib:=new(pimportlibsolaris,Init);
// {$endif}
{$ifndef NOTARGETWIN32}
target_i386_Win32 : target_i386_Win32 :
importlib:=Timportlibwin32.Create; importlib:=Timportlibwin32.Create;
{$endif}
{$ifndef NOTARGETOS2}
target_i386_OS2 : target_i386_OS2 :
importlib:=Timportlibos2.Create; importlib:=Timportlibos2.Create;
target_i386_Netware : {$endif}
{$ifndef NOTARGETNETWARE}
target_i386_OS2 :
importlib:=Timportlibnetware.Create; importlib:=Timportlibnetware.Create;
{$endif}
{$endif i386} {$endif i386}
{$ifdef m68k} {$ifdef m68k}
target_m68k_Linux : target_m68k_Linux :
@ -260,7 +274,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.7 2000-12-25 00:07:26 peter Revision 1.8 2001-02-02 22:43:39 peter
* add notarget defines
Revision 1.7 2000/12/25 00:07:26 peter
+ new tlinkedlist class (merge of old tstringqueue,tcontainer and + new tlinkedlist class (merge of old tstringqueue,tcontainer and
tlinkedlist objects) tlinkedlist objects)