X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fsyntax-file.c;h=dde807c37c9c4409cc54b2d6049bc859679ee137;hb=68f08c4bb53fcde16035b622bdb6e9529f9cf3ae;hp=bee12f3d168c2d91ee502fec474ff7cea75d6192;hpb=f5c108becd49d78f4898cab11352291f5689d24e;p=pspp-builds.git diff --git a/src/language/syntax-file.c b/src/language/syntax-file.c index bee12f3d..dde807c3 100644 --- a/src/language/syntax-file.c +++ b/src/language/syntax-file.c @@ -1,20 +1,18 @@ -/* PSPP - computes sample statistics. +/* PSPP - a program for statistical analysis. Copyright (C) 1997-9, 2000 Free Software Foundation, Inc. - This program is free software; you can redistribute it and/or - modify it under the terms of the GNU General Public License as - published by the Free Software Foundation; either version 2 of the - License, or (at your option) any later version. + This program is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. - This program is distributed in the hope that it will be useful, but - WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - General Public License for more details. + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA - 02110-1301, USA. */ + along with this program. If not, see . */ #include @@ -76,9 +74,9 @@ 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 +static bool read_syntax_file (struct getl_interface *s, - struct string *line, enum getl_syntax *syntax) + struct string *line) { struct syntax_file_source *sfs = (struct syntax_file_source *) s; @@ -114,7 +112,6 @@ read_syntax_file (struct getl_interface *s, if (get_echo ()) tab_output_text (TAB_LEFT | TAB_FIX, ds_cstr (line)); - *syntax = GETL_BATCH; return true; }