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

* increase the maximum stack trace depth, when the compiler is compiled with -dEXTDEBUG

git-svn-id: trunk@34568 -
nickysn преди 8 години
родител
ревизия
7f3ac8bf51
променени са 1 файла, в които са добавени 5 реда и са изтрити 0 реда
  1. 5 0
      compiler/pp.pas

+ 5 - 0
compiler/pp.pas

@@ -223,6 +223,11 @@ end;
 begin
   oldexit:=exitproc;
   exitproc:=@myexit;
+{$ifdef EXTDEBUG}
+{ Increase the maximum stack trace depth, since the default 8 is often not
+  enough for debugging the compiler }
+  Max_Frame_Dump:=50;
+{$endif EXTDEBUG}
 { Call the compiler with empty command, so it will take the parameters }
   Halt(compiler.Compile(''));
 end.