Mercurial > hg > xemacs-beta

comparison src/eval.c @ 223:2c611d1463a6 r20-4b10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b10
author cvs
date Mon, 13 Aug 2007 10:10:54 +0200
parents 78478c60bfcd
children f955c73f5258
comparison
equal deleted inserted replaced
222:aae4c8b01452 223:2c611d1463a6
2854 2854
2855 static Lisp_Object funcall_lambda (Lisp_Object fun, 2855 static Lisp_Object funcall_lambda (Lisp_Object fun,
2856 int nargs, Lisp_Object args[]); 2856 int nargs, Lisp_Object args[]);
2857 static Lisp_Object apply_lambda (Lisp_Object fun, 2857 static Lisp_Object apply_lambda (Lisp_Object fun,
2858 int nargs, Lisp_Object args); 2858 int nargs, Lisp_Object args);
2859 #if 0 /* #### Not called anymore */
2859 static Lisp_Object funcall_subr (struct Lisp_Subr *sub, Lisp_Object args[]); 2860 static Lisp_Object funcall_subr (struct Lisp_Subr *sub, Lisp_Object args[]);
2861 #endif
2860 2862
2861 static int in_warnings; 2863 static int in_warnings;
2862 2864
2863 static Lisp_Object 2865 static Lisp_Object
2864 in_warnings_restore (Lisp_Object minimus) 2866 in_warnings_restore (Lisp_Object minimus)
3549 switch. */ 3551 switch. */
3550 abort (); 3552 abort ();
3551 return Qnil; /* suppress compiler warning */ 3553 return Qnil; /* suppress compiler warning */
3552 } 3554 }
3553 3555
3556 #if 0 /* #### Not called anymore */
3554 static Lisp_Object 3557 static Lisp_Object
3555 funcall_subr (struct Lisp_Subr *subr, Lisp_Object args[]) 3558 funcall_subr (struct Lisp_Subr *subr, Lisp_Object args[])
3556 { 3559 {
3557 return primitive_funcall (subr_function (subr), subr->max_args, args); 3560 return primitive_funcall (subr_function (subr), subr->max_args, args);
3558 } 3561 }
3562 #endif
3559 3563
3560 /* FSFmacs has an extra arg EVAL_FLAG. If false, some of 3564 /* FSFmacs has an extra arg EVAL_FLAG. If false, some of
3561 the statements below are not done. But it's always true 3565 the statements below are not done. But it's always true
3562 in all the calls to apply_lambda(). */ 3566 in all the calls to apply_lambda(). */
3563 3567