Encapsulated lexer and updated calling functions accordingly.
[pspp-builds.git] / src / language / data-io / list.q
index d8256e32d25c504342262e928035d59bbe0cf4d8..71238e8eee3984089b2ac02d443b874d0ea54aec 100644 (file)
@@ -130,12 +130,12 @@ write_line (struct outp_driver *d, const char *s)
     
 /* Parses and executes the LIST procedure. */
 int
-cmd_list (struct dataset *ds)
+cmd_list (struct lexer *lexer, struct dataset *ds)
 {
   struct variable casenum_var;
   bool ok;
 
-  if (!parse_list (ds, &cmd, NULL))
+  if (!parse_list (lexer, ds, &cmd, NULL))
     return CMD_FAILURE;
   
   /* Fill in defaults. */