processes UI events asynchronously. */
int event_loop_p = 1;
+#ifdef UI_OUT
+/* Has an interpreter been specified and if so, which. */
+char *interpreter_p;
+#endif
+
/* Whether this is the command line version or not */
int tui_version = 0;
/* FIXME: cagney/1999-11-05: A correct command_loop() implementaton
would clean things up (restoring the cleanup chain) to the state
they were just prior to the call. Technically, this means that
- the do_cleanups() below is redundant. Unfortunatly, many FUNC's
+ the do_cleanups() below is redundant. Unfortunately, many FUNCs
are not that well behaved. do_cleanups should either be replaced
with a do_cleanups call (to cover the problem) or an assertion
check to detect bad FUNCs code. */
{"enable-external-editor", no_argument, 0, 'y'},
{"editor-command", required_argument, 0, 'w'},
#endif
+#ifdef UI_OUT
{"ui", required_argument, 0, 'i'},
{"interpreter", required_argument, 0, 'i'},
{"i", required_argument, 0, 'i'},
+#endif
{"directory", required_argument, 0, 'd'},
{"d", required_argument, 0, 'd'},
{"cd", required_argument, 0, 11},
#ifdef GDBTK
case 'z':
{
- extern int gdbtk_test PARAMS ((char *));
+extern int gdbtk_test (char *);
if (!gdbtk_test (optarg))
{
fprintf_unfiltered (gdb_stderr, "%s: unable to load tclcommand file \"%s\"",
break;
}
#endif /* GDBTK */
+#ifdef UI_OUT
+ case 'i':
+ interpreter_p = optarg;
+ break;
+#endif
case 'd':
dirarg[ndir++] = optarg;
if (ndir >= dirsize)
for (i = 0; i < ndir; i++)
catch_command_errors (directory_command, dirarg[i], 0, RETURN_MASK_ALL);
- free ((PTR) dirarg);
+ xfree (dirarg);
if (execarg != NULL
&& symarg != NULL
#endif
catch_command_errors (source_command, cmdarg[i], !batch, RETURN_MASK_ALL);
}
- free ((PTR) cmdarg);
+ xfree (cmdarg);
/* Read in the old history after all the command files have been read. */
init_history ();