mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-28 01:42:48 +01:00
* correction for previous mistyping
This commit is contained in:
parent
7e845f0c8b
commit
c96795ebda
@ -1171,7 +1171,7 @@ begin
|
||||
exit;
|
||||
cnt := 0;
|
||||
{ count number of environment pointers }
|
||||
DosGetInfoBlocks (PPThreadInfoBlocks (@TIB), PPProcessInfoBlock (@PIB));
|
||||
DosGetInfoBlocks (PPThreadInfoBlock (@TIB), PPProcessInfoBlock (@PIB));
|
||||
ptr := pchar(PIB^.env);
|
||||
{ stringz,stringz...,#0 }
|
||||
i := 0;
|
||||
@ -1222,7 +1222,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.24 2003-02-20 17:09:49 hajny
|
||||
Revision 1.25 2003-02-20 17:37:00 hajny
|
||||
* correction for previous mistyping
|
||||
|
||||
Revision 1.24 2003/02/20 17:09:49 hajny
|
||||
* fixes for OS/2 v2.1 incompatibility
|
||||
|
||||
Revision 1.23 2003/01/04 15:43:50 hajny
|
||||
|
||||
Loading…
Reference in New Issue
Block a user