02111-1307, USA. */
#include <config.h>
-#include <assert.h>
#include <stdio.h>
+#include <gsl/gsl_errno.h>
+#include "main.h"
+#include "cmdline.h"
#include "command.h"
#include "error.h"
#include "getline.h"
+#include "glob.h"
#include "lexer.h"
#include "output.h"
+#include "settings.h"
+#include <signal.h>
#include <stdlib.h>
#include "debug-print.h"
-static void parse_script (void) __attribute__ ((noreturn));
+static void parse_script (void) NO_RETURN;
static void handle_error (int code);
static int execute_command (void);
/* The current date in the form DD MMM YYYY. */
char curdate[12];
+
+/* If a segfault happens, issue a message to that effect and halt */
+void bug_handler(int sig);
+
/* Whether we're dropping down to interactive mode immediately because
we hit end-of-file unexpectedly (or whatever). */
int start_interactive;
+
/* Program entry point. */
int
main (int argc, char **argv)
{
- void init_glob (int, char **); /* Exported by glob.c. */
- void parse_command_line (int, char **); /* Exported by cmdline.c */
+ signal (SIGSEGV, bug_handler);
+
+ gsl_set_error_handler_off();
/* Initialization. */
if (!outp_init ())
msg (FE, _("Error initializing output drivers."));
lex_init ();
- cmd_init ();
/* Execution. */
parse_script ();
static int
execute_command (void)
{
+ int result;
/* Read the command's first token.
We may hit end of file.
If so, give the line reader a chance to proceed to the next file.
/* Parse the command. */
getl_prompt = GETL_PRPT_CONTINUATION;
- return cmd_parse ();
+ result = cmd_parse ();
+
+ /* Unset the /ALGORITHM subcommand if it was used */
+ unset_cmd_algorithm ();
+
+ return result;
}
/* Print an error message corresponding to the command return code
while (token != T_STOP && token != '.')
lex_get ();
}
- else
- lex_discard_line ();
+ else
+ {
+ msg (SW, _("The rest of this command has been discarded."));
+ lex_discard_line ();
+ }
+}
+
+
+
+/* If a segfault happens, issue a message to that effect and halt */
+void
+bug_handler(int sig UNUSED)
+{
+ request_bug_report_and_abort("Segmentation Violation");
}