From: Paul Eggert <eggert@cs.ucla.edu>
Date: Sun, 21 Jul 2013 15:56:55 +0000 (-0700)
Subject: * alloc.c (make_save_ptr_ptr): Define this function.
X-Git-Url: https://git.hcoop.net/bpt/emacs.git/commitdiff_plain/f4e891b5a89a773600a329bae75cd615f3c8e0a2

* alloc.c (make_save_ptr_ptr): Define this function.

It was inadvertently omitted.  It's needed only if
HAVE_MENUS && ! (USE_X_TOOLKIT || USE_GTK).
---

diff --git a/src/ChangeLog b/src/ChangeLog
index fb2d875eb2..d3c5ffaff5 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2013-07-21  Paul Eggert  <eggert@cs.ucla.edu>
+
+	* alloc.c (make_save_ptr_ptr): Define this function.
+	It was inadvertently omitted.  It's needed only if
+	HAVE_MENUS && ! (USE_X_TOOLKIT || USE_GTK).
+
 2013-07-21  Jan Djärv  <jan.h.d@swipnet.se>
 
 	* nsterm.m (sendEvent:): Skip mouse moved if no dialog and no Emacs
diff --git a/src/alloc.c b/src/alloc.c
index 4c924f7238..e6e06794db 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -3394,6 +3394,19 @@ make_save_ptr_int (void *a, ptrdiff_t b)
   return val;
 }
 
+#if defined HAVE_MENUS && ! (defined USE_X_TOOLKIT || defined USE_GTK)
+Lisp_Object
+make_save_ptr_ptr (void *a, void *b)
+{
+  Lisp_Object val = allocate_misc (Lisp_Misc_Save_Value);
+  struct Lisp_Save_Value *p = XSAVE_VALUE (val);
+  p->save_type = SAVE_TYPE_PTR_PTR;
+  p->data[0].pointer = a;
+  p->data[1].pointer = b;
+  return val;
+}
+#endif
+
 Lisp_Object
 make_save_funcptr_ptr_obj (void (*a) (void), void *b, Lisp_Object c)
 {