comparison src/gui-msw.c @ 771:943eaba38521

[xemacs-hg @ 2002-03-13 08:51:24 by ben] The big ben-mule-21-5 check-in! Various files were added and deleted. See CHANGES-ben-mule. There are still some test suite failures. No crashes, though. Many of the failures have to do with problems in the test suite itself rather than in the actual code. I'll be addressing these in the next day or so -- none of the test suite failures are at all critical. Meanwhile I'll be trying to address the biggest issues -- i.e. build or run failures, which will almost certainly happen on various platforms. All comments should be sent to ben@xemacs.org -- use a Cc: if necessary when sending to mailing lists. There will be pre- and post- tags, something like pre-ben-mule-21-5-merge-in, and post-ben-mule-21-5-merge-in.
author ben
date Wed, 13 Mar 2002 08:54:06 +0000
parents abe6d1db359e
children e38acbeb1cae
comparison
equal deleted inserted replaced
770:336a418893b5 771:943eaba38521
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, 18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */ 19 Boston, MA 02111-1307, USA. */
20 20
21 /* Synched up with: Not in FSF. */ 21 /* Synched up with: Not in FSF. */
22 22
23 /* This file essentially Mule-ized (except perhaps some Unicode splitting).
24 5-2000. */
25
23 #include <config.h> 26 #include <config.h>
24 #include "lisp.h" 27 #include "lisp.h"
25 #include "console-msw.h" 28 #include "console-msw.h"
26 #include "redisplay.h" 29 #include "redisplay.h"
27 #include "gui.h" 30 #include "gui.h"
36 * or Qnil if id has not been mapped to a callback. 39 * or Qnil if id has not been mapped to a callback.
37 * Window procedure may try other targets to route the 40 * Window procedure may try other targets to route the
38 * command if we return nil 41 * command if we return nil
39 */ 42 */
40 Lisp_Object 43 Lisp_Object
41 mswindows_handle_gui_wm_command (struct frame* f, HWND ctrl, LPARAM id) 44 mswindows_handle_gui_wm_command (struct frame *f, HWND ctrl, LPARAM id)
42 { 45 {
43 /* Try to map the command id through the proper hash table */ 46 /* Try to map the command id through the proper hash table */
44 Lisp_Object callback, callback_ex, image_instance, frame, event; 47 Lisp_Object callback, callback_ex, image_instance, frame, event;
45 48
46 XSETFRAME (frame, f); 49 XSETFRAME (frame, f);