+ return(DD_FALSE);
+}
+
+
+// prj
+#include "errorcl.h"
+
+static void
+show_error_cmd_print_node(class cl_console_base *con,
+ int indent, class cl_base *node)
+{
+ if (!node)
+ return;
+ int i;
+ for (i= 0; i < indent; i++)
+ con->dd_printf(" ");
+ char *name= node->get_name("unknown");
+ class cl_error_class *ec= dynamic_cast<class cl_error_class *>(node);
+ char *str;
+ con->dd_printf("%s: %s [%s/%s]\n",
+ str= case_string(case_case, ec->get_type_name()),
+ name, get_id_string(error_on_off_names,
+ ec->get_on()),
+ (ec->is_on())?"ON":"OFF");
+ free(str);
+ class cl_base *c= node->first_child();
+ while (c)
+ {
+ show_error_cmd_print_node(con, indent+2, c);
+ c= node->next_child(c);
+ }
+}
+
+/*
+ * Command: show error
+ *----------------------------------------------------------------------------
+ */
+COMMAND_DO_WORK_APP(cl_show_error_cmd)
+{
+ /*class cl_cmd_arg *parm= cmdline->param(0);
+ char *s= 0;
+
+ if (!parm)
+ ;
+ else if (cmdline->syntax_match(0, STRING)) {
+ s= parm->value.string.string;
+ }
+ else
+ con->dd_printf("%s\n", short_help?short_help:"Error: wrong syntax\n");
+ */
+ class cl_list *registered_errors = cl_error_registry::get_list();
+ int i;
+ for (i= 0; i < registered_errors->count; i++)
+ {
+ class cl_error_class *ec;
+ ec= dynamic_cast<class cl_error_class*>(registered_errors->object_at(i));
+ if (!ec->get_parent())
+ show_error_cmd_print_node(con, 0, ec);
+ }
+ return(DD_FALSE);