paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 15:47:53 +02:00
Code Issues Packages Projects Releases Wiki Activity

* ifdef linux -> ifdef unix

Browse Source
This commit is contained in:
carl 2002-02-27 16:32:50 +00:00
parent 149a4703bd
commit 9783900355
1 changed files with 7 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
utils/ppdep.pp
View File

@ -21,7 +21,7 @@ uses Dos;
{.$define debug}
const
{$ifdef linux}
{$ifdef unix}
exeext='';
{$else}
exeext='.EXE';
@ -81,7 +81,7 @@ begin
for i:=length(s) downto 1 do
begin
case s[i] of
{$ifdef Linux}
{$ifdef unix}
'/','\' : begin
FixFn[i]:='/';
NoPath:=false; {Skip lowercasing path: 'X11'<>'x11' }
@ -531,7 +531,7 @@ begin
Outfile:='';
AddCall:=0;
Verbose:=False;
{$IFDEF LINUX}
{$IFDEF linux}
UnitExt:='ppu';
{$ELSE}
UnitExt:='PPU';
@ -579,13 +579,10 @@ end.
{
$Log$
Revision 1.1 2000-07-13 10:16:22 michael
Revision 1.2 2002-02-27 16:32:50 carl
* ifdef linux -> ifdef unix
Revision 1.1 2000/07/13 10:16:22 michael
+ Initial import
Revision 1.4 2000/02/09 16:44:14 peter
* log truncated
Revision 1.3 2000/01/07 16:46:02 daniel
* copyright 2000
}