X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcontrol%2Ftemporary.c;h=2e6f273f5628cbbdd5a8617744fed41f7c44b815;hb=bc02bc027697df3207f827de722c26d8cc87e824;hp=810ed519a0076322aa3ceb28fb7f2ec85db2eb4a;hpb=42489b63e0b4bec2e20c2f55c9791234f7b41764;p=pspp-builds.git diff --git a/src/language/control/temporary.c b/src/language/control/temporary.c index 810ed519..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 (current_dataset)) - proc_start_temporary_transformations (current_dataset); + 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); }