X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/5df4f04cd32af723742c81095b38ae83b3c2b462..HEAD:/lwlib/lwlib-Xlw.c
diff --git a/lwlib/lwlib-Xlw.c b/lwlib/lwlib-Xlw.c
index d6cbb3382f..f7713a116f 100644
--- a/lwlib/lwlib-Xlw.c
+++ b/lwlib/lwlib-Xlw.c
@@ -1,7 +1,7 @@
/* The lwlib interface to "xlwmenu" menus.
- Copyright (C) 1992 Lucid, Inc.
- Copyright (C) 1994, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
- 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
+
+Copyright (C) 1992 Lucid, Inc.
+Copyright (C) 1994, 2000-2016 Free Software Foundation, Inc.
This file is part of the Lucid Widget Library.
@@ -16,16 +16,12 @@ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
-along with GNU Emacs; see the file COPYING. If not, write to
-the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
-Boston, MA 02110-1301, USA. */
+along with GNU Emacs. If not, see . */
-#ifdef HAVE_CONFIG_H
#include
-#endif
#include
-#include "lisp.h"
+#include
#include "lwlib-Xlw.h"
#include
@@ -43,8 +39,7 @@ Boston, MA 02110-1301, USA. */
This is sometimes handy to have available. */
void
-x_print_complete_resource_name (widget)
- Widget widget;
+x_print_complete_resource_name (Widget widget)
{
int i;
String names[100];
@@ -72,10 +67,7 @@ x_print_complete_resource_name (widget)
if there isn't any highlighted menu item. */
static void
-highlight_hook (w, client_data, call_data)
- Widget w;
- XtPointer client_data;
- XtPointer call_data;
+highlight_hook (Widget w, XtPointer client_data, XtPointer call_data)
{
widget_instance *instance = (widget_instance *) client_data;
@@ -85,29 +77,20 @@ highlight_hook (w, client_data, call_data)
}
static void
-enter_hook (w, client_data, call_data)
- Widget w;
- XtPointer client_data;
- XtPointer call_data;
+enter_hook (Widget w, XtPointer client_data, XtPointer call_data)
{
highlight_hook (w, client_data, call_data);
}
static void
-leave_hook (w, client_data, call_data)
- Widget w;
- XtPointer client_data;
- XtPointer call_data;
+leave_hook (Widget w, XtPointer client_data, XtPointer call_data)
{
highlight_hook (w, client_data, NULL);
}
static void
-pre_hook (w, client_data, call_data)
- Widget w;
- XtPointer client_data;
- XtPointer call_data;
+pre_hook (Widget w, XtPointer client_data, XtPointer call_data)
{
widget_instance* instance = (widget_instance*)client_data;
widget_value* val;
@@ -122,10 +105,7 @@ pre_hook (w, client_data, call_data)
}
static void
-pick_hook (w, client_data, call_data)
- Widget w;
- XtPointer client_data;
- XtPointer call_data;
+pick_hook (Widget w, XtPointer client_data, XtPointer call_data)
{
widget_instance* instance = (widget_instance*)client_data;
widget_value* contents_val = (widget_value*)call_data;
@@ -150,8 +130,7 @@ pick_hook (w, client_data, call_data)
/* creation functions */
static Widget
-xlw_create_menubar (instance)
- widget_instance* instance;
+xlw_create_menubar (widget_instance *instance)
{
Widget widget;
Arg al[5];
@@ -178,8 +157,7 @@ xlw_create_menubar (instance)
}
static Widget
-xlw_create_popup_menu (instance)
- widget_instance* instance;
+xlw_create_popup_menu (widget_instance *instance)
{
Widget popup_shell
= XtCreatePopupShell (instance->info->name, overrideShellWidgetClass,
@@ -214,8 +192,7 @@ xlw_creation_table [] =
};
Boolean
-lw_lucid_widget_p (widget)
- Widget widget;
+lw_lucid_widget_p (Widget widget)
{
WidgetClass the_class = XtClass (widget);
@@ -228,16 +205,8 @@ lw_lucid_widget_p (widget)
}
void
-#ifdef PROTOTYPES
xlw_update_one_widget (widget_instance* instance, Widget widget,
widget_value* val, Boolean deep_p)
-#else
-xlw_update_one_widget (instance, widget, val, deep_p)
- widget_instance* instance;
- Widget widget;
- widget_value* val;
- Boolean deep_p;
-#endif
{
Arg al[1];
@@ -249,29 +218,20 @@ xlw_update_one_widget (instance, widget, val, deep_p)
}
void
-xlw_update_one_value (instance, widget, val)
- widget_instance* instance;
- Widget widget;
- widget_value* val;
+xlw_update_one_value (widget_instance *instance,
+ Widget widget,
+ widget_value *val)
{
return;
}
void
-#ifdef PROTOTYPES
xlw_pop_instance (widget_instance* instance, Boolean up)
-#else
-xlw_pop_instance (instance, up)
- widget_instance* instance;
- Boolean up;
-#endif
{
}
void
-xlw_popup_menu (widget, event)
- Widget widget;
- XEvent *event;
+xlw_popup_menu (Widget widget, XEvent *event)
{
XlwMenuWidget mw;
@@ -304,12 +264,8 @@ xlw_popup_menu (widget, event)
/* Destruction of instances */
void
-xlw_destroy_instance (instance)
- widget_instance* instance;
+xlw_destroy_instance (widget_instance *instance)
{
if (instance->widget)
XtDestroyWidget (instance->widget);
}
-
-/* arch-tag: 541e3912-477d-406e-9bf2-dbf2b7ff8c3b
- (do not change this comment) */