#include <config.h>
#include <stdlib.h>
-#include <assert.h>
+#include "error.h"
#include "algorithm.h"
#include "alloc.h"
#include "bitvector.h"
#include "command.h"
+#include "dictionary.h"
#include "error.h"
#include "hash.h"
#include "lexer.h"
size_t i;
- lex_match_id ("MODIFY");
- lex_match_id ("VARS");
+ if (temporary != 0)
+ {
+ msg (SE, _("MODIFY VARS may not be used after TEMPORARY. "
+ "Temporary transformations will be made permanent."));
+ cancel_temporary ();
+ }
vm.reorder_vars = NULL;
vm.reorder_cnt = 0;
if (already_encountered & (1 | 4))
{
/* Read the data. */
- procedure (NULL, NULL, NULL, NULL);
+ procedure (NULL, NULL);
}
if (!rearrange_dict (default_dict, &vm))