range.h

#ifndef INTERNAL_RANGE_H                                  /*-*-C-*-vi:se ft=c:*/
#define INTERNAL_RANGE_H
#include "internal/struct.h"    /* for RSTRUCT */
 
#define RANGE_FL_INIT FL_USER18
#define RANGE_FL_EXCL FL_USER19
 
/* range.c */
static inline VALUE RANGE_BEG(VALUE r);
static inline VALUE RANGE_END(VALUE r);
static inline VALUE RANGE_EXCL(VALUE r);
 
static inline VALUE
RANGE_BEG(VALUE r)
{
    return RSTRUCT_GET_RAW(r, 0);
}
 
static inline VALUE
RANGE_END(VALUE r)
{
    return RSTRUCT_GET_RAW(r, 1);
}
 
static inline VALUE
RANGE_EXCL(VALUE r)
{
    if (FL_TEST_RAW(r, RANGE_FL_INIT)) {
        return RBOOL(FL_TEST_RAW(r, RANGE_FL_EXCL));
    }
    return Qnil;
}
 
VALUE
rb_range_component_beg_len(VALUE b, VALUE e, int excl,
                           rb_len_t *begp, rb_len_t *lenp, rb_len_t len, int err);
 
#endif /* INTERNAL_RANGE_H */