Searched refs:range_op (Results 1 – 1 of 1) sorted by relevance
1215 fortran_range_operation *range_op in value_subarray() local1217 if (range_op != nullptr) in value_subarray()1219 enum range_flag range_flag = range_op->get_flags (); in value_subarray()1225 low = value_as_long (range_op->evaluate0 (exp, noside)); in value_subarray()1229 high = value_as_long (range_op->evaluate1 (exp, noside)); in value_subarray()1233 stride = value_as_long (range_op->evaluate2 (exp, noside)); in value_subarray()