X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcontrol%2Ftemporary.c;h=2e6f273f5628cbbdd5a8617744fed41f7c44b815;hb=fbbeb6d9bfd9397e926a30c46a4c501ec161f6eb;hp=6cfd48ec981f1a20f8524b041e7368813fcb47a8;hpb=81fff61a96bece351e381ad3fef8ab1248a952ba;p=pspp-builds.git diff --git a/src/language/control/temporary.c b/src/language/control/temporary.c index 6cfd48ec..2e6f273f 100644 --- a/src/language/control/temporary.c +++ b/src/language/control/temporary.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 @@ -41,12 +40,12 @@ /* Parses the TEMPORARY command. */ int -cmd_temporary (void) +cmd_temporary (struct lexer *lexer, struct dataset *ds) { - if (!proc_in_temporary_transformations ()) - proc_start_temporary_transformations (); + if (!proc_in_temporary_transformations (ds)) + proc_start_temporary_transformations (ds); else msg (SE, _("This command may only appear once between " "procedures and procedure-like commands.")); - return lex_end_of_command (); + return lex_end_of_command (lexer); }