* merged updates from v10

rtl/go32v1/system.pp

@@ -622,8 +622,10 @@ end;
 *****************************************************************************}
 
 Begin
+{$ifdef SYSTEMDEBUG}
 { to test stack depth }
   loweststack:=maxlongint;
+{$endif}
 { Setup heap }
   InitHeap;
 { Setup stdin, stdout and stderr }
@@ -636,7 +638,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.7  2001-06-30 18:55:49  hajny
+  Revision 1.8  2001-07-29 13:50:44  peter
+    * merged updates from v10
+
+  Revision 1.7  2001/06/30 18:55:49  hajny
     * GetDir fix for inaccessible drives
 
   Revision 1.6  2001/06/19 20:46:07  hajny
@@ -653,5 +658,5 @@ End.
 
   Revision 1.2  2000/07/13 11:33:38  michael
   + removed logs
- 
+
 }

rtl/objpas/typinfo.pp

@@ -29,18 +29,9 @@ unit typinfo;
 // temporary types:
 
     type
-//       PShortString =^ShortString;
-//       PByte        =^Byte;
-//       PWord        =^Word;
-//       PLongint     =^Longint;
-//       PBoolean     =^Boolean;
-//       PSingle      =^Single;
-//       PDouble      =^Double;
-//       PExtended    =^Extended;
-//       PComp        =^Comp;
-{$ifndef HASVARIANT}
+//{$ifndef HASVARIANT}
        Variant      = Pointer;
-{$endif}
+//{$endif}
 
 {$MINENUMSIZE 1   this saves a lot of memory }
        // if you change one of the following enumeration types
@@ -1291,8 +1282,8 @@ end;
 end.
 {
   $Log$
-  Revision 1.10  2001-07-29 13:37:46  peter
-    * merged completion from v10
+  Revision 1.11  2001-07-29 13:50:44  peter
+    * merged updates from v10
 
   Revision 1.9  2001/07/06 14:56:06  peter
     * merged more D5/D6 stuff from v10