]> code.delx.au - gnu-emacs/blobdiff - src/nsmenu.m
* src/lisp.h (XSAVE_POINTER, XSAVE_INTEGER): Change to allow extraction
[gnu-emacs] / src / nsmenu.m
index d0ea8f5a47aebdaf9058c2936f84f82c787920ee..b0369e76a277487a7c1a2f55c56581b8c9d272aa 100644 (file)
@@ -1,5 +1,5 @@
 /* NeXT/Open/GNUstep and MacOSX Cocoa menu and toolbar module.
-   Copyright (C) 2007-2012 Free Software Foundation, Inc.
+   Copyright (C) 2007-2013 Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -1347,8 +1347,7 @@ struct Popdown_data
 static Lisp_Object
 pop_down_menu (Lisp_Object arg)
 {
-  struct Lisp_Save_Value *p = XSAVE_VALUE (arg);
-  struct Popdown_data *unwind_data = (struct Popdown_data *) p->pointer;
+  struct Popdown_data *unwind_data = XSAVE_POINTER (arg, 0);
 
   block_input ();
   if (popup_activated_flag)