/*
**	button.c
**
*/

#include <X11/Intrinsic.h>
#include <X11/Command.h>
#include <X11/StringDefs.h>
#include <X11/Form.h>

void make_button (parent_widget,
		button_widget, button_name, button_string, button_calls, 
		left_neighbour, left_distance, top_neighbour, top_distance)

Widget		parent_widget, *button_widget, left_neighbour, top_neighbour;
String		button_name, button_string;
XtCallbackRec	button_calls [];
int		left_distance, top_distance;

{
	int	i;
	Arg	button_args [30];

	i = 0;
	XtSetArg (button_args [i], XtNcallback, (XtArgVal) button_calls);
	i++;
	XtSetArg (button_args [i], XtNlabel, (XtArgVal) button_string);
	i++;
	XtSetArg (button_args [i], XtNfromHoriz, (XtArgVal) left_neighbour);
	i++;
	XtSetArg (button_args [i], XtNhorizDistance, (XtArgVal) left_distance);
	i++;
	XtSetArg (button_args [i], XtNfromVert, (XtArgVal) top_neighbour);
	i++;
	XtSetArg (button_args [i], XtNvertDistance, (XtArgVal) top_distance);
	i++;

	*button_widget = XtCreateManagedWidget (button_name, commandWidgetClass,
				parent_widget, button_args, i);
}