Mercurial > emacs
view oldXMenu/EvHand.c @ 28508:a68042252425
* lisp.h (make_number) [!NO_UNION_TYPE && __GNUC__ >= 2 && __OPTIMIZE__]:
Provide a GNU C macro version that handles lisp-object unions.
(XSET) [!NO_UNION_TYPE]: Set the value field first, then the type field, to
better cope with ENABLE_CHECKING and calls that modify a Lisp_Object using its
old value.
author | Ken Raeburn <raeburn@raeburn.org> |
---|---|
date | Wed, 05 Apr 2000 18:47:29 +0000 |
parents | bbce331da1be |
children | 695cf19ef79e d7ddb3e565de |
line wrap: on
line source
#include "copyright.h" /* $Header: /u/src/emacs/19.0/oldXMenu/RCS/EvHand.c,v 1.1 1992/04/11 22:10:19 jimb Exp $ */ /* Copyright Massachusetts Institute of Technology 1985 */ /* * XMenu: MIT Project Athena, X Window system menu package * * XMenuEventHandler - Set the XMenu asynchronous event handler. * * Author: Tony Della Fera, DEC * December 19, 1985 * */ #include "XMenuInt.h" XMenuEventHandler(handler) int (*handler)(); { /* * Set the global event handler variable. */ _XMEventHandler = handler; }