From af91f644f4f857ddffcf3744987e89e2dc31dc19 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 2 Sep 2006 13:39:48 +0000 Subject: [PATCH] (concat) [__GNUC__]: Declare with `__attribute__((noinline))'. --- src/fns.c | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/src/fns.c b/src/fns.c index 228d48049f0..f9f4b72529e 100644 --- a/src/fns.c +++ b/src/fns.c @@ -387,7 +387,12 @@ Symbols are also allowed; their print names are used instead. */) return i1 < SCHARS (s2) ? Qt : Qnil; } -static Lisp_Object concat (); +#if __GNUC__ +/* "gcc -O3" enables automatic function inlining, which optimizes out + the arguments for the invocations of this function, whereas it + expects these values on the stack. */ +static Lisp_Object concat () __attribute__((noinline)); +#endif /* ARGSUSED */ Lisp_Object -- 2.39.2