Browse Source

+ a tiny bit of support for macos

olle 20 years ago
parent
commit
99776e6402
1 changed files with 7 additions and 1 deletions
  1. 7 1
      rtl/objpas/sysutils/filutilh.inc

+ 7 - 1
rtl/objpas/sysutils/filutilh.inc

@@ -35,6 +35,9 @@ Type
 {$endif}
 {$endif}
 {$ifdef netware_libc}
 {$ifdef netware_libc}
     FindData : TNetwareLibcFindData;
     FindData : TNetwareLibcFindData;
+{$endif}
+{$ifdef MacOS}
+    FindData : TMacOSFindData;
 {$endif}
 {$endif}
   end;
   end;
 
 
@@ -93,7 +96,10 @@ Function GetFileHandle(var f : Text):Longint;
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.8  2004-12-19 18:03:29  michael
+  Revision 1.9  2005-01-24 18:25:46  olle
+    + a tiny bit of support for macos
+
+  Revision 1.8  2004/12/19 18:03:29  michael
   + Added mode field to TSearchRec for Kylix compatibility
   + Added mode field to TSearchRec for Kylix compatibility
 
 
   Revision 1.7  2004/10/03 20:27:00  armin
   Revision 1.7  2004/10/03 20:27:00  armin