87 first_mode (mpc_fun_param_t *params, int index)  in first_mode()  argument
89   switch (params->T[index])  in first_mode()
92       params->P[index].mpc_rnd =  in first_mode()
96       params->P[index].mpfr_rnd = FIRST_MPFR_RND_MODE;  in first_mode()
106 next_mode (mpc_fun_param_t *params, int index)  in next_mode()  argument
108   switch (params->T[index])  in next_mode()
111       params->P[index].mpc_rnd =  in next_mode()
112         next_mpc_rnd_mode (params->P[index].mpc_rnd);  in next_mode()
115       params->P[index].mpfr_rnd =  in next_mode()
116         next_mpfr_rnd_mode (params->P[index].mpfr_rnd);  in next_mode()
126 is_valid_mode (mpc_fun_param_t *params, int index)  in is_valid_mode()  argument
129   switch (params->T[index])  in is_valid_mode()
132       return is_valid_mpc_rnd_mode (params->P[index].mpc_rnd);  in is_valid_mode()
134       return is_valid_mpfr_rnd_mode (params->P[index].mpfr_rnd);  in is_valid_mode()
161   int index = params->nbout + params->nbin - params->nbrnd;  in next_rnd_mode()  local
164   while (carry && index <= last) {  in next_rnd_mode()
165     next_mode (params, index);  in next_rnd_mode()
166     if (!is_valid_mode (params, index) && index < last)  in next_rnd_mode()
167       first_mode (params, index);  in next_rnd_mode()
170     index++;  in next_rnd_mode()
179   int index;  in is_valid_rnd_mode()  local
181   for (index = params->nbout + params->nbin - params->nbrnd;  in is_valid_rnd_mode()
182        index < params->nbout + params->nbin;  in is_valid_rnd_mode()
183        index++)  in is_valid_rnd_mode()
184     if (! is_valid_mode (params, index))  in is_valid_rnd_mode()