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