return grob_stencil_extent (me, X_AXIS);
}
-Stream_event*
-Grob::event_cause ()
-{
- SCM cause = get_property ("cause");
- if (to_boolean (Stream_event::smob_p (cause)))
- return unsmob_stream_event (cause);
- else if (to_boolean (Grob::smob_p (cause)))
- return unsmob_grob (cause)->event_cause ();
-
- return 0;
-}
Grob *
common_refpoint_of_list (SCM elist, Grob *common, Axis a)