83 static struct interp *current_interpreter = NULL;  variable
138   struct interp *old_interp = current_interpreter;  in interp_set()
144   gdb_assert (!top_level || !current_interpreter);  in interp_set()
147   if (current_interpreter != NULL)  in interp_set()
150       if (current_interpreter->procs->suspend_proc  in interp_set()
151 	  && !current_interpreter->procs->suspend_proc (current_interpreter->  in interp_set()
155 		 current_interpreter->name);  in interp_set()
163   current_interpreter = interp;  in interp_set()
170       && strcmp (current_interpreter->name, interpreter_p) != 0)  in interp_set()
174       interpreter_p = xstrdup (current_interpreter->name);  in interp_set()
250   return current_interpreter->procs->ui_out_proc (current_interpreter);  in interp_ui_out()
257   if (current_interpreter == NULL  in current_interp_set_logging()
258       || current_interpreter->procs->set_logging_proc == NULL)  in current_interp_set_logging()
261   return current_interpreter->procs->set_logging_proc (current_interpreter,  in current_interp_set_logging()
271   struct interp *old_interp = current_interpreter;  in interp_set_temp()
274     current_interpreter = interp;  in interp_set_temp()
298   if (current_interpreter)  in current_interp_named_p()
299     return (strcmp (current_interpreter->name, interp_name) == 0);  in current_interp_named_p()
310   if (current_interpreter == NULL  in current_interp_display_prompt_p()
311       || current_interpreter->procs->prompt_proc_p == NULL)  in current_interp_display_prompt_p()
314     return current_interpreter->procs->prompt_proc_p (current_interpreter->  in current_interp_display_prompt_p()
327   else if (current_interpreter != NULL  in current_interp_command_loop()
328 	   && current_interpreter->procs->command_loop_proc != NULL)  in current_interp_command_loop()
329     current_interpreter->procs->command_loop_proc (current_interpreter->data);  in current_interp_command_loop()
340     return current_interpreter->quiet_p;  in interp_quiet_p()
426   old_interp = current_interpreter;  in interpreter_exec_cmd()