+ fpuint64 to system unit interface added: if it is true, the rtl

    uses the fpu to do int64 operations, if possible

rtl/inc/systemh.inc

@@ -105,6 +105,10 @@ const
 {$ifdef i386}
   Test8086 : byte = 2;       { Always i386 or newer }
   Test8087 : byte = 3;       { Always 387 or newer. Emulated if needed. }
+  FPUInt64 : boolean = true; { set this to false if you don't want that }
+                             { the fpu does int64*int64 and             }
+                             { int64 div int64, if the * is overflow    }
+                             { checked, it is done in software          }
 {$endif i386}
 {$ifdef m68k}
   Test68000 : byte = 0;      { Must be determined at startup for both }
@@ -466,7 +470,11 @@ const
 
 {
   $Log$
-  Revision 1.57  1999-05-17 21:52:40  florian
+  Revision 1.58  1999-06-30 22:17:22  florian
+    + fpuint64 to system unit interface added: if it is true, the rtl
+      uses the fpu to do int64 operations, if possible
+
+  Revision 1.57  1999/05/17 21:52:40  florian
     * most of the Object Pascal stuff moved to the system unit
 
   Revision 1.56  1999/05/06 09:05:14  peter

rtl/inc/text.inc

@@ -364,6 +364,8 @@ End;
 
 {*****************************************************************************
                                Write(Ln)
+  Remarks:
+     The routines for the int64/qword are in int64.inc
 *****************************************************************************}
 
 Procedure WriteBuffer(var f:TextRec;var b;len:longint);
@@ -639,6 +641,9 @@ End;
 
 {*****************************************************************************
                                 Read(Ln)
+
+  Remarks:
+     The routines for the int64/qword are in int64.inc
 *****************************************************************************}
 
 Function NextChar(var f:TextRec;var s:string):Boolean;
@@ -1225,7 +1230,11 @@ end;
 
 {
   $Log$
-  Revision 1.46  1999-05-06 09:05:16  peter
+  Revision 1.47  1999-06-30 22:17:24  florian
+    + fpuint64 to system unit interface added: if it is true, the rtl
+      uses the fpu to do int64 operations, if possible
+
+  Revision 1.46  1999/05/06 09:05:16  peter
     * generic write_float str_float
 
   Revision 1.45  1999/04/26 18:27:26  peter