2
0
Эх сурвалжийг харах

* limit backtraces to values inside the stack, patch by Vincent Snijders


git-svn-id: trunk@162 -

peter 20 жил өмнө
parent
commit
87fe5d9b98
1 өөрчлөгдсөн 2 нэмэгдсэн , 1 устгасан
  1. 2 1
      rtl/inc/except.inc

+ 2 - 1
rtl/inc/except.inc

@@ -152,7 +152,8 @@ begin
   frames:=nil;
   framebufsize:=0;
   framecount:=0;
-  while (framecount<RaiseMaxFrameCount) and (curr_frame > prev_frame) Do
+  while (framecount<RaiseMaxFrameCount) and (curr_frame > prev_frame) and
+        (curr_frame<(StackBottom + StackLength)) do
    Begin
      caller_addr := get_caller_addr(curr_frame);
      caller_frame := get_caller_frame(curr_frame);