/*
 * call-seq:
 *      data? -> bool
 *
 * +true+ iff the message is a data message.
 */
static VALUE
sm_is_data_msg(VALUE obj)
{
    struct SpreadMessage *sp_mess;

    Data_Get_Struct(obj, struct SpreadMessage, sp_mess);
    return INT2BOOL(Is_regular_mess(sp_mess->service_type));
}