Lines Matching refs:retcode
198 int retcode;
214 retcode = f77_get_dynamic_lowerbound (type, &lower_bound);
215 if (retcode == BOUND_FETCH_ERROR)
218 retcode = f77_get_dynamic_upperbound (type, &upper_bound);
219 if (retcode == BOUND_FETCH_ERROR)
237 int upper, lower, retcode;
246 retcode = f77_get_dynamic_upperbound (tmp_type, &upper);
247 if (retcode == BOUND_FETCH_ERROR)
250 retcode = f77_get_dynamic_lowerbound (tmp_type, &lower);
251 if (retcode == BOUND_FETCH_ERROR)