MkObjectC_Dbg_TCL_API

MkObjectC - log a debugging-message to the MkLogFileC (default: stderr) … More...

Collaboration diagram for MkObjectC_Dbg_TCL_API:

Functions
static OT_ProcRet	tclmkkernel_MkObjectC_DbgDump (MkObjectC_ARGS)
	Tcl: $obj DbgDump ?message:string="var"? ?callfunc:string="MK_NULL"? → C-API debug: Dump a instance to stderr with LNG and MQ internal data…
static OT_ProcRet	tclmkkernel_MkObjectC_DbgL (MkObjectC_ARGS)
	Tcl: $fmtobj DbgL message:string ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API debug: write a instance-marker to the MkLogFileC (default: stderr) using the fmtobj as prefix …
static OT_ProcRet	tclmkkernel_MkObjectC_DbgLogC (MkObjectC_ARGS)
	Tcl: $obj DbgLogC ?callfunc:string="MK_NULL"? → C-API debug: write a short-obj-summary to MkLogFileC (default: stderr) …
static OT_ProcRet	tclmkkernel_MkObjectC_DbgO (MkObjectC_ARGS)
	Tcl: $obj DbgO ?callfunc:string="MK_NULL"? → C-API debug: write the object-details to MkLogFileC (default: stderr) …
static OT_ProcRet	tclmkkernel_MkObjectC_DbgSTACK (MkObjectC_ARGS)
	Tcl: $fmtobj DbgSTACK ?skip:int32=0? ?num:int32=-1? ?callfunc:string="MK_NULL"? → C-API debug: write the stack-trace to MkLogFileC (default: stderr) …
static OT_ProcRet	tclmkkernel_MkObjectC_DbgM (OtClass_ARGS)
	Tcl: (static) MkObjectC DbgM message:string ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API debug: write a static-marker to the MkLogFileC (default: stderr) …

Detailed Description

MkObjectC - log a debugging-message to the MkLogFileC (default: stderr) …

This functions are "helpers" to support the programmer.

Function Documentation

tclmkkernel_MkObjectC_DbgDump()

static OT_ProcRet tclmkkernel_MkObjectC_DbgDump ( MkObjectC_ARGS )

static

Tcl: $obj DbgDump ?message:string="var"? ?callfunc:string="MK_NULL"? → C-API
debug: Dump a instance to stderr with LNG and MQ internal data…

Definition at line 417 of file MkObjectC_tcl.c.

                                                         {
  OT_SETUP_hdl;
  OT_SETUP_VARARGS(0,2,DbgDump_doc);
  MK_STRN message = "var";
  OT_CHECK_OPTIONAL(OT_CHECK_STRN (message))
  MK_STRN callfunc = NULL;
  OT_CHECK_OPTIONAL(OT_CHECK_STRN (callfunc))
  OT_CHECK_NOARGS;
  if (MkSysStringIsNULL(callfunc)) {callfunc = OT_GET_CALL_PROC;}
  MkErrorC_Check(hdl,MkDbgDumpTmpl (hdl, message, callfunc));
  OT_retObj_SET_None;
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_FRAME_CLEANUP;
  OT_retObj_RETURN;
}

tclmkkernel_MkObjectC_DbgL()

static OT_ProcRet tclmkkernel_MkObjectC_DbgL ( MkObjectC_ARGS )

static

Tcl: $fmtobj DbgL message:string ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API
debug: write a instance-marker to the MkLogFileC (default: stderr) using the fmtobj as prefix …

Definition at line 437 of file MkObjectC_tcl.c.

                                                      {
  OT_SETUP_hdl__null_allow;
  OT_SETUP_VARARGS(1,4,DbgL_doc);
  MK_STRN message = 0;
  OT_CHECK_REQUIRED(OT_CHECK_STRN (message))
  MK_DBG debug = 0;
  OT_CHECK_OPTIONAL(OT_CHECK_NI4 (debug))
  MK_STRN callfunc = NULL;
  OT_CHECK_OPTIONAL(OT_CHECK_STRN (callfunc))
  MK_I32 lvl = 0;
  OT_CHECK_OPTIONAL(OT_CHECK_NI4 (lvl))
  OT_CHECK_NOARGS;
  if (debug > MkRuntimeDebugGet()) {
    OT_retObj_SET_None;
    goto end;
  }
  if (MkSysStringIsNULL(callfunc)) {callfunc = OT_GET_CALL_PROC;}
  MkDbgL (hdl, message, debug, callfunc, lvl);
  OT_retObj_SET_None;
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_FRAME_CLEANUP;
  OT_retObj_RETURN;
}

tclmkkernel_MkObjectC_DbgLogC()

static OT_ProcRet tclmkkernel_MkObjectC_DbgLogC ( MkObjectC_ARGS )

static

Tcl: $obj DbgLogC ?callfunc:string="MK_NULL"? → C-API
debug: write a short-obj-summary to MkLogFileC (default: stderr) …

Definition at line 465 of file MkObjectC_tcl.c.

                                                         {
  OT_SETUP_hdl;
  OT_SETUP_VARARGS(0,1,DbgLogC_doc);
  MK_STRN callfunc = NULL;
  OT_CHECK_OPTIONAL(OT_CHECK_STRN (callfunc))
  OT_CHECK_NOARGS;
  if (MkSysStringIsNULL(callfunc)) {callfunc = OT_GET_CALL_PROC;}
  MkDbgLogC (hdl, callfunc);
  OT_retObj_SET_None;
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_FRAME_CLEANUP;
  OT_retObj_RETURN;
}

tclmkkernel_MkObjectC_DbgM()

static OT_ProcRet tclmkkernel_MkObjectC_DbgM ( OtClass_ARGS )

static

Tcl: (static) MkObjectC DbgM message:string ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API
debug: write a static-marker to the MkLogFileC (default: stderr) …

Definition at line 525 of file MkObjectC_tcl.c.

                                                    {
  OT_SETUP_hdl_static;
  OT_SETUP_VARARGS(1,4,DbgM_doc);
  MK_STRN message = 0;
  OT_CHECK_REQUIRED(OT_CHECK_STRN (message))
  MK_DBG debug = 0;
  OT_CHECK_OPTIONAL(OT_CHECK_NI4 (debug))
  MK_STRN callfunc = NULL;
  OT_CHECK_OPTIONAL(OT_CHECK_STRN (callfunc))
  MK_I32 lvl = 0;
  OT_CHECK_OPTIONAL(OT_CHECK_NI4 (lvl))
  OT_CHECK_NOARGS;
  if (debug > MkRuntimeDebugGet()) {
    OT_retObj_SET_None;
    goto end;
  }
  if (MkSysStringIsNULL(callfunc)) {callfunc = OT_GET_CALL_PROC;}
  MkDbgM (message, debug, callfunc, lvl);
  OT_retObj_SET_None;
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_FRAME_CLEANUP;
  OT_retObj_RETURN;
}

tclmkkernel_MkObjectC_DbgO()

static OT_ProcRet tclmkkernel_MkObjectC_DbgO ( MkObjectC_ARGS )

static

Tcl: $obj DbgO ?callfunc:string="MK_NULL"? → C-API
debug: write the object-details to MkLogFileC (default: stderr) …

Definition at line 483 of file MkObjectC_tcl.c.

                                                      {
  OT_SETUP_hdl;
  OT_SETUP_VARARGS(0,1,DbgO_doc);
  MK_STRN callfunc = NULL;
  OT_CHECK_OPTIONAL(OT_CHECK_STRN (callfunc))
  OT_CHECK_NOARGS;
  if (MkSysStringIsNULL(callfunc)) {callfunc = OT_GET_CALL_PROC;}
  MkDbgO (hdl, callfunc);
  OT_retObj_SET_None;
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_FRAME_CLEANUP;
  OT_retObj_RETURN;
}

tclmkkernel_MkObjectC_DbgSTACK()

static OT_ProcRet tclmkkernel_MkObjectC_DbgSTACK ( MkObjectC_ARGS )

static

Tcl: $fmtobj DbgSTACK ?skip:int32=0? ?num:int32=-1? ?callfunc:string="MK_NULL"? → C-API
debug: write the stack-trace to MkLogFileC (default: stderr) …

Definition at line 501 of file MkObjectC_tcl.c.

                                                          {
  OT_SETUP_hdl__null_allow;
  OT_SETUP_VARARGS(0,3,DbgSTACK_doc);
  MK_I32 skip = 0;
  OT_CHECK_OPTIONAL(OT_CHECK_NI4 (skip))
  MK_I32 num = -1;
  OT_CHECK_OPTIONAL(OT_CHECK_NI4 (num))
  MK_STRN callfunc = NULL;
  OT_CHECK_OPTIONAL(OT_CHECK_STRN (callfunc))
  OT_CHECK_NOARGS;
  if (MkSysStringIsNULL(callfunc)) {callfunc = OT_GET_CALL_PROC;}
  MkDbgSTACK (hdl, skip, num, callfunc);
  OT_retObj_SET_None;
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_FRAME_CLEANUP;
  OT_retObj_RETURN;
}