Mercurial > emacs

changeset 13103:a537b52d6668

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(run_hook_with_args_2): New function.
author Richard M. Stallman <rms@gnu.org>
date Tue, 03 Oct 1995 09:11:08 +0000
parents 960db92441d8
children ea64c261c72a
files src/eval.c
diffstat 1 files changed, 14 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/eval.c	Tue Oct 03 09:09:30 1995 +0000
+++ b/src/eval.c	Tue Oct 03 09:11:08 1995 +0000
@@ -2017,6 +2017,20 @@
   UNGCPRO;
   return Qnil;
 }
+
+/* Run the hook HOOK, giving each function the two args ARG1 and ARG2.  */
+
+void
+run_hook_with_args_2 (hook, arg1, arg2)
+     Lisp_Object hook, arg1, arg2;
+{
+  Lisp_Object temp[3];
+  temp[0] = hook;
+  temp[1] = arg1;
+  temp[2] = arg2;
+
+  Frun_hook_with_args (3, temp);
+}
 
 /* Apply fn to arg */
 Lisp_Object