MkErrorC_Get_TCL_API

MkErrorC - various functions to 'get' data out of a MkErrorS … More...

Collaboration diagram for MkErrorC_Get_TCL_API:

Functions
static OT_ProcRet	tclmkkernel_MkErrorC_GetCode (MkErrorC_ARGS)
	Tcl: MkErrorE [$err GetCode] → C-API get the value of MkErrorS::code …
static OT_ProcRet	tclmkkernel_MkErrorC_GetNum (MkErrorC_ARGS)
	Tcl: int32 [$err GetNum] → C-API get the MkErrorS::num. The number can be used as exit-code …
static OT_ProcRet	tclmkkernel_MkErrorC_GetSize (MkErrorC_ARGS)
	Tcl: long [$err GetSize] → C-API get the error-message-size from the exception-object …
static OT_ProcRet	tclmkkernel_MkErrorC_GetText (MkErrorC_ARGS)
	Tcl: string [$err GetText] → C-API get the MkErrorS::text …

Detailed Description

MkErrorC - various functions to 'get' data out of a MkErrorS …

Function Documentation

tclmkkernel_MkErrorC_GetCode()

static OT_ProcRet tclmkkernel_MkErrorC_GetCode ( MkErrorC_ARGS )

static

Tcl: MkErrorE [$err GetCode] → C-API
get the value of MkErrorS::code …

Definition at line 302 of file MkErrorC_tcl.c.

                                                       {
  OT_SETUP_hdl;
  OT_SETUP_NOARG(GetCode_doc);
  OT_CHECK_NOARGS;
  OT_retObj_SET(OT_NEW_Mk_enum_OBJ(ErrorE,MkErrorGetCodeI (hdl)));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

tclmkkernel_MkErrorC_GetNum()

static OT_ProcRet tclmkkernel_MkErrorC_GetNum ( MkErrorC_ARGS )

static

Tcl: int32 [$err GetNum] → C-API
get the MkErrorS::num. The number can be used as exit-code …

Definition at line 315 of file MkErrorC_tcl.c.

                                                      {
  OT_SETUP_hdl;
  OT_SETUP_NOARG(GetNum_doc);
  OT_CHECK_NOARGS;
  OT_retObj_SET_I32(MkErrorGetNumI (hdl));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

tclmkkernel_MkErrorC_GetSize()

static OT_ProcRet tclmkkernel_MkErrorC_GetSize ( MkErrorC_ARGS )

static

Tcl: long [$err GetSize] → C-API
get the error-message-size from the exception-object …

Definition at line 328 of file MkErrorC_tcl.c.

                                                       {
  OT_SETUP_hdl;
  OT_SETUP_NOARG(GetSize_doc);
  OT_CHECK_NOARGS;
  OT_retObj_SET_LONG(MkErrorGetSizeI (hdl));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

tclmkkernel_MkErrorC_GetText()

static OT_ProcRet tclmkkernel_MkErrorC_GetText ( MkErrorC_ARGS )

static

Tcl: string [$err GetText] → C-API
get the MkErrorS::text …

Definition at line 341 of file MkErrorC_tcl.c.

                                                       {
  OT_SETUP_hdl;
  OT_SETUP_NOARG(GetText_doc);
  OT_CHECK_NOARGS;
  OT_retObj_SET_STR(MkErrorGetTextI (hdl));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}