From a1bc04bbb31545e8f8f23f0de14dda9855752097 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Thu, 30 May 2013 13:43:51 +0000
Subject: [PATCH]   * don't omit stack frame generation when generating gprof
 information, as     mcount expects the frame pointer to be valid

git-svn-id: trunk@24642 -
---
 compiler/psub.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/compiler/psub.pas b/compiler/psub.pas
index 9ff647db11..de1b37a880 100644
--- a/compiler/psub.pas
+++ b/compiler/psub.pas
@@ -982,6 +982,7 @@ implementation
                 (tabstractlocalsymtable(procdef.localst).count_locals = 0)) or
                ((cs_opt_stackframe in current_settings.optimizerswitches) and
                 not(cs_generate_stackframes in current_settings.localswitches) and
+                not(cs_profile in current_settings.moduleswitches) and
                 not(po_assembler in procdef.procoptions) and
                 ((flags*([pi_has_assembler_block,pi_is_assembler,
                         pi_has_stackparameter,pi_needs_stackframe]+