|
|
@@ -166,17 +166,6 @@ Type
|
|
|
{ procedure type }
|
|
|
TProcedure = Procedure;
|
|
|
|
|
|
-{ array types }
|
|
|
- IntegerArray = array[0..$effffff] of Integer;
|
|
|
- TIntegerArray = IntegerArray;
|
|
|
- PIntegerArray = ^IntegerArray;
|
|
|
- PointerArray = array [0..512*1024*1024-2] of Pointer;
|
|
|
- TPointerArray = PointerArray;
|
|
|
- PPointerArray = ^PointerArray;
|
|
|
-{$ifdef HASINTF}
|
|
|
- TBoundArray = array of integer;
|
|
|
-{$endif HASINTF}
|
|
|
-
|
|
|
const
|
|
|
{ Maximum value of the biggest signed and unsigned integer type available}
|
|
|
MaxSIntValue = High(ValSInt);
|
|
|
@@ -569,7 +558,10 @@ const
|
|
|
|
|
|
{
|
|
|
$Log$
|
|
|
- Revision 1.42 2002-01-25 17:39:35 peter
|
|
|
+ Revision 1.43 2002-01-25 17:41:05 peter
|
|
|
+ * moved array types to objpas unit
|
|
|
+
|
|
|
+ Revision 1.42 2002/01/25 17:39:35 peter
|
|
|
* array types added
|
|
|
|
|
|
Revision 1.41 2002/01/24 18:27:06 peter
|
peter