X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fsyntax-file.c;h=459fee495f7eac54b78ae1411dd80c49d9d24c4a;hb=4f2f805c653f0dc901924944ea4c55309ff14d32;hp=e41466cedd55d180986749cc4a27abc98e7cb9a4;hpb=b8b67a1e1f709640ccdb3422a591b938edb0ceea;p=pspp diff --git a/src/language/syntax-file.c b/src/language/syntax-file.c index e41466cedd..459fee495f 100644 --- a/src/language/syntax-file.c +++ b/src/language/syntax-file.c @@ -1,6 +1,5 @@ /* PSPP - computes sample statistics. Copyright (C) 1997-9, 2000 Free Software Foundation, Inc. - Written by Ben Pfaff . This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as @@ -78,7 +77,8 @@ line_number (const struct getl_interface *s) /* Reads a line from syntax file source S into LINE. Returns true if successful, false at end of file. */ bool -read_syntax_file (struct getl_interface *s, struct string *line) +read_syntax_file (struct getl_interface *s, + struct string *line, enum getl_syntax *syntax) { struct syntax_file_source *sfs = (struct syntax_file_source *) s; @@ -114,6 +114,7 @@ read_syntax_file (struct getl_interface *s, struct string *line) if (get_echo ()) tab_output_text (TAB_LEFT | TAB_FIX, ds_cstr (line)); + *syntax = GETL_BATCH; return true; }