X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcontrol%2Ftemporary.c;h=2e6f273f5628cbbdd5a8617744fed41f7c44b815;hb=93b4335785430ab6de290b7978e2d506106a8ba5;hp=2424c2551de8e552025b9b132a05af227bc6daa5;hpb=b0bf9b1b0f727fafac4296a048e3f45db5936f81;p=pspp-builds.git diff --git a/src/language/control/temporary.c b/src/language/control/temporary.c index 2424c255..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 @@ -24,7 +23,7 @@ #include "control-stack.h" #include -#include +#include #include #include #include @@ -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); }