X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcontrol%2Ftemporary.c;h=cdcfc7625097578c2a9a4b247bfceea7fd0ef94a;hb=72c9c6a2f92e94779b2e55d0726568090411871c;hp=7ebcc5ad9c8b92092a8850ddd05d547e58be4ffb;hpb=2be9bee9da6a2ce27715e58128569594319abfa2;p=pspp

diff --git a/src/language/control/temporary.c b/src/language/control/temporary.c
index 7ebcc5ad9c..cdcfc76250 100644
--- a/src/language/control/temporary.c
+++ b/src/language/control/temporary.c
@@ -16,7 +16,6 @@
 
 #include <config.h>
 
-#include <stddef.h>
 #include <stdlib.h>
 
 #include "data/dataset.h"
@@ -25,7 +24,6 @@
 #include "data/value-labels.h"
 #include "data/variable.h"
 #include "language/command.h"
-#include "language/control/control-stack.h"
 #include "language/lexer/lexer.h"
 #include "libpspp/message.h"
 #include "libpspp/str.h"
@@ -37,12 +35,13 @@
 
 /* Parses the TEMPORARY command. */
 int
-cmd_temporary (struct lexer *lexer UNUSED, struct dataset *ds)
+cmd_temporary (struct lexer *lexer, struct dataset *ds)
 {
   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."));
+    lex_ofs_error (lexer, 0, 0,
+                   _("This command may only appear once between "
+                     "procedures and procedure-like commands."));
   return CMD_SUCCESS;
 }