瀏覽代碼

* fixed the order of parameters in the first call to get_caller_frame in PushExceptObject

git-svn-id: trunk@25512 -
nickysn 12 年之前
父節點
當前提交
b688b79a0d
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/inc/except.inc

+ 1 - 1
rtl/inc/except.inc

@@ -149,7 +149,7 @@ begin
 {$ifdef FPC_CHECK_GET_CALLER_EXCEPTIONS}
       try
 {$endif FPC_CHECK_GET_CALLER_EXCEPTIONS}
-      prev_frame:=get_caller_frame(curr_addr, curr_frame);
+      prev_frame:=get_caller_frame(curr_frame, curr_addr);
 {$ifdef FPC_CHECK_GET_CALLER_EXCEPTIONS}
       except
         halt(217);