mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-01 09:51:22 -08:00
Code Issues Projects Releases Wiki Activity

Remove obsolete noinline declaration

Browse source 
* eval.c (apply1, call2): Don't declare noinline.
* fns.c (concat): Likewise.
This commit is contained in:
Andreas Schwab 2010-07-11 10:38:22 +02:00
parent 3277c1ee3a
commit a64df65010
3 changed files with 7 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2010-07-11 Andreas Schwab <schwab@linux-m68k.org>
* eval.c: Remove obsolete noinline declaration.
* fns.c: Likewise.
2010-07-11 Ken Raeburn <raeburn@raeburn.org>
* doprnt.c (doprnt): Take a va_list argument instead of count and

8
src/eval.c
View file

@ -172,14 +172,6 @@ extern Lisp_Object Qfunction;
static Lisp_Object funcall_lambda (Lisp_Object, int, Lisp_Object*);
static void unwind_to_catch (struct catchtag *, Lisp_Object) NO_RETURN;
#if __GNUC__
/* "gcc -O3" enables automatic function inlining, which optimizes out
the arguments for the invocations of these functions, whereas they
expect these values on the stack. */
Lisp_Object apply1 (Lisp_Object fn, Lisp_Object arg) __attribute__((noinline));
Lisp_Object call2 (Lisp_Object fn, Lisp_Object arg1, Lisp_Object arg2) __attribute__((noinline));
#endif
void
init_eval_once (void)

10
src/fns.c
View file

@ -371,14 +371,8 @@ Symbols are also allowed; their print names are used instead. */)
return i1 < SCHARS (s2) ? Qt : Qnil;
}
#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 (int nargs, Lisp_Object *args, enum Lisp_Type target_type, int last_special) __attribute__((noinline));
#else /* !__GNUC__ */
static Lisp_Object concat (int nargs, Lisp_Object *args, enum Lisp_Type target_type, int last_special);
#endif
static Lisp_Object concat (int nargs, Lisp_Object *args,
enum Lisp_Type target_type, int last_special);
/* ARGSUSED */
Lisp_Object