return ok ? CMD_SUCCESS : CMD_CASCADING_FAILURE;
}
+int
+cmd_inside_loop (struct lexer *lexer UNUSED, struct dataset *ds UNUSED)
+{
+ msg (SE, _("This command cannot appear outside LOOP...END LOOP."));
+ return CMD_FAILURE;
+}
+
static enum trns_result
break_trns_proc (void *aux UNUSED, struct ccase **c UNUSED,
casenumber case_num UNUSED)
/* Parses BREAK. */
int
-cmd_break (struct lexer *lexer UNUSED, struct dataset *ds)
+cmd_break (struct lexer *lexer, struct dataset *ds)
{
if (!in_loop)
{
- msg (SE, _("BREAK cannot appear outside LOOP...END LOOP."));
+ cmd_inside_loop (lexer, ds);
return CMD_FAILURE;
}