02111-1307, USA. */
#include <config.h>
-#include "main.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 "glob.h"
#include "lexer.h"
#include "output.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;
+/* Initialise error handling on the gsl library */
+static void
+err_handler_gsl (const char *reason, const char *file,
+ int line, int gsl_errno UNUSED)
+{
+ msg(FE, _("gsl error at %s:%d; reason: \"%s\""), file,line,reason);
+}
+
/* Program entry point. */
int
main (int argc, char **argv)
{
+ signal (SIGSEGV, bug_handler);
+
+ gsl_set_error_handler(err_handler_gsl);
+
/* Initialization. */
if (!outp_init ())
err_hcf (0);
msg (FE, _("Error initializing output drivers."));
lex_init ();
- cmd_init ();
/* Execution. */
parse_script ();
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");
}