Scheme_Object* spark_fltk_group::find(int argc, Scheme_Object** argv) { DEFAULT_RET_INIT; Fl_Group* group = _get_fl_group(argc, argv, 0); if (group) { Fl_Widget* widget = spark_fltk::_get_widget(argc, argv, 1); if (widget) { int i = group->find(*widget); _ret_ = scheme_make_integer(i); } } DEFAULT_RET_FINISH; }