openbmc/build/tmp/deploy/sdk/witherspoon-2019-08-08/sysroots/x86_64-oesdk-linux/usr/lib/arm-openbmc-linux-gnueabi/gcc/arm-openbmc-linux-gnueabi/9.1.0/plugin/include/gtype-fortran.h
void gt_ggc_mx_lang_type(void* x_p)
{
    struct lang_type* const x = (struct lang_type*)x_p;
    if (ggc_test_and_set_mark(x))
    {
        {
            size_t i0;
            size_t l0 = (size_t)(GFC_MAX_DIMENSIONS);
            for (i0 = 0; i0 != l0; i0++)
            {
                gt_ggc_m_9tree_node((*x).lbound[i0]);
            }
        }
        {
            size_t i1;
            size_t l1 = (size_t)(GFC_MAX_DIMENSIONS);
            for (i1 = 0; i1 != l1; i1++)
            {
                gt_ggc_m_9tree_node((*x).ubound[i1]);
            }
        }
        {
            size_t i2;
            size_t l2 = (size_t)(GFC_MAX_DIMENSIONS);
            for (i2 = 0; i2 != l2; i2++)
            {
                gt_ggc_m_9tree_node((*x).stride[i2]);
            }
        }
        gt_ggc_m_9tree_node((*x).size);
        gt_ggc_m_9tree_node((*x).offset);
        gt_ggc_m_9tree_node((*x).dtype);
        gt_ggc_m_9tree_node((*x).dataptr_type);
        gt_ggc_m_9tree_node((*x).span);
        {
            size_t i3;
            size_t l3 = (size_t)(2);
            for (i3 = 0; i3 != l3; i3++)
            {
                gt_ggc_m_9tree_node((*x).base_decl[i3]);
            }
        }
        gt_ggc_m_9tree_node((*x).nonrestricted_type);
        gt_ggc_m_9tree_node((*x).caf_token);
        gt_ggc_m_9tree_node((*x).caf_offset);
    }
}
/* This file is machine generated.  Do not edit.  */
This file is machine generated.  Do not edit.
This file is machine generated . Do not edit .
void gt_ggc_mx_lang_type(void* x_p)
{
    struct lang_type* const x = (struct lang_type*)x_p;
    if (ggc_test_and_set_mark(x))
    {
        {
            size_t i0;
            size_t l0 = (size_t)(GFC_MAX_DIMENSIONS);
            for (i0 = 0; i0 != l0; i0++)
            {
                gt_ggc_m_9tree_node((*x).lbound[i0]);
            }
        }
        {
            size_t i1;
            size_t l1 = (size_t)(GFC_MAX_DIMENSIONS);
            for (i1 = 0; i1 != l1; i1++)
            {
                gt_ggc_m_9tree_node((*x).ubound[i1]);
            }
        }
        {
            size_t i2;
            size_t l2 = (size_t)(GFC_MAX_DIMENSIONS);
            for (i2 = 0; i2 != l2; i2++)
            {
                gt_ggc_m_9tree_node((*x).stride[i2]);
            }
        }
        gt_ggc_m_9tree_node((*x).size);
        gt_ggc_m_9tree_node((*x).offset);
        gt_ggc_m_9tree_node((*x).dtype);
        gt_ggc_m_9tree_node((*x).dataptr_type);
        gt_ggc_m_9tree_node((*x).span);
        {
            size_t i3;
            size_t l3 = (size_t)(2);
            for (i3 = 0; i3 != l3; i3++)
            {
                gt_ggc_m_9tree_node((*x).base_decl[i3]);
            }
        }
        gt_ggc_m_9tree_node((*x).nonrestricted_type);
        gt_ggc_m_9tree_node((*x).caf_token);
        gt_ggc_m_9tree_node((*x).caf_offset);
    }
}
void gt_ggc_mx_lang_type ( void * x_p ) { struct lang_type * const x = ( struct lang_type * ) x_p ; if ( ggc_test_and_set_mark ( x ) ) { { size_t i0 ; size_t l0 = ( size_t ) ( GFC_MAX_DIMENSIONS ) ; for ( i0 = 0 ; i0 != l0 ; i0 ++ ) { gt_ggc_m_9tree_node ( ( * x ) . lbound [ i0 ] ) ; } } { size_t i1 ; size_t l1 = ( size_t ) ( GFC_MAX_DIMENSIONS ) ; for ( i1 = 0 ; i1 != l1 ; i1 ++ ) { gt_ggc_m_9tree_node ( ( * x ) . ubound [ i1 ] ) ; } } { size_t i2 ; size_t l2 = ( size_t ) ( GFC_MAX_DIMENSIONS ) ; for ( i2 = 0 ; i2 != l2 ; i2 ++ ) { gt_ggc_m_9tree_node ( ( * x ) . stride [ i2 ] ) ; } } gt_ggc_m_9tree_node ( ( * x ) . size ) ; gt_ggc_m_9tree_node ( ( * x ) . offset ) ; gt_ggc_m_9tree_node ( ( * x ) . dtype ) ; gt_ggc_m_9tree_node ( ( * x ) . dataptr_type ) ; gt_ggc_m_9tree_node ( ( * x ) . span ) ; { size_t i3 ; size_t l3 = ( size_t ) ( 2 ) ; for ( i3 = 0 ; i3 != l3 ; i3 ++ ) { gt_ggc_m_9tree_node ( ( * x ) . base_decl [ i3 ] ) ; } } gt_ggc_m_9tree_node ( ( * x ) . nonrestricted_type ) ; gt_ggc_m_9tree_node ( ( * x ) . caf_token ) ; gt_ggc_m_9tree_node ( ( * x ) . caf_offset ) ; } }
This file is machine generated.
This file is machine generated .