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

* don't load stack size value when generic stack checking is done, resolves #10924

git-svn-id: trunk@10429 -
florian преди 17 години
родител
ревизия
39250de33a
променени са 1 файла, в които са добавени 2 реда и са изтрити 1 реда
  1. 2 1
      compiler/psub.pas

+ 2 - 1
compiler/psub.pas

@@ -1046,7 +1046,8 @@ implementation
             gen_restore_used_regs(aktproccode);
             { We know the size of the stack, now we can generate the
               parameter that is passed to the stack checking code }
-            if (cs_check_stack in entryswitches) and
+            if not(tf_no_generic_stackcheck in target_info.flags) and
+               (cs_check_stack in entryswitches) and
                not(po_assembler in procdef.procoptions) and
                (procdef.proctypeoption<>potype_proginit) then
               begin