* renamefest

This commit is contained in:
marco 2002-06-02 08:41:22 +00:00
parent 15ba7e9918
commit 77df4660ff
2 changed files with 16 additions and 6 deletions

View File

@ -136,7 +136,7 @@ uses
{$ifdef heaptrc}
ppheap,
{$endif heaptrc}
{$ifdef linux}
{$ifdef Unix}
catch,
{$endif}
{$endif FPC}
@ -276,7 +276,10 @@ begin
end.
{
$Log$
Revision 1.1 2000-07-13 06:30:08 michael
Revision 1.2 2002-06-02 08:41:22 marco
* renamefest
Revision 1.1 2000/07/13 06:30:08 michael
+ Initial import
Revision 1.8 2000/01/07 01:14:54 peter

View File

@ -36,10 +36,14 @@ uses strings,objects
{$IFDEF TP}
,xobjects
{$ENDIF}
{$ifndef linux}
{$ifndef Unix}
,dos
{$else}
{$ifdef VER1_0}
,linux
{$else}
,Unix
{$endif}
{$endif};
const
@ -1729,11 +1733,11 @@ end;
var
l : longint;
{$ifdef linux}
{$ifdef Unix}
Info : Stat;
{$endif}
begin
{$ifndef linux}
{$ifndef Unix}
{ this only works if the file is open !! }
dos.getftime(f,l);
{$else}
@ -1971,7 +1975,10 @@ end;
end.
{
$Log$
Revision 1.1 2000-07-13 06:30:13 michael
Revision 1.2 2002-06-02 08:41:22 marco
* renamefest
Revision 1.1 2000/07/13 06:30:13 michael
+ Initial import
Revision 1.3 2000/03/11 21:11:24 daniel