From a16485ca15c516319aebc36505ee60e783d7a7a3 Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Sun, 23 Jan 2000 16:31:23 +0000
Subject: [PATCH]   * hasint64diskspace define changed to int64 so it's default
 now

---
 rtl/go32v2/dos.pp | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/rtl/go32v2/dos.pp b/rtl/go32v2/dos.pp
index cbaaaa0323..21ead1fa25 100644
--- a/rtl/go32v2/dos.pp
+++ b/rtl/go32v2/dos.pp
@@ -19,6 +19,7 @@ interface
 Uses
   Go32;
 
+
 Const
   {Bitmasks for CPU Flags}
   fcarry     = $0001;
@@ -102,7 +103,7 @@ Procedure Exec(const path: pathstr; const comline: comstr);
 Function  DosExitCode: word;
 
 {Disk}
-{$ifdef HasInt64Diskfuncs}
+{$ifdef Int64}
  Function  DiskFree(drive: byte) : int64;
  Function  DiskSize(drive: byte) : int64;
 {$else}
@@ -447,7 +448,7 @@ end;
                                --- Disk ---
 ******************************************************************************}
 
-{$ifdef HasInt64Diskfuncs}
+{$ifdef Int64}
 
 TYPE  ExtendedFat32FreeSpaceRec=packed Record
          RetSize           : WORD; { (ret) size of returned structure}
@@ -1139,7 +1140,10 @@ End;
 end.
 {
   $Log$
-  Revision 1.18  2000-01-23 12:28:38  marco
+  Revision 1.19  2000-01-23 16:31:23  peter
+    * hasint64diskspace define changed to int64 so it's default now
+
+  Revision 1.18  2000/01/23 12:28:38  marco
    * Added diskfree and disksize with AH=71 dos functions (LFN/Fat32)
 
   Revision 1.17  2000/01/07 16:41:30  daniel