Searched refs:subscript_array (Results 1 – 1 of 1) sorted by relevance
1613 int subscript_array[MAX_FORTRAN_DIMS]; in evaluate_subexp_standard() local1640 subscript_array[i] = value_as_long (arg2); in evaluate_subexp_standard()1658 subscript_array[nargs - i - 1] -= lower; in evaluate_subexp_standard()1674 offset_item = subscript_array[ndimensions - 1]; in evaluate_subexp_standard()1678 array_size_array[i - 1] * offset_item + subscript_array[i - 1]; in evaluate_subexp_standard()