-cl_error_class::cl_error_class(enum error_type typ, char *aname,
- class cl_error_class *parent):
- cl_base()
-{
- type= typ;
- on= ERROR_PARENT;
- set_name(aname, "not-known");
- if (!registered_errors)
- registered_errors= new cl_list(2, 2, "registered errors");
- registered_errors->add(this);
- if (parent)
- parent->add_child(this);
-}
-
-cl_error_class::cl_error_class(enum error_type typ, char *aname,
- class cl_error_class *parent,
- enum error_on_off be_on):
+cl_error_class::cl_error_class(enum error_type typ, const char *aname,
+ class cl_error_class *parent,
+ enum error_on_off be_on/* = ERROR_PARENT*/):