static PyObject *get_menu (genericobject *g){	/* XXX strictly speaking this is wrong since fl_get_menu	   XXX returns long, not int */	return call_forms_Ri (fl_get_menu, g-> ob_generic);} static PyObject *get_menu_text (genericobject *g){	return call_forms_Rstr (fl_get_menu_text, g-> ob_generic);} static PyObject *addto_menu (genericobject *g, PyObject *args){	return call_forms_INstr (fl_addto_menu, g-> ob_generic, args);} static PyMethodDef menu_methods[] = {	{"set_menu",		(PyCFunction)set_menu,      METH_OLDARGS},	{"get_menu",		(PyCFunction)get_menu,      METH_NOARGS},	{"get_menu_text",	(PyCFunction)get_menu_text, METH_NOARGS},	{"addto_menu",		(PyCFunction)addto_menu,    METH_OLDARGS},	{NULL,			NULL}		/* sentinel */};  /* Class: Sliders */ static PyObject *get_slider_value(genericobject *g){	return call_forms_Rf (fl_get_slider_value, g-> ob_generic);} static PyObject *set_slider_value (genericobject *g, PyObject *args){	return call_forms_INf (fl_set_slider_value, g-> ob_generic, args);} static PyObject *set_slider_bounds (genericobject *g, PyObject *args){	return call_forms_INfINf (fl_set_slider_bounds, g-> ob_generic, args);} static PyObject *get_slider_bounds (genericobject *g){	return call_forms_OUTfOUTf(fl_get_slider_bounds, g-> ob_generic);} static PyObject *set_slider_return (genericobject *g, PyObject *args){	return call_forms_INf (fl_set_slider_return, g-> ob_generic, args);} static PyObject *set_slider_size (genericobject *g, PyObject *args){	return call_forms_INf (fl_set_slider_size, g-> ob_generic, args);} static PyObject *set_slider_precision (genericobject *g, PyObject *args){	return call_forms_INi (fl_set_slider_precision, g-> ob_generic, args);} static PyObject *set_slider_step (genericobject *g, PyObject *args){	return call_forms_INf (fl_set_slider_step, g-> ob_generic, args);}  static PyMethodDef slider_methods[] = {	{"set_slider_value",	(PyCFunction)set_slider_value,  METH_OLDARGS},	{"get_slider_value",	(PyCFunction)get_slider_value,  METH_NOARGS},	{"set_slider_bounds",	(PyCFunction)set_slider_bounds, METH_OLDARGS},	{"get_slider_bounds",	(PyCFunction)get_slider_bounds, METH_NOARGS},	{"set_slider_return",	(PyCFunction)set_slider_return, METH_OLDARGS},	{"set_slider_size",	(PyCFunction)set_slider_size,   METH_OLDARGS},	{"set_slider_precision",(PyCFunction)set_slider_precision, METH_OLDARGS},	{"set_slider_step",	(PyCFunction)set_slider_step,   METH_OLDARGS},	{NULL,			NULL}		/* sentinel */}; static PyObject *set_positioner_xvalue (genericobject *g, PyObject *args){	return call_forms_INf (fl_set_positioner_xvalue, g-> ob_generic, args);} static PyObject *set_positioner_xbounds (genericobject *g, PyObject *args){	return call_forms_INfINf (fl_set_positioner_xbounds,				  g-> ob_generic, args);} static PyObject *set_positioner_yvalue (genericobject *g, PyObject *args){	return call_forms_INf (fl_set_positioner_yvalue, g-> ob_generic, args);} static PyObject *set_positioner_ybounds (genericobject *g, PyObject *args){	return call_forms_INfINf (fl_set_positioner_ybounds,				  g-> ob_generic, args);} static PyObject *get_positioner_xvalue (genericobject *g){	return call_forms_Rf (fl_get_positioner_xvalue, g-> ob_generic);} static PyObject *get_positioner_xbounds (genericobject *g){	return call_forms_OUTfOUTf (fl_get_positioner_xbounds, g-> ob_generic);} static PyObject *get_positioner_yvalue (genericobject *g){	return call_forms_Rf (fl_get_positioner_yvalue, g-> ob_generic);} static PyObject *get_positioner_ybounds (genericobject *g){	return call_forms_OUTfOUTf (fl_get_positioner_ybounds, g-> ob_generic);} static PyMethodDef positioner_methods[] = {	{"set_positioner_xvalue",	(PyCFunction)set_positioner_xvalue,	 METH_OLDARGS},	{"set_positioner_yvalue",	(PyCFunction)set_positioner_yvalue,	 METH_OLDARGS},	{"set_positioner_xbounds",	(PyCFunction)set_positioner_xbounds,	 METH_OLDARGS},	{"set_positioner_ybounds",	(PyCFunction)set_positioner_ybounds,	 METH_OLDARGS},	{"get_positioner_xvalue",	(PyCFunction)get_positioner_xvalue,	 METH_NOARGS},	{"get_positioner_yvalue",	(PyCFunction)get_positioner_yvalue,	 METH_NOARGS},	{"get_positioner_xbounds",	(PyCFunction)get_positioner_xbounds,	 METH_NOARGS},	{"get_positioner_ybounds",	(PyCFunction)get_positioner_ybounds,	 METH_NOARGS},	{NULL,			NULL}		/* sentinel */}; /* Class timer */ static PyObject *set_timer (genericobject *g, PyObject *args){	return call_forms_INf (fl_set_timer, g-> ob_generic, args);} static PyObject *get_timer (genericobject *g){	return call_forms_Rf (fl_get_timer, g-> ob_generic);} static PyMethodDef timer_methods[] = {	{"set_timer",		(PyCFunction)set_timer, METH_OLDARGS},	{"get_timer",		(PyCFunction)get_timer, METH_NOARGS},	{NULL,			NULL}		/* sentinel */}; /* Form objects */ typedef struct {	PyObject_HEAD	FL_FORM *ob_form;} formobject; static PyTypeObject Formtype; #define is_formobject(v) ((v)->ob_type == &Formtype) static PyObject *form_show_form(formobject *f, PyObject *args){	int place, border;	char *name;	if (!PyArg_Parse(args, "(iis)", &place, &border, &name))		return NULL;	fl_show_form(f->ob_form, place, border, name);	Py_INCREF(Py_None);	return Py_None;} static PyObject *form_call(void (*func)(FL_FORM *), FL_FORM *f){	(*func)(f); 	Py_INCREF(Py_None);	return Py_None;} static PyObject *form_call_INiINi(void (*func)(FL_FORM *, int, int), FL_FORM *f, PyObject *args){	int a, b; 	if (!PyArg_Parse(args, "(ii)", &a, &b)) return NULL; 	(*func)(f, a, b); 	Py_INCREF(Py_None);	return Py_None;} static PyObject *form_call_INfINf(void (*func)(FL_FORM *, float, float), FL_FORM *f, PyObject *args){	float a, b; 	if (!PyArg_Parse(args, "(ff)", &a, &b)) return NULL; 	(*func)(f, a, b); 	Py_INCREF(Py_None);	return Py_None;} static PyObject *form_hide_form(formobject *f){	return form_call(fl_hide_form, f-> ob_form);} static PyObject *form_redraw_form(formobject *f){	return form_call(fl_redraw_form, f-> ob_form);} static PyObject *form_set_form_position(formobject *f, PyObject *args){	return form_call_INiINi(fl_set_form_position, f-> ob_form, args);} static PyObject *form_set_form_size(formobject *f, PyObject *args){	return form_call_INiINi(fl_set_form_size, f-> ob_form, args);} static PyObject *form_scale_form(formobject *f, PyObject *args){	return form_call_INfINf(fl_scale_form, f-> ob_form, args);} static PyObject *generic_add_object(formobject *f, PyObject *args, FL_OBJECT *(*func)(int, float, float, float, float, char*), PyMethodDef *internal_methods){	int type;	float x, y, w, h;	char *name;	FL_OBJECT *obj; 	if (!PyArg_Parse(args,"(iffffs)", &type,&x,&y,&w,&h,&name))		return NULL; 	fl_addto_form (f-> ob_form); 	obj = (*func) (type, x, y, w, h, name); 	fl_end_form(); 	if (obj == NULL) {		PyErr_NoMemory();		return NULL;	} 	return newgenericobject (obj, internal_methods);} static PyObject *form_add_button(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_button, button_methods);} static PyObject *form_add_lightbutton(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_lightbutton, button_methods);} static PyObject *form_add_roundbutton(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_roundbutton, button_methods);} static PyObject *form_add_menu (formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_menu, menu_methods);} static PyObject *form_add_slider(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_slider, slider_methods);} static PyObject *form_add_valslider(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_valslider, slider_methods);} static PyObject *form_add_dial(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_dial, dial_methods);} static PyObject *form_add_counter(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_counter, counter_methods);} static PyObject *form_add_clock(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_clock, clock_methods);} static PyObject *form_add_box(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_box,				  (PyMethodDef *)NULL);} static PyObject *form_add_choice(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_choice, choice_methods);} static PyObject *form_add_browser(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_browser, browser_methods);} static PyObject *form_add_positioner(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_positioner,				  positioner_methods);} static PyObject *form_add_input(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_input, input_methods);} static PyObject *form_add_text(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_text,				  (PyMethodDef *)NULL);} static PyObject *form_add_timer(formobject *f, PyObject *args){	return generic_add_object(f, args, fl_add_timer, timer_methods);} static PyObject *form_freeze_form(formobject *f){	return form_call(fl_freeze_form, f-> ob_form);} static PyObject *form_unfreeze_form(formobject *f){	return form_call(fl_unfreeze_form, f-> ob_form);} static PyObject *form_activate_form(formobject *f){	return form_call(fl_activate_form, f-> ob_form);} static PyObject *form_deactivate_form(formobject *f){	return form_call(fl_deactivate_form, f-> ob_form);} static PyObject *form_bgn_group(formobject *f, PyObject *args){	FL_OBJECT *obj; 	fl_addto_form(f-> ob_form);	obj = fl_bgn_group();	fl_end_form(); 	if (obj == NULL) {		PyErr_NoMemory();		return NULL;	} 	return newgenericobject (obj, (PyMethodDef *) NULL);} static PyObject *form_end_group(formobject *f, PyObject *args){	fl_addto_form(f-> ob_form);	fl_end_group();	fl_end_form();	Py_INCREF(Py_None);	return Py_None;} static PyObject *forms_find_first_or_last(FL_OBJECT *(*func)(FL_FORM *, int, float, float), formobject *f, PyObject *args){	int type;	float mx, my;	FL_OBJECT *generic;	genericobject *g;		if (!PyArg_Parse(args, "(iff)", &type, &mx, &my)) return NULL; 	generic = (*func) (f-> ob_form, type, mx, my); 	if (generic == NULL)	{		Py_INCREF(Py_None);		return Py_None;	} 	g = findgeneric(generic);	if (g == NULL) {		PyErr_SetString(PyExc_RuntimeError,			   "forms_find_{first|last} returns unknown object");		return NULL;	}	Py_INCREF(g);	return (PyObject *) g;} static PyObject *form_find_first(formobject *f, PyObject *args){	return forms_find_first_or_last(fl_find_first, f, args);} static PyObject *form_find_last(formobject *f, PyObject *args){	return forms_find_first_or_last(fl_find_last, f, args);} static PyObject *form_set_object_focus(formobject *f, PyObject *args){	genericobject *g;	if (args == NULL || !is_genericobject(args)) {		PyErr_BadArgument();		return NULL;	}	g = (genericobject *)args;	fl_set_object_focus(f->ob_form, g->ob_generic);	Py_INCREF(Py_None);	return Py_None;} 

Lines 1001–1500 of 2139. Previous lines Load more