/* ex: set ro ft=c:
 * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
 *
 * This file is generated automatically from './src/vm/parrot/pmc/qrpa.pmc'
 * by ../../../../local/lib/parrot/5.4.0/tools/build/pmc2c.pl.
 *
 * Any changes made here will be lost!
 *
 */

/* HEADERIZER HFILE: none */
/* HEADERIZER STOP */


#ifndef PARROT_PMC_QRPA_H_GUARD
#define PARROT_PMC_QRPA_H_GUARD

#define PARROT_IN_EXTENSION
PARROT_DYNEXT_EXPORT VTABLE* Parrot_QRPA_get_vtable_pointer(PARROT_INTERP);
PARROT_DYNEXT_EXPORT void    Parrot_QRPA_class_init(PARROT_INTERP, int, int);
PARROT_DYNEXT_EXPORT VTABLE* Parrot_QRPA_update_vtable(ARGMOD(VTABLE*));
PARROT_DYNEXT_EXPORT VTABLE* Parrot_QRPA_ro_update_vtable(ARGMOD(VTABLE*));
PARROT_DYNEXT_EXPORT VTABLE* Parrot_QRPA_get_vtable(PARROT_INTERP);
PARROT_DYNEXT_EXPORT VTABLE* Parrot_QRPA_ro_get_vtable(PARROT_INTERP);
PARROT_DYNEXT_EXPORT PMC*    Parrot_QRPA_get_mro(PARROT_INTERP, ARGMOD(PMC* mro));
PARROT_DYNEXT_EXPORT Hash*   Parrot_QRPA_get_isa(PARROT_INTERP, ARGMOD_NULLOK(Hash* isa));

/* QRPA PMC's underlying struct. */
typedef struct Parrot_QRPA_attributes {
    INTVAL elems;
    INTVAL start;
    INTVAL ssize;
    PMC    ** slots;
} Parrot_QRPA_attributes;

/* Macro to access underlying structure of a QRPA PMC. */
#define PARROT_QRPA(o) ((Parrot_QRPA_attributes *) PMC_data(o))


/* Generated macro accessors for 'elems' attribute of QRPA PMC. */
#define GETATTR_QRPA_elems(interp, pmc, dest) \
    do { \
        if (!PObj_is_object_TEST(pmc)) { \
            (dest) = ((Parrot_QRPA_attributes *)PMC_data(pmc))->elems; \
        } \
        else { \
            PMC * const attr_value = VTABLE_get_attr_str(interp, \
                              pmc, Parrot_str_new_constant(interp, "elems")); \
            (dest) = (PMC_IS_NULL(attr_value) ? (INTVAL) 0: VTABLE_get_integer(interp, attr_value)); \
        } \
    } while (0)

#define SETATTR_QRPA_elems(interp, pmc, value) \
    do { \
        if (PObj_is_object_TEST(pmc)) { \
            PMC * const attr_value = Parrot_pmc_new_init_int(interp, enum_class_Integer, value); \
            VTABLE_set_attr_str(interp, pmc, \
                              Parrot_str_new_constant(interp, "elems"), attr_value); \
        } \
        else \
            ((Parrot_QRPA_attributes *)PMC_data(pmc))->elems = (value); \
    } while (0)


/* Generated macro accessors for 'start' attribute of QRPA PMC. */
#define GETATTR_QRPA_start(interp, pmc, dest) \
    do { \
        if (!PObj_is_object_TEST(pmc)) { \
            (dest) = ((Parrot_QRPA_attributes *)PMC_data(pmc))->start; \
        } \
        else { \
            PMC * const attr_value = VTABLE_get_attr_str(interp, \
                              pmc, Parrot_str_new_constant(interp, "start")); \
            (dest) = (PMC_IS_NULL(attr_value) ? (INTVAL) 0: VTABLE_get_integer(interp, attr_value)); \
        } \
    } while (0)

#define SETATTR_QRPA_start(interp, pmc, value) \
    do { \
        if (PObj_is_object_TEST(pmc)) { \
            PMC * const attr_value = Parrot_pmc_new_init_int(interp, enum_class_Integer, value); \
            VTABLE_set_attr_str(interp, pmc, \
                              Parrot_str_new_constant(interp, "start"), attr_value); \
        } \
        else \
            ((Parrot_QRPA_attributes *)PMC_data(pmc))->start = (value); \
    } while (0)


/* Generated macro accessors for 'ssize' attribute of QRPA PMC. */
#define GETATTR_QRPA_ssize(interp, pmc, dest) \
    do { \
        if (!PObj_is_object_TEST(pmc)) { \
            (dest) = ((Parrot_QRPA_attributes *)PMC_data(pmc))->ssize; \
        } \
        else { \
            PMC * const attr_value = VTABLE_get_attr_str(interp, \
                              pmc, Parrot_str_new_constant(interp, "ssize")); \
            (dest) = (PMC_IS_NULL(attr_value) ? (INTVAL) 0: VTABLE_get_integer(interp, attr_value)); \
        } \
    } while (0)

#define SETATTR_QRPA_ssize(interp, pmc, value) \
    do { \
        if (PObj_is_object_TEST(pmc)) { \
            PMC * const attr_value = Parrot_pmc_new_init_int(interp, enum_class_Integer, value); \
            VTABLE_set_attr_str(interp, pmc, \
                              Parrot_str_new_constant(interp, "ssize"), attr_value); \
        } \
        else \
            ((Parrot_QRPA_attributes *)PMC_data(pmc))->ssize = (value); \
    } while (0)


/* Generated macro accessors for 'slots' attribute of QRPA PMC. */
#define GETATTR_QRPA_slots(interp, pmc, dest) \
    do { \
        if (!PObj_is_object_TEST(pmc)) { \
            (dest) = ((Parrot_QRPA_attributes *)PMC_data(pmc))->slots; \
        } \
        else { \
            Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION, \
                "Attributes of type 'PMC    **' cannot be " \
                "subclassed from a high-level PMC."); \
        } \
    } while (0)

#define SETATTR_QRPA_slots(interp, pmc, value) \
    do { \
        if (PObj_is_object_TEST(pmc)) { \
            Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION, \
                "Attributes of type 'PMC    **' cannot be " \
                "subclassed from a high-level PMC."); \
        } \
        else \
            ((Parrot_QRPA_attributes *)PMC_data(pmc))->slots = (value); \
    } while (0)


PARROT_DYNEXT_EXPORT Parrot_PMC Parrot_lib_qrpa_load(PARROT_INTERP);

#ifndef PARROT_DYNPMC_CLASS_LOAD
PARROT_DATA INTVAL dynpmc_class_QRPA;
#endif

#endif /* PARROT_PMC_QRPA_H_GUARD */

/*
 * Local variables:
 *   c-file-style: "parrot"
 * End:
 * vim: expandtab shiftwidth=4:
 */

