浏览代码

* correction for previous mistyping

Tomas Hajny 22 年之前
父节点
当前提交
c96795ebda
共有 1 个文件被更改,包括 5 次插入2 次删除
  1. 5 2
      rtl/os2/dos.pas

+ 5 - 2
rtl/os2/dos.pas

@@ -1171,7 +1171,7 @@ begin
     exit;
     exit;
   cnt := 0;
   cnt := 0;
   { count number of environment pointers }
   { count number of environment pointers }
-  DosGetInfoBlocks (PPThreadInfoBlocks (@TIB), PPProcessInfoBlock (@PIB));
+  DosGetInfoBlocks (PPThreadInfoBlock (@TIB), PPProcessInfoBlock (@PIB));
   ptr := pchar(PIB^.env);
   ptr := pchar(PIB^.env);
   { stringz,stringz...,#0 }
   { stringz,stringz...,#0 }
   i := 0;
   i := 0;
@@ -1222,7 +1222,10 @@ begin
 end.
 end.
 {
 {
   $Log$
   $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
     * fixes for OS/2 v2.1 incompatibility
 
 
   Revision 1.23  2003/01/04 15:43:50  hajny
   Revision 1.23  2003/01/04 15:43:50  hajny