| /dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/fortran/ |
| H A D | resolve.c | 3954 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
3957 comparison comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
3971 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
3977 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
3981 mpz_get_si (AR_START->value.integer), in check_dimension()
3985 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
3989 mpz_get_si (AR_START->value.integer), in check_dimension()
3998 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4022 #undef AR_START in check_dimension()
|
| /dports/lang/gcc48/gcc-4.8.5/gcc/fortran/ |
| H A D | resolve.c | 4433 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4436 comparison comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4450 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4456 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4460 mpz_get_si (AR_START->value.integer), in check_dimension()
4464 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4468 mpz_get_si (AR_START->value.integer), in check_dimension()
4477 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4501 #undef AR_START in check_dimension()
|
| /dports/devel/mingw32-gcc/gcc-4.8.1/gcc/fortran/ |
| H A D | resolve.c | 4438 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4441 comparison comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4455 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4461 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4465 mpz_get_si (AR_START->value.integer), in check_dimension()
4469 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4473 mpz_get_si (AR_START->value.integer), in check_dimension()
4482 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4506 #undef AR_START in check_dimension()
|
| /dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/fortran/ |
| H A D | resolve.c | 4384 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4387 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4401 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4407 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4411 mpz_get_si (AR_START->value.integer), in check_dimension()
4415 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4419 mpz_get_si (AR_START->value.integer), in check_dimension()
4428 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4452 #undef AR_START in check_dimension()
|
| /dports/devel/riscv64-gcc/gcc-8.3.0/gcc/fortran/ |
| H A D | resolve.c | 4385 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4388 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4402 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4408 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4412 mpz_get_si (AR_START->value.integer), in check_dimension()
4416 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4420 mpz_get_si (AR_START->value.integer), in check_dimension()
4429 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4453 #undef AR_START in check_dimension()
|
| /dports/lang/gnat_util/gcc-6-20180516/gcc/fortran/ |
| H A D | resolve.c | 4062 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4065 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4079 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4085 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4089 mpz_get_si (AR_START->value.integer), in check_dimension()
4093 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4097 mpz_get_si (AR_START->value.integer), in check_dimension()
4106 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4130 #undef AR_START in check_dimension()
|
| /dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/fortran/ |
| H A D | resolve.c | 4384 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4387 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4401 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4407 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4411 mpz_get_si (AR_START->value.integer), in check_dimension()
4415 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4419 mpz_get_si (AR_START->value.integer), in check_dimension()
4428 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4452 #undef AR_START in check_dimension()
|
| /dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/fortran/ |
| H A D | resolve.c | 4384 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4387 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4401 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4407 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4411 mpz_get_si (AR_START->value.integer), in check_dimension()
4415 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4419 mpz_get_si (AR_START->value.integer), in check_dimension()
4428 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4452 #undef AR_START in check_dimension()
|
| /dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/fortran/ |
| H A D | resolve.c | 4384 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4387 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4401 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4407 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4411 mpz_get_si (AR_START->value.integer), in check_dimension()
4415 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4419 mpz_get_si (AR_START->value.integer), in check_dimension()
4428 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4452 #undef AR_START in check_dimension()
|
| /dports/lang/gcc6-aux/gcc-6-20180516/gcc/fortran/ |
| H A D | resolve.c | 4062 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4065 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4079 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4085 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4089 mpz_get_si (AR_START->value.integer), in check_dimension()
4093 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4097 mpz_get_si (AR_START->value.integer), in check_dimension()
4106 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4130 #undef AR_START in check_dimension()
|
| /dports/devel/avr-gcc/gcc-10.2.0/gcc/fortran/ |
| H A D | resolve.c | 4609 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4612 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4626 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4632 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4636 mpz_get_si (AR_START->value.integer), in check_dimension()
4640 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4644 mpz_get_si (AR_START->value.integer), in check_dimension()
4653 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4677 #undef AR_START in check_dimension()
|
| /dports/lang/gcc11-devel/gcc-11-20211009/gcc/fortran/ |
| H A D | resolve.c | 4663 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4666 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4680 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4686 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4690 mpz_get_si (AR_START->value.integer), in check_dimension()
4694 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4698 mpz_get_si (AR_START->value.integer), in check_dimension()
4707 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4731 #undef AR_START in check_dimension()
|
| /dports/lang/gcc10-devel/gcc-10-20211008/gcc/fortran/ |
| H A D | resolve.c | 4617 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4620 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4634 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4640 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4644 mpz_get_si (AR_START->value.integer), in check_dimension()
4648 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4652 mpz_get_si (AR_START->value.integer), in check_dimension()
4661 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4685 #undef AR_START in check_dimension()
|
| /dports/lang/gcc9-aux/gcc-9.1.0/gcc/fortran/ |
| H A D | resolve.c | 4464 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4467 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4481 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4487 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4491 mpz_get_si (AR_START->value.integer), in check_dimension()
4495 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4499 mpz_get_si (AR_START->value.integer), in check_dimension()
4508 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4532 #undef AR_START in check_dimension()
|
| /dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/fortran/ |
| H A D | resolve.c | 4652 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4655 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4669 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4675 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4679 mpz_get_si (AR_START->value.integer), in check_dimension()
4683 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4687 mpz_get_si (AR_START->value.integer), in check_dimension()
4696 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4720 #undef AR_START in check_dimension()
|
| /dports/lang/gcc10/gcc-10.3.0/gcc/fortran/ |
| H A D | resolve.c | 4617 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4620 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4634 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4640 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4644 mpz_get_si (AR_START->value.integer), in check_dimension()
4648 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4652 mpz_get_si (AR_START->value.integer), in check_dimension()
4661 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4685 #undef AR_START in check_dimension()
|
| /dports/lang/gcc9-devel/gcc-9-20211007/gcc/fortran/ |
| H A D | resolve.c | 4495 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4498 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4512 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4518 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4522 mpz_get_si (AR_START->value.integer), in check_dimension()
4526 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4530 mpz_get_si (AR_START->value.integer), in check_dimension()
4539 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4563 #undef AR_START in check_dimension()
|
| /dports/lang/gcc8/gcc-8.5.0/gcc/fortran/ |
| H A D | resolve.c | 4386 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4389 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4403 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4409 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4413 mpz_get_si (AR_START->value.integer), in check_dimension()
4417 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4421 mpz_get_si (AR_START->value.integer), in check_dimension()
4430 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4454 #undef AR_START in check_dimension()
|
| /dports/lang/gcc11/gcc-11.2.0/gcc/fortran/ |
| H A D | resolve.c | 4652 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4655 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4669 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4675 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4679 mpz_get_si (AR_START->value.integer), in check_dimension()
4683 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4687 mpz_get_si (AR_START->value.integer), in check_dimension()
4696 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4720 #undef AR_START in check_dimension()
|
| /dports/lang/gcc9/gcc-9.4.0/gcc/fortran/ |
| H A D | resolve.c | 4495 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4498 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4512 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4518 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4522 mpz_get_si (AR_START->value.integer), in check_dimension()
4526 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4530 mpz_get_si (AR_START->value.integer), in check_dimension()
4539 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4563 #undef AR_START in check_dimension()
|
| /dports/lang/gcc12-devel/gcc-12-20211205/gcc/fortran/ |
| H A D | resolve.c | 4714 #define AR_START (ar->start[i] ? ar->start[i] : as->lower[i]) in check_dimension() macro
4717 compare_result comp_start_end = compare_bound (AR_START, AR_END); in check_dimension()
4731 if (compare_bound (AR_START, AR_END) == CMP_EQ in check_dimension()
4737 if (compare_bound (AR_START, as->lower[i]) == CMP_LT) in check_dimension()
4741 mpz_get_si (AR_START->value.integer), in check_dimension()
4745 if (compare_bound (AR_START, as->upper[i]) == CMP_GT) in check_dimension()
4749 mpz_get_si (AR_START->value.integer), in check_dimension()
4758 if (compute_last_value_for_triplet (AR_START, AR_END, ar->stride[i], in check_dimension()
4782 #undef AR_START in check_dimension()
|