Eliminated global variable getl_buf
[pspp] / src / ui / terminal / main.c
index edc59eddaf6a8440bde2daa940dffe1411324bc8..6a7decd9d95d77192488ba0ba66ea8a2b0266154 100644 (file)
@@ -69,6 +69,8 @@ void bug_handler(int sig);
 
 /* Handle quit/term/int signals */
 void interrupt_handler(int sig);
+static struct dataset * the_dataset = NULL;
+
 
 
 /* Program entry point. */
@@ -93,16 +95,17 @@ main (int argc, char **argv)
   readln_initialize ();
   settings_init ();
   random_init ();
-  proc_init ();
+  the_dataset = create_dataset ();
 
   if (parse_command_line (argc, argv)) 
     {
       outp_read_devices ();
-      lex_init ();
+      lex_init (do_read_line);
 
       for (;;)
         {
-          int result = cmd_parse (proc_has_source ()
+          int result = cmd_parse (the_dataset, 
+                                 proc_has_source (the_dataset)
                                   ? CMD_STATE_DATA : CMD_STATE_INITIAL);
           if (result == CMD_EOF || result == CMD_FINISH)
             break;
@@ -178,7 +181,7 @@ terminate (bool success)
     {
       terminating = true;
 
-      proc_done ();
+      destroy_dataset (the_dataset);
 
       random_done ();
       settings_done ();