24 |
#include "alloc.h" |
#include "alloc.h" |
25 |
#include "command.h" |
#include "command.h" |
26 |
#include "dictionary.h" |
#include "dictionary.h" |
27 |
#include "do-ifP.h" |
#include "ctl-stack.h" |
28 |
#include "error.h" |
#include "error.h" |
29 |
#include "hash.h" |
#include "hash.h" |
30 |
#include "lexer.h" |
#include "lexer.h" |
37 |
|
|
38 |
int temporary; |
int temporary; |
39 |
struct dictionary *temp_dict; |
struct dictionary *temp_dict; |
40 |
int temp_trns; |
size_t temp_trns; |
41 |
|
|
42 |
/* Parses the TEMPORARY command. */ |
/* Parses the TEMPORARY command. */ |
43 |
int |
int |
44 |
cmd_temporary (void) |
cmd_temporary (void) |
45 |
{ |
{ |
46 |
/* TEMPORARY is not allowed inside DO IF or LOOP. */ |
/* TEMPORARY is not allowed inside DO IF or LOOP. */ |
47 |
if (ctl_stack) |
if (!ctl_stack_is_empty ()) |
48 |
{ |
{ |
49 |
msg (SE, _("This command is not valid inside DO IF or LOOP.")); |
msg (SE, _("This command is not valid inside DO IF or LOOP.")); |
50 |
return CMD_FAILURE; |
return CMD_FAILURE; |