endcmd=string "x==1" "one character long";
epoch=custom;
errorbreak=errbrk:on/off;
- errors=errors:on/off/terminal/listing/both/none;
+ errors=errors:terminal/listing/both/on/none/off;
format=custom;
headers=headers:no/yes/blank;
highres=hires:on/off;
lowres=lores:auto/on/off;
lpi=integer "x>0" "%s must be greater than 0";
menus=menus:standard/extended;
- messages=messages:on/off/terminal/listing/both/none;
+ messages=messages:on/off/terminal/listing/both/on/none/off;
mexpand=mexp:on/off;
miterate=integer "x>0" "%s must be greater than 0";
mnest=integer "x>0" "%s must be greater than 0";
nulline=null:on/off;
printback=prtbck:on/off;
prompt=string;
- results=res:on/off/terminal/listing/both/none;
+ results=res:on/off/terminal/listing/both/on/none/off;
safer=safe:on;
scompression=scompress:on/off;
scripttab=string "x==1" "one character long";
set_endcmd (cmd.s_endcmd[0]);
if (cmd.sbc_errorbreak)
set_errorbreak (cmd.errbrk == STC_ON);
+ if (cmd.sbc_errors)
+ {
+ bool both = cmd.errors == STC_BOTH || cmd.errors == STC_ON;
+ set_error_routing_to_terminal (cmd.errors == STC_TERMINAL || both);
+ set_error_routing_to_listing (cmd.errors == STC_LISTING || both);
+ }
if (cmd.sbc_include)
set_include (cmd.inc == STC_ON);
if (cmd.sbc_mxerrs)
msg (SN, _("ENDCMD is \"%c\"."), get_endcmd ());
}
+static void
+show_errors (const struct dataset *ds UNUSED)
+{
+ bool terminal = get_error_routing_to_terminal ();
+ bool listing = get_error_routing_to_listing ();
+ msg (SN, _("ERRORS is \"%s\"."),
+ terminal && listing ? "BOTH"
+ : terminal ? "TERMINAL"
+ : listing ? "LISTING"
+ : "NONE");
+}
+
static void
show_format (const struct dataset *ds UNUSED)
{
{"CCE", show_cce},
{"DECIMALS", show_decimals},
{"ENDCMD", show_endcmd},
+ {"ERRORS", show_errors},
{"FORMAT", show_format},
{"LENGTH", show_length},
{"MXERRS", show_mxerrs},