mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 23:09:40 +02:00
* wrong condition for DosLoadModule
This commit is contained in:
parent
6d4da1a9ea
commit
26141a5440
@ -41,7 +41,7 @@ var
|
||||
ErrPath: array [0..259] of char;
|
||||
Handle: longint;
|
||||
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;
|
||||
end;
|
||||
|
||||
@ -62,7 +62,10 @@ end;
|
||||
|
||||
{
|
||||
$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
|
||||
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user