Sfoglia il codice sorgente

* us cs_opt_stackframe

git-svn-id: trunk@3326 -
peter 19 anni fa
parent
commit
70e7546d87
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      compiler/psub.pas

+ 1 - 1
compiler/psub.pas

@@ -748,7 +748,7 @@ implementation
                 * open arrays
               - no inline assembler
             }
-            if (cs_opt_level1 in aktoptimizerswitches) and
+            if (cs_opt_stackframe in aktoptimizerswitches) and
                not(po_assembler in procdef.procoptions) and
                ((flags*[pi_has_assembler_block,pi_uses_exceptions,pi_is_assembler,
                        pi_needs_implicit_finally,pi_has_implicit_finally,pi_has_stackparameter])=[]) then