* dxeload range check problem solved

rtl/dos/go32v2/Makefile

@@ -185,7 +185,7 @@ dpmiexcp$(PPUEXT) : dpmiexcp.pp exceptn$(OEXT) $(SYSTEMPPU)
 profile$(PPUEXT) : profile.pp dpmiexcp$(PPUEXT) go32$(PPUEXT) $(SYSTEMPPU)
 	$(COMPILER) profile.pp $(REDIR)
 
-dxeload$(PPUEXT) : $(SYSTEMPPU)
+dxeload$(PPUEXT) : dxeload.pp $(SYSTEMPPU)
 	$(COMPILER) dxeload.pp $(REDIR)
 
 emu387$(PPUEXT) : emu387.pp fpu$(OEXT) strings$(PPUEXT) dxeload$(PPUEXT) \
@@ -286,7 +286,10 @@ include $(CFG)/makefile.def
 
 #
 # $Log$
-# Revision 1.9  1998-10-14 07:56:02  pierre
+# Revision 1.10  1998-10-21 16:51:07  pierre
+#  * dxeload range check problem solved
+#
+# Revision 1.9  1998/10/14 07:56:02  pierre
 #  * -Sv now necessary for dpmiexcp unit
 #
 # Revision 1.8  1998/10/12 08:36:31  pierre

rtl/dos/go32v2/dxeload.pp

@@ -15,6 +15,8 @@
 
  **********************************************************************
 }
+
+
 Unit dxeload;
 interface
 
@@ -38,7 +40,8 @@ function dxe_load(filename : string) : pointer;
   translated to Free Pascal by Pierre Muller
 }
 type
-  pointer_array = array[0..0] of pointer;
+  { to avoid range check problems }
+  pointer_array = array[0..maxlongint] of pointer;
   tpa = ^pointer_array;
   plongint = ^longint;
   ppointer = ^pointer;
@@ -87,7 +90,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.2  1998-05-31 14:18:24  peter
+  Revision 1.3  1998-10-21 16:51:08  pierre
+   * dxeload range check problem solved
+
+  Revision 1.2  1998/05/31 14:18:24  peter
     * force att or direct assembling
     * cleanup of some files