paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-07-17 13:18:49 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ clean support for QNX / BeOS and SunOS targets

Browse Source
This commit is contained in:
carl 2001-12-15 04:16:57 +00:00
parent 4b60e37f25
commit 79a3b7ecc9
1 changed files with 16 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
utils/fpcm/fpcmmain.pp
View File

@ -31,6 +31,16 @@ interface
sysutils,classes,
fpcmdic;
{$ifdef BEOS}
{$define NO_UNIX_UNIT}
{$endif}
{$ifdef SUNOS}
{$define NO_UNIX_UNIT}
{$endif}
{$ifdef QNX}
{$define NO_UNIX_UNIT}
{$endif}
const
Version='1.1';
Title='FPCMake Version '+Version;
@ -1005,7 +1015,7 @@ implementation
if hs='' then
begin
{$ifdef UNIX}
{$ifndef beos}
{$ifndef NO_UNIX_UNIT}
if FileExists('/usr/local/bin/ppc386') then
begin
s:=ExtractFilePath(ReadLink('/usr/local/bin/ppc386'));
@ -1331,7 +1341,10 @@ implementation
end.
{
$Log$
Revision 1.16 2001-12-11 23:01:56 carl
Revision 1.17 2001-12-15 04:16:57 carl
+ clean support for QNX / BeOS and SunOS targets
Revision 1.16 2001/12/11 23:01:56 carl
+ Added SunOS and QNX targets
Revision 1.15 2001/10/14 21:38:32 peter