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

* Define UNIX for FreeBSD and Linux. Checked crosscompile thingy.

Browse Source
This commit is contained in:
marco 2000-11-07 15:09:27 +00:00
parent 54897380bd
commit e85fea41f5
1 changed files with 16 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
compiler/options.pas
View File

@ -740,7 +740,18 @@ begin
more:=Upper(More);
if not target_is_set then
begin
{ remove old target define }
{Remove non core targetname extra defines}
CASE target_info.target OF
target_i386_freebsd: begin
undef_symbol('LINUX');
undef_symbol('BSD');
undef_symbol('UNIX');
end;
target_i386_linux: undef_symbol('UNIX');
end;
{ remove old target define }
undef_symbol(target_info.short_name);
{ load new target }
if not(set_string_target(More)) then
@ -1504,7 +1515,10 @@ end;
end.
{
$Log$
Revision 1.14 2000-11-07 14:25:08 marco
Revision 1.15 2000-11-07 15:09:27 marco
* Define UNIX for FreeBSD and Linux. Checked crosscompile thingy.
Revision 1.14 2000/11/07 14:25:08 marco
* FreeBSD defines (FreeBSD,Linux,BSD,Unix) Linux defines (Linux,Unix)
Revision 1.13 2000/11/06 20:30:54 peter