Mercurial > emacs
annotate oldXMenu/EvHand.c @ 71872:b20203b004f8
(Fthrow): Remove loop around Fsignal.
(Feval, Fapply, Ffuncall): Optimize for no function indirection.
Use original function name in all signaled errors.
Simplify Fsignal calls (no return).
(funcall_lambda): Simplify Fsignal calls (no return).
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Thu, 13 Jul 2006 13:43:50 +0000 |
parents | e8a3fb527b77 |
children | ce127a46b1ca d04d8ccb3c41 c5406394f567 |
rev | line source |
---|---|
25858 | 1 #include "copyright.h" |
2 | |
3 /* Copyright Massachusetts Institute of Technology 1985 */ | |
68640
e8a3fb527b77
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
65000
diff
changeset
|
4 /* Copyright (C) 2002, 2003, 2004, 2005, |
e8a3fb527b77
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
65000
diff
changeset
|
5 2006 Free Software Foundation, Inc. */ |
25858 | 6 |
7 /* | |
8 * XMenu: MIT Project Athena, X Window system menu package | |
9 * | |
10 * XMenuEventHandler - Set the XMenu asynchronous event handler. | |
11 * | |
12 * Author: Tony Della Fera, DEC | |
13 * December 19, 1985 | |
14 * | |
15 */ | |
16 | |
17 #include "XMenuInt.h" | |
18 | |
19 XMenuEventHandler(handler) | |
20 int (*handler)(); | |
21 { | |
22 /* | |
23 * Set the global event handler variable. | |
24 */ | |
25 _XMEventHandler = handler; | |
26 } | |
27 | |
52401 | 28 /* arch-tag: 8d614c8c-94d9-43c8-8e32-c438a3c8a8a3 |
29 (do not change this comment) */ |