* check if file can be opened, returns nil if not

rtl/dos/go32v2/dxeload.pp

@@ -56,7 +56,12 @@ begin
    dxe_load:=nil;
 { open the file }
    assign(f,filename);
+{$I-}
    reset(f,1);
+{$I+}
+   { quit if no file !! }
+   if ioresult<>0 then
+     exit;
 { load the header }
    blockread(f,@dh,sizeof(dxe_header),i);
    if (i<>sizeof(dxe_header)) or (dh.magic<>DXE_MAGIC) then
@@ -91,7 +96,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.4  1998-10-21 17:05:46  pierre
+  Revision 1.5  1998-10-23 16:45:41  pierre
+   * check if file can be opened, returns nil if not
+
+  Revision 1.4  1998/10/21 17:05:46  pierre
    * wmemu387.dxe was not closed !!
 
   Revision 1.3  1998/10/21 16:51:08  pierre