X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fsyntax-file.c;h=0771ade3a9e92dccc0c3063a7c14d13014c010e3;hb=eccddce2d2e67e7ddcdbd93d969ef4c5b6efdb28;hp=bee12f3d168c2d91ee502fec474ff7cea75d6192;hpb=f5c108becd49d78f4898cab11352291f5689d24e;p=pspp-builds.git diff --git a/src/language/syntax-file.c b/src/language/syntax-file.c index bee12f3d..0771ade3 100644 --- a/src/language/syntax-file.c +++ b/src/language/syntax-file.c @@ -1,20 +1,18 @@ -/* PSPP - computes sample statistics. - Copyright (C) 1997-9, 2000 Free Software Foundation, Inc. +/* PSPP - a program for statistical analysis. + Copyright (C) 1997-9, 2000, 2009 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 @@ -22,6 +20,7 @@ #include #include +#include #include #include @@ -29,7 +28,6 @@ #include #include #include -#include #include #include #include @@ -42,6 +40,8 @@ #include "prompt.h" +#include "xalloc.h" + #include "gettext.h" #define _(msgid) gettext (msgid) @@ -76,9 +76,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; @@ -100,7 +100,8 @@ read_syntax_file (struct getl_interface *s, do { sfs->ln++; - if (!ds_read_line (line, sfs->syntax_file)) + ds_clear (line); + if (!ds_read_line (line, sfs->syntax_file, SIZE_MAX)) { if (ferror (sfs->syntax_file)) msg (ME, _("Reading `%s': %s."), sfs->fn, strerror (errno)); @@ -111,10 +112,9 @@ read_syntax_file (struct getl_interface *s, while (sfs->ln == 1 && !memcmp (ds_cstr (line), "#!", 2)); /* Echo to listing file, if configured to do so. */ - if (get_echo ()) + if (settings_get_echo ()) tab_output_text (TAB_LEFT | TAB_FIX, ds_cstr (line)); - *syntax = GETL_BATCH; return true; }