Home
last modified time | relevance | path

Searched refs:r_stride (Results 1 – 2 of 2) sorted by relevance

/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Ddependency.c1426 gfc_expr *r_stride; in check_section_vs_section() local
1445 r_stride = r_ar->stride[n]; in check_section_vs_section()
1473 if (!r_stride) in check_section_vs_section()
1475 else if (r_stride->expr_type == EXPR_CONSTANT in check_section_vs_section()
1476 && r_stride->ts.type == BT_INTEGER) in check_section_vs_section()
1477 r_dir = mpz_sgn (r_stride->value.integer); in check_section_vs_section()
1497 r_stride ? r_stride : one_expr); in check_section_vs_section()
1575 if (IS_CONSTANT_INTEGER (l_stride) && IS_CONSTANT_INTEGER (r_stride) in check_section_vs_section()
1582 mpz_gcd (gcd, l_stride->value.integer, r_stride->value.integer); in check_section_vs_section()
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Ddependency.cc1427 gfc_expr *r_stride; in check_section_vs_section() local
1446 r_stride = r_ar->stride[n]; in check_section_vs_section()
1474 if (!r_stride) in check_section_vs_section()
1476 else if (r_stride->expr_type == EXPR_CONSTANT in check_section_vs_section()
1477 && r_stride->ts.type == BT_INTEGER) in check_section_vs_section()
1478 r_dir = mpz_sgn (r_stride->value.integer); in check_section_vs_section()
1498 r_stride ? r_stride : one_expr); in check_section_vs_section()
1576 if (IS_CONSTANT_INTEGER (l_stride) && IS_CONSTANT_INTEGER (r_stride) in check_section_vs_section()
1583 mpz_gcd (gcd, l_stride->value.integer, r_stride->value.integer); in check_section_vs_section()