Jelajahi Sumber

* wrong condition for DosLoadModule

Tomas Hajny 21 tahun lalu
induk
melakukan
26141a5440
1 mengubah file dengan 5 tambahan dan 2 penghapusan
  1. 5 2
      rtl/os2/dynlibs.inc

+ 5 - 2
rtl/os2/dynlibs.inc

@@ -41,7 +41,7 @@ var
  ErrPath: array [0..259] of char;
  ErrPath: array [0..259] of char;
  Handle: longint;
  Handle: longint;
 begin
 begin
- if DosLoadModule (@ErrPath, SizeOf (ErrPath), PChar (Name), Handle) <> 0
+ if DosLoadModule (@ErrPath, SizeOf (ErrPath), PChar (Name), Handle) = 0
                                 then Result := Handle else Result := NilHandle;
                                 then Result := Handle else Result := NilHandle;
 end;
 end;
 
 
@@ -62,7 +62,10 @@ end;
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.3  2002-09-07 16:01:24  peter
+  Revision 1.4  2004-10-24 11:44:27  hajny
+    * wrong condition for DosLoadModule
+
+  Revision 1.3  2002/09/07 16:01:24  peter
     * old logs removed and tabs fixed
     * old logs removed and tabs fixed
 
 
 }
 }