#include "gsl/gsl_errno.h"
#include "language/command.h"
#include "language/lexer/lexer.h"
-#include "language/prompt.h"
#include "language/syntax-file.h"
#include "libpspp/argv-parser.h"
#include "libpspp/compiler.h"
const char *file_name);
static void bug_handler(int sig);
static void fpu_init (void);
-static void clean_up (void);
/* Program entry point. */
int
fh_init ();
the_source_stream = create_source_stream ();
- prompt_init ();
readln_initialize ();
settings_init ();
terminal_check_size ();
}
- clean_up ();
+ destroy_dataset (the_dataset);
+
+ random_done ();
+ settings_done ();
+ fh_done ();
+ lex_destroy (the_lexer);
+ destroy_source_stream (the_source_stream);
+ readln_uninitialize ();
+ output_close ();
+ msg_ui_done ();
+ i18n_done ();
+
return msg_ui_any_errors ();
}
raise (sig);
}
-/* Clean up PSPP in preparation for termination. */
-static void
-clean_up (void)
-{
- static bool terminating = false;
- if (!terminating)
- {
- terminating = true;
-
- destroy_dataset (the_dataset);
-
- random_done ();
- settings_done ();
- fh_done ();
- lex_destroy (the_lexer);
- destroy_source_stream (the_source_stream);
- prompt_done ();
- readln_uninitialize ();
- output_close ();
- msg_ui_done ();
- i18n_done ();
- }
-}
-
static void
add_syntax_file (struct source_stream *ss, enum syntax_mode syntax_mode,
const char *file_name)