X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fsyntax-file.c;h=b3ae6f4aca17ec2154a95cd1f8c2886f1953af6d;hb=98d4c667ddd538a9040f5f761c85a66e66e0f2b3;hp=4f667c1284795d84393cdc1d0b9c5355436ee0a6;hpb=8381768f3394a907c621cb9acbb77b83f5cd4875;p=pspp-builds.git diff --git a/src/language/syntax-file.c b/src/language/syntax-file.c index 4f667c12..b3ae6f4a 100644 --- a/src/language/syntax-file.c +++ b/src/language/syntax-file.c @@ -1,21 +1,18 @@ -/* PSPP - computes sample statistics. +/* PSPP - a program for statistical analysis. 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 - 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 @@ -49,7 +46,7 @@ #include -struct syntax_file_source +struct syntax_file_source { struct getl_interface parent ; @@ -98,7 +95,7 @@ read_syntax_file (struct getl_interface *s, /* Read line from file and remove new-line. Skip initial "#! /usr/bin/pspp" line. */ - do + do { sfs->ln++; if (!ds_read_line (line, sfs->syntax_file)) @@ -139,7 +136,7 @@ always_false (const struct getl_interface *s UNUSED) /* Creates a syntax file source with file name FN. */ struct getl_interface * -create_syntax_file_source (const char *fn) +create_syntax_file_source (const char *fn) { struct syntax_file_source *ss = xzalloc (sizeof (*ss));