diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2006-09-02 13:39:48 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2006-09-02 13:39:48 +0000 |
| commit | af91f644f4f857ddffcf3744987e89e2dc31dc19 (patch) | |
| tree | 57fec90779c170c0fad9cef21fae265df3e9771a /src/fns.c | |
| parent | ebc80ddf5fb99cfbbdaaf698cb519a9a86a26754 (diff) | |
| download | emacs-af91f644f4f857ddffcf3744987e89e2dc31dc19.tar.gz emacs-af91f644f4f857ddffcf3744987e89e2dc31dc19.tar.bz2 emacs-af91f644f4f857ddffcf3744987e89e2dc31dc19.zip | |
(concat) [__GNUC__]: Declare with `__attribute__((noinline))'.
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 7 |
1 files changed, 6 insertions, 1 deletions
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 |