Преглед на файлове

Adapt length of tprocinfoopt record string field to longest string

git-svn-id: trunk@23573 -
pierre преди 12 години
родител
ревизия
a4e0a4c0f5
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      compiler/utils/ppudump.pp

+ 1 - 1
compiler/utils/ppudump.pp

@@ -1020,7 +1020,7 @@ procedure readprocinfooptions(space : string);
 type
   tprocinfoopt=record
     mask : tprocinfoflag;
-    str  : string[80];
+    str  : string[81];
   end;
 const
   procinfoopts=ord(high(tprocinfoflag)) - ord(low(tprocinfoflag));