tag: nhi1-release-250425 More...

#include "LibMkKernel_private_tcl.h"

Include dependency graph for MkObjectC_tcl.c:

Macros
#define	SetupRtFromHdl_X(hd)

#define	SetupRtFromHdl_XN(hd)

#define	META_FILE_NAME "MkObjectC_tcl.c"

#define	OT_CLASS NS(MkObjectC)

#define	OT_CLASS_NAME "MkObjectC"

#define	OBJECT2OBJ(O)

#define	OT_SETUP_hdl_static_constr_pre

#define	OT_SETUP_hdl_static_constr

#define	OT_SETUP_hdl_static

#define	OT_SETUP_hdl SetupHdlFromMetaData_2(OBJ,MK_OBJ);

#define	OT_SETUP_hdl__null_allow SetupHdlFromMetaData__null_allow_2(OBJ,MK_OBJ);

#define	OT_SETUP_hdl_destr SetupHdlFromMetaData__null_allow_2(OBJ,MK_OBJ);

#define	OT_SETUP_hdl_constr_pre

#define	OT_SETUP_hdl_constr

#define	ClassInit

#define	VER TCL_OO_METHOD_VERSION_CURRENT

#define	DbgM_doc "MkObjectC DbgM message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0?"

#define	DbgDump_doc "$obj DbgDump ?message:string=\"var\"? ?callfunc:string=\"MK_NULL\"? (const)"

#define	DbgL_doc "$fmtobj DbgL message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

#define	DbgLogC_doc "$obj DbgLogC ?callfunc:string=\"MK_NULL\"? (const)"

#define	DbgO_doc "$obj DbgO ?callfunc:string=\"MK_NULL\"? (const)"

#define	DbgSTACK_doc "$fmtobj DbgSTACK ?skip:int32=0? ?num:int32=-1? ?callfunc:string=\"MK_NULL\"? (const)"

#define	LogC_doc "$fmtobj LogC message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? (const)"

#define	LogHEX_doc "$fmtobj LogHEX callfunc:string data:binary (const)"

#define	RefGet_doc "int32 [$obj RefGet]"

#define	GetNull_doc "MkObjectC [MkObjectC GetNull]"

#define	HandleResolve_doc "MkObjectC [MkObjectC HandleResolve netHdl:MK_HDL]"

#define	Instances_doc "MkObjectC [MkObjectC Instances]"

#define	DeleteCallbackCleanup_doc "MkObjectC DeleteCallbackCleanup ident:string"

#define	DeleteCallbackSetup_doc "MkObjectC DeleteCallbackSetup ident:string ?callback:callable=\"MK_NULL\"? ?filter:string=\"MK_NULL\"?"

#define	HandleDeleteByNetHdl_doc "MkObjectC HandleDeleteByNetHdl netHdl:MK_HDL"

#define	Delete_doc "$obj Delete"

#define	Dispose_doc "$obj Dispose"

#define	ErrorCatch_doc "MkErrorC [$obj ErrorCatch ?exception:errorCode=\"MK_NULL\"? ?callfunc:string=\"MK_NULL\"?] (const)"

#define	Next_doc "MkObjectC [$obj Next]"

#define	Prev_doc "MkObjectC [$obj Prev]"

#define	ToError_doc "MkErrorC [$obj ToError]"

#define	HandleDelete_doc "$netObj HandleDelete"

#define	HandleExists_doc "bool [$obj HandleExists]"

#define	HandleGet_doc "MK_HDL [$obj HandleGet]"

#define	HandleGetOfType_doc "MK_HDL [$obj HandleGetOfType]"

#define	HandleGetOr0_doc "MK_HDL [$obj HandleGetOr0]"

#define	IsNull_doc "bool [$obj IsNull]"

#define	Log_doc "$obj Log ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

#define	LogLong_doc "$obj LogLong ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

#define	LogShort_doc "$obj LogShort ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

#define	LogType_doc "$obj LogType ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

#define	ToName_doc "string [$obj ToName] (const)"

#define	ToNameOfClass_doc "string [$obj ToNameOfClass]"

#define	ToNameOfType_doc "string [$obj ToNameOfType] (const)"

#define	ToString_doc "string [$inst ToString] (const)"

#define	SysHashI32_doc "int32 [MkObjectC SysHashI32 key:string ?length:int32=-1?]"

#define	SysHashSTR_doc "string [MkObjectC SysHashSTR key:string ?length:int32=-1?]"

#define	SysKill_doc "$fmtobj SysKill pid:int32 signal:int32 (const)"

#define	SysGetPid_doc "int32 [$fmtobj SysGetPid] (const)"

#define	MkDbgO_O(hdl, call)

#define	MkDbgDumpTmpl(...)

#define	MkObjectToNameOfClassTmpl(hdl)

#define	MkObjectErrorCatchTmpl(...)

#define	ALL_INIT_AT_STARTUP

Functions
static MK_PTR	tclmkkernel_MkObjectC_selfCreate (MK_RT mkrt, MK_OBJ const obj, MK_PTR const env)

static void	tclmkkernel_MkObjectC_selfDelete (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)

static void	tclmkkernel_MkObjectC_selfUnlink (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)

static enum MkErrorE	TclDbgDump (OT_Prefix_ARGS MK_OBJ const obj, MK_STRN const message, MK_STRN const callfunc)

static OT_ProcRet	tclmkkernel_MkObjectC_HandleResolve (OtClass_ARGS)
	`Tcl: (static) MkObjectC [MkObjectC HandleResolve netHdl:MK_HDL]` → C-API Handle-Resolve-Slot - return a MkObjectC from *netHdl* or `"MK_NULL"` if invalid…

static OT_ProcRet	tclmkkernel_MkObjectC_HandleDelete (MkObjectC_ARGS)
	`Tcl: $netObj HandleDelete` → C-API Handle-Delete-Slot - delete a *netObj* from handle-storage …

static OT_ProcRet	tclmkkernel_MkObjectC_HandleExists (MkObjectC_ARGS)
	`Tcl: bool [$obj HandleExists]` → C-API check if *obj* has already a handle defined…

static OT_ProcRet	tclmkkernel_MkObjectC_HandleGet (MkObjectC_ARGS)
	`Tcl: MK_HDL [$obj HandleGet]` → C-API Handle-Get-Slot - returns a *export-hdl* to the MkObjectC useable for external storage

static OT_ProcRet	tclmkkernel_MkObjectC_HandleGetOfType (MkObjectC_ARGS)
	`Tcl: MK_HDL [$obj HandleGetOfType]` → C-API Export-Slot - returns *typeHdl* of the *obj* .

static OT_ProcRet	tclmkkernel_MkObjectC_HandleGetOr0 (MkObjectC_ARGS)
	`Tcl: MK_HDL [$obj HandleGetOr0]` → C-API return *export-hdl* or 0 in not created…

static OT_ProcRet	tclmkkernel_MkObjectC_HandleDeleteByNetHdl (OtClass_ARGS)
	`Tcl: (static) MkObjectC HandleDeleteByNetHdl netHdl:MK_HDL` → C-API Handle-Delete-Slot - delete a *netHdl* from handle-storage …

static OT_ProcRet	tclmkkernel_MkObjectC_Next (MkObjectC_ARGS)
	`Tcl: MkObjectC [$obj Next]` → C-API get next instance from linked-list of MkObjectS type

static OT_ProcRet	tclmkkernel_MkObjectC_Prev (MkObjectC_ARGS)
	`Tcl: MkObjectC [$obj Prev]` → C-API get previous instance from linked-list of MkObjectS type

static OT_ProcRet	tclmkkernel_MkObjectC_Instances (OtClass_ARGS)
	`Tcl: (static) MkObjectC [MkObjectC Instances]` → C-API get head-instance from linked-list of MkObjectS type …

static OT_ProcRet	tclmkkernel_MkObjectC_GetNull (OtClass_ARGS)
	`Tcl: (static) MkObjectC [MkObjectC GetNull]` → C-API Null-Slot - return a MkObjectC typed `NULL` instance …

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) …

static OT_ProcRet	tclmkkernel_MkObjectC_LogC (MkObjectC_ARGS)
	`Tcl: $fmtobj LogC message:string ?debug:int32=0? ?callfunc:string="MK_NULL"?` → C-API write a logging-message to MkLogFileC (default: stderr) using the internal format …

static OT_ProcRet	tclmkkernel_MkObjectC_LogHEX (MkObjectC_ARGS)
	`Tcl: $fmtobj LogHEX callfunc:string data:binary` → C-API log binaray data as HEX into the MkLogFileC (default: stderr) …

static OT_ProcRet	tclmkkernel_MkObjectC_Log (MkObjectC_ARGS)
	`Tcl: $obj Log ?fmtobj:MkObjectC="MK_NULL"? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0?` → C-API Log-Slot - log a summary of an object to the MkLogFileC (default: stderr) target …

static OT_ProcRet	tclmkkernel_MkObjectC_LogLong (MkObjectC_ARGS)
	`Tcl: $obj LogLong ?fmtobj:MkObjectC="MK_NULL"? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0?` → C-API log the MkObjectS verbose into the MkLogFileC (default: stderr) …

static OT_ProcRet	tclmkkernel_MkObjectC_LogShort (MkObjectC_ARGS)
	`Tcl: $obj LogShort ?fmtobj:MkObjectC="MK_NULL"? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0?` → C-API log the MkObjectS into the MkLogFileC (default: stderr) …

static OT_ProcRet	tclmkkernel_MkObjectC_LogType (MkObjectC_ARGS)
	`Tcl: $obj LogType ?fmtobj:MkObjectC="MK_NULL"? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0?` → C-API log the tyoe of the MkObjectS into the MkLogFileC (default: stderr) …

static OT_ProcRet	tclmkkernel_MkObjectC_ErrorCatch (MkObjectC_ARGS)
	`Tcl: MkErrorC [$obj ErrorCatch ?exception:errorCode="MK_NULL"? ?callfunc:string="MK_NULL"?]` → C-API convert a programming-language-error into an tclmkkernel error …

static OT_ProcRet	tclmkkernel_MkObjectC_ToError (MkObjectC_ARGS)
	`Tcl: MkErrorC [$obj ToError]` → C-API Error-Slot - return an error-object pre initialized with *obj* data.

static OT_ProcRet	tclmkkernel_MkObjectC_IsNull (MkObjectC_ARGS)
	`Tcl: bool [$obj IsNull]` → C-API ckeck if the object is `"MK_NULL"`

static OT_ProcRet	tclmkkernel_MkObjectC_ToName (MkObjectC_ARGS)
	`Tcl: string [$obj ToName]` → C-API Info-Slot - returns brief information about the obj as a string

static OT_ProcRet	tclmkkernel_MkObjectC_ToNameOfClass (MkObjectC_ARGS)
	`Tcl: string [$obj ToNameOfClass]` → C-API Class-Slot - returns the Tcl-Class-Name of the obj as string

static OT_ProcRet	tclmkkernel_MkObjectC_ToNameOfType (MkObjectC_ARGS)
	`Tcl: string [$obj ToNameOfType]` → C-API Type-Slot - returns the LibMkKernel-Type-Name of the obj as a string

static OT_ProcRet	tclmkkernel_MkObjectC_ToString (MkObjectC_ARGS)
	`Tcl: string [$inst ToString]` → C-API String-Slot - returns the string representation of the *inst* …

static OT_ProcRet	tclmkkernel_MkObjectC_RefGet (MkObjectC_ARGS)
	internal function: MkRefGet

static OT_ProcRet	tclmkkernel_MkObjectC_SysKill (MkObjectC_ARGS)
	internal function: MkSysKill

static OT_ProcRet	tclmkkernel_MkObjectC_SysGetPid (MkObjectC_ARGS)
	internal function: MkSysGetPid

static OT_ProcRet	tclmkkernel_MkObjectC_SysHashI32 (OtClass_ARGS)
	internal function: MkSysHashI32

static OT_ProcRet	tclmkkernel_MkObjectC_SysHashSTR (OtClass_ARGS)
	internal function: MkSysHashSTR

static OT_ProcRet	tclmkkernel_MkObjectC_Dispose (MkObjectC_ARGS)
	`Tcl: (destructor) $obj Dispose` → C-API Dispose-Slot - untie the connection between the Native-Tcl-Instance and the tclmkkernel-Instance.

static OT_ProcRet	tclmkkernel_MkObjectC_Delete (MkObjectC_ARGS)
	`Tcl: (destructor) $obj Delete` → C-API Delete-Slot - delete an instance.

static OT_ProcRet	tclmkkernel_MkObjectC_DeleteCallbackCleanup (OtClass_ARGS)
	`Tcl: (static) MkObjectC DeleteCallbackCleanup ident:string` → C-API cleanup the DeleteCallback installed with MkObjectDeleteCallbackSetup …

static OT_ProcRet	tclmkkernel_MkObjectC_DeleteCallbackSetup (OtClass_ARGS)
	`Tcl: (static) MkObjectC DeleteCallbackSetup ident:string ?callback:callable="MK_NULL"? ?filter:string="MK_NULL"?` → C-API Create/Delete the instance-delete-callback …

static void	tclmkkernel_sUnknownAllMethods (OT_ENV_T interp, const OtUnknownS *ukn)

int	tclmkkernel_UnknownSetup (OT_ENV_T interp, OT_SELF_T classO, const Tcl_MethodType methodsDefs[], OtUnknownS *uknPtr)

int	tclmkkernel_pMkObjectC_Init (MK_RT mkrt, OT_ENV_T interp, OT_NS_T ns)

Variables
__thread OT_CLS_T	OT_CLASS = NULL

static __thread MK_TYP	MkObjectCTT = NULL

__thread OT_OBJ_T	tclmkkernel_MkObjectC_MK_NULL = NULL

static const Tcl_MethodType	tclmkkernel_sOtClassDef []

static const Tcl_MethodType	tclmkkernel_sInstanceDef []

Detailed Description

tag: nhi1-release-250425

Copyright: (C) NHI - #1 - Project - Group This software has NO permission to copy, please contact AUTHOR for additional information

Definition in file MkObjectC_tcl.c.

Macro Definition Documentation

◆ ALL_INIT_AT_STARTUP

#define ALL_INIT_AT_STARTUP

"unknown" API

Definition at line 1049 of file MkObjectC_tcl.c.

◆ ClassInit

#define ClassInit

Value:

  /* if not already done, initialize NEW MQ type */ \
  if (MkObjectCTT == NULL) MkObjectCTT = MkObjectSTT; \
 \
  /* protect against double call */ \
  if (MkObjectCTT->selfCreate == NS(MkObjectC_selfCreate)) return MK_OK; \
 \
  /* add "selfCreate" and "selfDelete" feature to the MQ-Class */ \
  MkObjectCTT->selfCreate    = NS(MkObjectC_selfCreate); \
  MkObjectCTT->selfDelete    = NS(MkObjectC_selfDelete); \
  MkObjectCTT->selfUnlink    = NS(MkObjectC_selfUnlink); \
 \
  /* create the TCL-class */ \
  OT_SELF_T classO = MK(ClassDef)(interp,ns,MkObjectCTT); \
  check_NULL(classO) goto error; \
  OT_CLASS = Tcl_GetObjectAsClass(classO); \
 \
  /* create the TCL static Methods */ \
  static MkThreadLocal OtUnknownS NS(sClassUnknown) = {OT_UNKNOWN_CLASS}; \
  check_LNG(MK(UnknownSetup) (interp,classO,NS(sOtClassDef),&NS(sClassUnknown))) goto error; \
 \
  /* create the TCL instance Methods */ \
  static MkThreadLocal OtUnknownS NS(sInstanceUnknown) = {OT_UNKNOWN_INSTANCE}; \
  check_LNG(MK(UnknownSetup) (interp,classO,NS(sInstanceDef),&NS(sInstanceUnknown))) goto error; \
 \
  /* define the "NULL" object */ \
  MK(MkObjectC_MK_NULL) = Tcl_GetObjectName(interp, \
    MK(AtomCreate) (MK_RT_CALL interp,  NULL /*obj*/, OT_CLASS, "MK_NULL" /*name*/, "::tclmkkernel::MkObjectC" /*ns*/) \
  ); \
  Tcl_IncrRefCount(MK(MkObjectC_MK_NULL));

Definition at line 82 of file MkObjectC_tcl.c.

#define   ClassInit \
  /* if not already done, initialize NEW MQ type */ \
  if (MkObjectCTT == NULL) MkObjectCTT = MkObjectSTT; \
 \
  /* protect against double call */ \
  if (MkObjectCTT->selfCreate == NS(MkObjectC_selfCreate)) return MK_OK; \
 \
  /* add "selfCreate" and "selfDelete" feature to the MQ-Class */ \
  MkObjectCTT->selfCreate    = NS(MkObjectC_selfCreate); \
  MkObjectCTT->selfDelete    = NS(MkObjectC_selfDelete); \
  MkObjectCTT->selfUnlink    = NS(MkObjectC_selfUnlink); \
 \
  /* create the TCL-class */ \
  OT_SELF_T classO = MK(ClassDef)(interp,ns,MkObjectCTT); \
  check_NULL(classO) goto error; \
  OT_CLASS = Tcl_GetObjectAsClass(classO); \
 \
  /* create the TCL static Methods */ \
  static MkThreadLocal OtUnknownS NS(sClassUnknown) = {OT_UNKNOWN_CLASS}; \
  check_LNG(MK(UnknownSetup) (interp,classO,NS(sOtClassDef),&NS(sClassUnknown))) goto error; \
 \
  /* create the TCL instance Methods */ \
  static MkThreadLocal OtUnknownS NS(sInstanceUnknown) = {OT_UNKNOWN_INSTANCE}; \
  check_LNG(MK(UnknownSetup) (interp,classO,NS(sInstanceDef),&NS(sInstanceUnknown))) goto error; \
 \
  /* define the "NULL" object */ \
  MK(MkObjectC_MK_NULL) = Tcl_GetObjectName(interp, \
    MK(AtomCreate) (MK_RT_CALL interp,  NULL /*obj*/, OT_CLASS, "MK_NULL" /*name*/, "::tclmkkernel::MkObjectC" /*ns*/) \
  ); \
  Tcl_IncrRefCount(MK(MkObjectC_MK_NULL));

◆ DbgDump_doc

#define DbgDump_doc "$obj DbgDump ?message:string=\"var\"? ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 123 of file MkObjectC_tcl.c.

◆ DbgL_doc

#define DbgL_doc "$fmtobj DbgL message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 124 of file MkObjectC_tcl.c.

◆ DbgLogC_doc

#define DbgLogC_doc "$obj DbgLogC ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 125 of file MkObjectC_tcl.c.

◆ DbgM_doc

#define DbgM_doc "MkObjectC DbgM message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0?"

Definition at line 120 of file MkObjectC_tcl.c.

◆ DbgO_doc

#define DbgO_doc "$obj DbgO ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 126 of file MkObjectC_tcl.c.

◆ DbgSTACK_doc

#define DbgSTACK_doc "$fmtobj DbgSTACK ?skip:int32=0? ?num:int32=-1? ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 127 of file MkObjectC_tcl.c.

◆ Delete_doc

#define Delete_doc "$obj Delete"

Definition at line 147 of file MkObjectC_tcl.c.

◆ DeleteCallbackCleanup_doc

#define DeleteCallbackCleanup_doc "MkObjectC DeleteCallbackCleanup ident:string"

Definition at line 142 of file MkObjectC_tcl.c.

◆ DeleteCallbackSetup_doc

#define DeleteCallbackSetup_doc "MkObjectC DeleteCallbackSetup ident:string ?callback:callable=\"MK_NULL\"? ?filter:string=\"MK_NULL\"?"

Definition at line 143 of file MkObjectC_tcl.c.

◆ Dispose_doc

#define Dispose_doc "$obj Dispose"

Definition at line 150 of file MkObjectC_tcl.c.

◆ ErrorCatch_doc

#define ErrorCatch_doc "MkErrorC [$obj ErrorCatch ?exception:errorCode=\"MK_NULL\"? ?callfunc:string=\"MK_NULL\"?] (const)"

Definition at line 153 of file MkObjectC_tcl.c.

◆ GetNull_doc

#define GetNull_doc "MkObjectC [MkObjectC GetNull]"

Definition at line 137 of file MkObjectC_tcl.c.

◆ HandleDelete_doc

#define HandleDelete_doc "$netObj HandleDelete"

Definition at line 159 of file MkObjectC_tcl.c.

◆ HandleDeleteByNetHdl_doc

#define HandleDeleteByNetHdl_doc "MkObjectC HandleDeleteByNetHdl netHdl:MK_HDL"

Definition at line 144 of file MkObjectC_tcl.c.

◆ HandleExists_doc

#define HandleExists_doc "bool [$obj HandleExists]"

Definition at line 160 of file MkObjectC_tcl.c.

◆ HandleGet_doc

#define HandleGet_doc "MK_HDL [$obj HandleGet]"

Definition at line 161 of file MkObjectC_tcl.c.

◆ HandleGetOfType_doc

#define HandleGetOfType_doc "MK_HDL [$obj HandleGetOfType]"

Definition at line 162 of file MkObjectC_tcl.c.

◆ HandleGetOr0_doc

#define HandleGetOr0_doc "MK_HDL [$obj HandleGetOr0]"

Definition at line 163 of file MkObjectC_tcl.c.

◆ HandleResolve_doc

#define HandleResolve_doc "MkObjectC [MkObjectC HandleResolve netHdl:MK_HDL]"

Definition at line 138 of file MkObjectC_tcl.c.

◆ Instances_doc

#define Instances_doc "MkObjectC [MkObjectC Instances]"

Definition at line 139 of file MkObjectC_tcl.c.

◆ IsNull_doc

#define IsNull_doc "bool [$obj IsNull]"

Definition at line 164 of file MkObjectC_tcl.c.

◆ Log_doc

#define Log_doc "$obj Log ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 165 of file MkObjectC_tcl.c.

◆ LogC_doc

#define LogC_doc "$fmtobj LogC message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 130 of file MkObjectC_tcl.c.

◆ LogHEX_doc

#define LogHEX_doc "$fmtobj LogHEX callfunc:string data:binary (const)"

Definition at line 131 of file MkObjectC_tcl.c.

◆ LogLong_doc

#define LogLong_doc "$obj LogLong ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 166 of file MkObjectC_tcl.c.

◆ LogShort_doc

#define LogShort_doc "$obj LogShort ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 167 of file MkObjectC_tcl.c.

◆ LogType_doc

#define LogType_doc "$obj LogType ?fmtobj:MkObjectC=\"MK_NULL\"? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 168 of file MkObjectC_tcl.c.

◆ META_FILE_NAME

#define META_FILE_NAME "MkObjectC_tcl.c"

Definition at line 16 of file MkObjectC_tcl.c.

◆ MkDbgDumpTmpl

#define MkDbgDumpTmpl ( ... )

Value:

TclDbgDump(OT_Prefix_CALL __VA_ARGS__)

OT_Prefix_CALL

#define OT_Prefix_CALL

Definition LibMkKernel_tcl.h:346

TclDbgDump

static enum MkErrorE TclDbgDump(OT_Prefix_ARGS MK_OBJ const obj, MK_STRN const message, MK_STRN const callfunc)

Definition MkObjectC_tcl.c:199

Definition at line 194 of file MkObjectC_tcl.c.

◆ MkDbgO_O

#define MkDbgO_O	(		hdl,
			call )

Value:

MkLogV(hdl,call,0,"%s\n",MK(PrintLngObj)(OT_Prefix_CALL NULL,META2VAL_O(hdl)))

META2VAL_O

#define META2VAL_O(o)

Definition LibMkKernel_tcl.h:866

MkLogV

#define MkLogV(...)

Definition kernel_overload_mk.h:1601

Definition at line 193 of file MkObjectC_tcl.c.

◆ MkObjectErrorCatchTmpl

#define MkObjectErrorCatchTmpl ( ... )

Value:

MK(MkExceptionC_Catch)(OT_Prefix_CALL __VA_ARGS__)

Definition at line 196 of file MkObjectC_tcl.c.

◆ MkObjectToNameOfClassTmpl

#define MkObjectToNameOfClassTmpl ( hdl )

Value:

OT_LNG_OBJ_CLASSNAME(META2VAL_O(hdl))

OT_LNG_OBJ_CLASSNAME

#define OT_LNG_OBJ_CLASSNAME(obj)

Definition LibMkKernel_tcl.h:255

Definition at line 195 of file MkObjectC_tcl.c.

◆ Next_doc

#define Next_doc "MkObjectC [$obj Next]"

Definition at line 154 of file MkObjectC_tcl.c.

◆ OBJECT2OBJ

#define OBJECT2OBJ ( O )

Value:

MkAssertCastM(MkObjectC,(Tcl_ObjectGetMetadata(O, &MK(AtomMeta))))

MkAssertCastM

#define MkAssertCastM(cls, m)

}

Definition LibMkKernel_mk.h:3323

Definition at line 23 of file MkObjectC_tcl.c.

◆ OT_CLASS

#define OT_CLASS NS(MkObjectC)

Definition at line 20 of file MkObjectC_tcl.c.

◆ OT_CLASS_NAME

#define OT_CLASS_NAME "MkObjectC"

Definition at line 21 of file MkObjectC_tcl.c.

◆ OT_SETUP_hdl

#define OT_SETUP_hdl SetupHdlFromMetaData_2(OBJ,MK_OBJ);

Definition at line 64 of file MkObjectC_tcl.c.

◆ OT_SETUP_hdl__null_allow

#define OT_SETUP_hdl__null_allow SetupHdlFromMetaData__null_allow_2(OBJ,MK_OBJ);

Definition at line 65 of file MkObjectC_tcl.c.

◆ OT_SETUP_hdl_constr

#define OT_SETUP_hdl_constr

Value:

  OT_SETUP_hdl_constr_pre; \
  int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
  AllRtSetup_NULL; \
  MK_RT_UNUSED OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
  MK_OBJ hdl = (MK_OBJ) &MkERROR;

Definition at line 69 of file MkObjectC_tcl.c.

#define   OT_SETUP_hdl_constr \
  OT_SETUP_hdl_constr_pre; \
  int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
  AllRtSetup_NULL; \
  MK_RT_UNUSED OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
  MK_OBJ hdl = (MK_OBJ) &MkERROR;

◆ OT_SETUP_hdl_constr_pre

#define OT_SETUP_hdl_constr_pre

Definition at line 68 of file MkObjectC_tcl.c.

◆ OT_SETUP_hdl_destr

#define OT_SETUP_hdl_destr SetupHdlFromMetaData__null_allow_2(OBJ,MK_OBJ);

Definition at line 66 of file MkObjectC_tcl.c.

◆ OT_SETUP_hdl_static

#define OT_SETUP_hdl_static

Value:

  int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
  AllRtSetup_NULL; \
  __attribute__((unused)) OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
  __attribute__((unused)) MK_TYP hdl = MkObjectC##_TT;

Definition at line 58 of file MkObjectC_tcl.c.

#define   OT_SETUP_hdl_static     \
  int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
  AllRtSetup_NULL; \
  __attribute__((unused)) OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
  __attribute__((unused)) MK_TYP hdl = MkObjectC##_TT;

◆ OT_SETUP_hdl_static_constr

#define OT_SETUP_hdl_static_constr

Value:

OT_SETUP_hdl_static_constr_pre; \

OT_SETUP_hdl_static

OT_SETUP_hdl_static_constr_pre

#define OT_SETUP_hdl_static_constr_pre

Definition MkObjectC_tcl.c:53

OT_SETUP_hdl_static

#define OT_SETUP_hdl_static

Definition MkObjectC_tcl.c:58

Definition at line 54 of file MkObjectC_tcl.c.

#define   OT_SETUP_hdl_static_constr \
  OT_SETUP_hdl_static_constr_pre; \
  OT_SETUP_hdl_static

◆ OT_SETUP_hdl_static_constr_pre

#define OT_SETUP_hdl_static_constr_pre

Definition at line 53 of file MkObjectC_tcl.c.

◆ Prev_doc

#define Prev_doc "MkObjectC [$obj Prev]"

Definition at line 155 of file MkObjectC_tcl.c.

◆ RefGet_doc

#define RefGet_doc "int32 [$obj RefGet]"

Definition at line 134 of file MkObjectC_tcl.c.

◆ SetupRtFromHdl_X

#define SetupRtFromHdl_X ( hd )

Value:

MkRtSetup_O(hd)

MkRtSetup_O

#define MkRtSetup_O(o)

Definition LibMkKernel_mk.h:12438

Definition at line 11 of file MkObjectC_tcl.c.

◆ SetupRtFromHdl_XN

#define SetupRtFromHdl_XN ( hd )

Value:

MkRtSetup_ON(hd)

MkRtSetup_ON

#define MkRtSetup_ON(o)

Definition LibMkKernel_mk.h:12441

Definition at line 12 of file MkObjectC_tcl.c.

◆ SysGetPid_doc

#define SysGetPid_doc "int32 [$fmtobj SysGetPid] (const)"

Definition at line 182 of file MkObjectC_tcl.c.

◆ SysHashI32_doc

#define SysHashI32_doc "int32 [MkObjectC SysHashI32 key:string ?length:int32=-1?]"

Definition at line 175 of file MkObjectC_tcl.c.

◆ SysHashSTR_doc

#define SysHashSTR_doc "string [MkObjectC SysHashSTR key:string ?length:int32=-1?]"

Definition at line 176 of file MkObjectC_tcl.c.

◆ SysKill_doc

#define SysKill_doc "$fmtobj SysKill pid:int32 signal:int32 (const)"

Definition at line 179 of file MkObjectC_tcl.c.

◆ ToError_doc

#define ToError_doc "MkErrorC [$obj ToError]"

Definition at line 156 of file MkObjectC_tcl.c.

◆ ToName_doc

#define ToName_doc "string [$obj ToName] (const)"

Definition at line 169 of file MkObjectC_tcl.c.

◆ ToNameOfClass_doc

#define ToNameOfClass_doc "string [$obj ToNameOfClass]"

Definition at line 170 of file MkObjectC_tcl.c.

◆ ToNameOfType_doc

#define ToNameOfType_doc "string [$obj ToNameOfType] (const)"

Definition at line 171 of file MkObjectC_tcl.c.

◆ ToString_doc

#define ToString_doc "string [$inst ToString] (const)"

Definition at line 172 of file MkObjectC_tcl.c.

◆ VER

#define VER TCL_OO_METHOD_VERSION_CURRENT

Definition at line 113 of file MkObjectC_tcl.c.

Function Documentation

◆ TclDbgDump()

static enum MkErrorE TclDbgDump	(	OT_Prefix_ARGS MK_OBJ const	obj,
		MK_STRN const	message,
		MK_STRN const	callfunc )

static

Definition at line 199 of file MkObjectC_tcl.c.

{
  Tcl_Obj * self = META2VAL_O(obj);
  MkRuntimeLogBufferPush();
    MkLogV(obj,callfunc,0,MK_COLOR_CYAN" >>> "MK_COLOR_RESET"\n");
 
    fprintf(MK_RT_REF.log.logFILE,"  > " MK_COLOR_YELLOW "%s"MK_COLOR_RESET"\n", MK(PrintLngObj)(OT_Prefix_CALL message,self));
 
    MkObjectLog(obj,NULL,0,callfunc,1);
 
    MkLogV(obj,callfunc,0,MK_COLOR_CYAN" <<< "MK_COLOR_RESET"\n");
  MkRuntimeLogBufferPop();
 
  return MK_OK;
}

◆ tclmkkernel_MkObjectC_selfCreate()

static MK_PTR tclmkkernel_MkObjectC_selfCreate	(	MK_RT	mkrt,
		MK_OBJ const	obj,
		MK_PTR const	env )

static

Definition at line 33 of file MkObjectC_tcl.c.

                                                                                       {
  OT_ENV_T interp = env;
  return MK(AtomCreate) (MK_RT_CALL interp,obj,OT_CLASS,NULL,NULL);
}

◆ tclmkkernel_MkObjectC_selfDelete()

static void tclmkkernel_MkObjectC_selfDelete	(	MK_RT	mkrt,
		MK_PTR	selfP,
		MK_PTR const	env )

static

Definition at line 38 of file MkObjectC_tcl.c.

                                                                                 {
  OT_SELF_T selfO = selfP;
  OT_ENV_T  interp = env;
  MK(AtomDeleteHard) (MK_RT_CALL interp, selfO);
}

◆ tclmkkernel_MkObjectC_selfUnlink()

static void tclmkkernel_MkObjectC_selfUnlink	(	MK_RT	mkrt,
		MK_PTR	selfP,
		MK_PTR const	env )

static

Definition at line 44 of file MkObjectC_tcl.c.

                                                                                 {
  OT_SELF_T selfO = selfP;
  OT_ENV_T  interp = env;
  MK(AtomUnlink) (MK_RT_CALL interp, selfO);
}

◆ tclmkkernel_pMkObjectC_Init()

int tclmkkernel_pMkObjectC_Init	(	MK_RT	mkrt,
		OT_ENV_T	interp,
		OT_NS_T	ns )

Public API

Definition at line 1283 of file MkObjectC_tcl.c.

{
  ClassInit
 
  return TCL_OK;
error:
  return TCL_ERROR;
}

◆ tclmkkernel_sUnknownAllMethods()

static void tclmkkernel_sUnknownAllMethods	(	OT_ENV_T	interp,
		const OtUnknownS *	ukn )

static

Definition at line 1051 of file MkObjectC_tcl.c.

  {
  const Tcl_MethodType  *type   = ukn->list;
  const size_t          nmemb   = ukn->nmemb;
  const OT_CLS_T       classC  = ukn->classC;
  const OT_SELF_T       classO  = ukn->classO;
 
  for (int i=0; i<nmemb; i++) {
//printC(type[i].name)
    switch(ukn->what) {
      case OT_UNKNOWN_INSTANCE:
        if (type[i].name[0] == '<') {
          if (type[i].name[1] == 'c') {
            if (strcmp(type[i].name,"<constructor>") == 0) {
#ifdef ALL_INIT_AT_STARTUP
              Tcl_Method mth = Tcl_NewMethod(interp, classC, NULL, 1, &type[i], NULL);
              Tcl_ClassSetConstructor(interp,classC,mth);
#endif
            } else {
              goto other;
            }
          } else if (type[i].name[1] == 'd') {
            if (strcmp(type[i].name,"<destructor>") == 0) {
#ifdef ALL_INIT_AT_STARTUP
              // there are 2 destructors: 
              // -> FIRST from "MkAtomMeta"
              // -> SECOND the "<destructor>" from "MkObjectC"
              // BOTH call "MK(AtomMetaDelete)", disable SECOND and wait for errors
              //Tcl_Method mth = Tcl_NewMethod(interp, classC, NULL, 1, &type[i], clientData);
              //Tcl_ClassSetDestructor(interp,classC,mth);
#endif
            } else {
              goto other;
            }
          } else {
            goto other;
          }
        } else {
    other:
          Tcl_NewMethod(interp, classC, Tcl_NewStringObj(type[i].name,-1), 1, &type[i], NULL);
        }
      break;
      case OT_UNKNOWN_CLASS:
        Tcl_NewInstanceMethod(interp, classO, Tcl_NewStringObj(type[i].name,-1), 1, &type[i], NULL);
      break;
    }
  }
}

◆ tclmkkernel_UnknownSetup()

int tclmkkernel_UnknownSetup	(	OT_ENV_T	interp,
		OT_SELF_T	classO,
		const Tcl_MethodType	methodsDefs[],
		OtUnknownS *	uknPtr )

Definition at line 1147 of file MkObjectC_tcl.c.

  {
  OT_CLS_T classC = Tcl_GetObjectAsClass(classO);
 
//printTxt(OT_LNG_NAME_FROM_CLASS(classC))
 
  // allready done?
  if (uknPtr->list != NULL) return TCL_OK;
 
  // sort the methodsDefs -> required for "bsearch" in sUnknownObjCmd
  size_t num;
  for (num=0; methodsDefs[num].version != 0; num++) { };
  *uknPtr = (OtUnknownS) {uknPtr->what, num, methodsDefs, classO, classC};
 
#ifdef ALL_INIT_AT_STARTUP
  NS(sUnknownAllMethods)(interp,uknPtr);
#else
  qsort(methodsDefs, num, sizeof(Tcl_MethodType), NS(sUnknownSort));
 
  // MA; for (int i=0; i<num; i++) { printV("[%2i] %s\n", i, methodsDefs[i].name); } /* debugging */
 
  const static Tcl_MethodType NS(sUnknownDef) = { VER, "unknown", NS(sUnknownObjCmd), NULL, NULL };
 
  switch (uknPtr->what) {
 
    case OT_UNKNOWN_CLASS: {
 
      /* add the "unknown" */
      Tcl_NewInstanceMethod(interp, classO, Tcl_NewStringObj("unknown",-1), 1, &NS(sUnknownDef), uknPtr);
 
      break;
    }
 
    case OT_UNKNOWN_INSTANCE: {
      Tcl_MethodType* item;
 
      // create MINIMUM required functions
      item = bsearch("<constructor>", uknPtr->list, uknPtr->nmemb, sizeof(Tcl_MethodType), NS(sUnknownSort2));
      if (item) {
        Tcl_Method mth = Tcl_NewMethod(interp, classC, NULL, 1, item, NULL);
        Tcl_ClassSetConstructor(interp,classC,mth);
      }
 
/*
      // there are 2 destructors, FIRST from "MkAtomMeta" and SECOND the "<destructor>" from "MkObjectC"
      // -> BOTH call "MkAtomMetaDelete"
      // disable SECOND and wait for errors
      item = bsearch("<destructor>", uknPtr->list, uknPtr->nmemb, sizeof(Tcl_MethodType), NS(sUnknownSort2));
      if (item) {
        mth = Tcl_NewMethod(interp, classC, NULL, 1, item, clientData);
        Tcl_ClassSetDestructor(interp,classC,mth);
      }
*/
 
      /* add the "unknown" */
      Tcl_NewMethod(interp, classC, Tcl_NewStringObj("unknown",-1), 1, &NS(sUnknownDef), uknPtr);
 
      break;
    }
  }
 
#endif  /* ALL_INIT_AT_STARTUP */
 
  return TCL_OK;
}

Variable Documentation

◆ MkObjectCTT

__thread MK_TYP MkObjectCTT = NULL

static

Definition at line 29 of file MkObjectC_tcl.c.

◆ OT_CLASS

__thread OT_CLS_T OT_CLASS = NULL

Definition at line 26 of file MkObjectC_tcl.c.

◆ tclmkkernel_MkObjectC_MK_NULL

__thread OT_OBJ_T tclmkkernel_MkObjectC_MK_NULL = NULL

Definition at line 30 of file MkObjectC_tcl.c.

◆ tclmkkernel_sInstanceDef

const Tcl_MethodType tclmkkernel_sInstanceDef[]

static

Definition at line 1221 of file MkObjectC_tcl.c.

                                                 {
 
// BEGIN-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
// doc-key: MkObjectC,MkDbg,om_
  {VER, "DbgDump"             , NS(MkObjectC_DbgDump)                   , NULL, NULL},
  {VER, "DbgL"                , NS(MkObjectC_DbgL)                      , NULL, NULL},
  {VER, "DbgLogC"             , NS(MkObjectC_DbgLogC)                   , NULL, NULL},
  {VER, "DbgO"                , NS(MkObjectC_DbgO)                      , NULL, NULL},
  {VER, "DbgSTACK"            , NS(MkObjectC_DbgSTACK)                  , NULL, NULL},
 
// doc-key: MkObjectC,MkLog,om_
  {VER, "LogC"                , NS(MkObjectC_LogC)                      , NULL, NULL},
  {VER, "LogHEX"              , NS(MkObjectC_LogHEX)                    , NULL, NULL},
 
// doc-key: MkObjectC,MkObj,om_
  {VER, "RefGet"              , NS(MkObjectC_RefGet)                    , NULL, NULL},
 
// doc-key: MkObjectC,MkObject,oD_
  {VER, "Delete"              , NS(MkObjectC_Delete)                    , NULL, NULL},
 
// doc-key: MkObjectC,MkObject,od_
  {VER, "Dispose"             , NS(MkObjectC_Dispose)                   , NULL, NULL},
 
// doc-key: MkObjectC,MkObject,oc_
  {VER, "ErrorCatch"          , NS(MkObjectC_ErrorCatch)                , NULL, NULL},
  {VER, "Next"                , NS(MkObjectC_Next)                      , NULL, NULL},
  {VER, "Prev"                , NS(MkObjectC_Prev)                      , NULL, NULL},
  {VER, "ToError"             , NS(MkObjectC_ToError)                   , NULL, NULL},
 
// doc-key: MkObjectC,MkObject,om_
  {VER, "HandleDelete"        , NS(MkObjectC_HandleDelete)              , NULL, NULL},
  {VER, "HandleExists"        , NS(MkObjectC_HandleExists)              , NULL, NULL},
  {VER, "HandleGet"           , NS(MkObjectC_HandleGet)                 , NULL, NULL},
  {VER, "HandleGetOfType"     , NS(MkObjectC_HandleGetOfType)           , NULL, NULL},
  {VER, "HandleGetOr0"        , NS(MkObjectC_HandleGetOr0)              , NULL, NULL},
  {VER, "IsNull"              , NS(MkObjectC_IsNull)                    , NULL, NULL},
  {VER, "Log"                 , NS(MkObjectC_Log)                       , NULL, NULL},
  {VER, "LogLong"             , NS(MkObjectC_LogLong)                   , NULL, NULL},
  {VER, "LogShort"            , NS(MkObjectC_LogShort)                  , NULL, NULL},
  {VER, "LogType"             , NS(MkObjectC_LogType)                   , NULL, NULL},
  {VER, "ToName"              , NS(MkObjectC_ToName)                    , NULL, NULL},
  {VER, "ToNameOfClass"       , NS(MkObjectC_ToNameOfClass)             , NULL, NULL},
  {VER, "ToNameOfType"        , NS(MkObjectC_ToNameOfType)              , NULL, NULL},
  {VER, "ToString"            , NS(MkObjectC_ToString)                  , NULL, NULL},
 
// doc-key: MkObjectC,MkSys,om_
  {VER, "SysKill"             , NS(MkObjectC_SysKill)                   , NULL, NULL},
 
// doc-key: MkObjectC,MkSys,omo
  {VER, "SysGetPid"           , NS(MkObjectC_SysGetPid)                 , NULL, NULL},
 
// END-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
  {0, NULL, NULL, NULL, NULL}
};

◆ tclmkkernel_sOtClassDef

const Tcl_MethodType tclmkkernel_sOtClassDef[]

static

Initial value:

= {
 
  {VER, "DbgM"                ,  tclmkkernel_MkObjectC_DbgM , NULL, NULL},
 
  {VER, "GetNull"             ,  tclmkkernel_MkObjectC_GetNull , NULL, NULL},
  {VER, "HandleResolve"       ,  tclmkkernel_MkObjectC_HandleResolve , NULL, NULL},
  {VER, "Instances"           ,  tclmkkernel_MkObjectC_Instances , NULL, NULL},
 
  {VER, "DeleteCallbackCleanup",  tclmkkernel_MkObjectC_DeleteCallbackCleanup , NULL, NULL},
  {VER, "DeleteCallbackSetup" ,  tclmkkernel_MkObjectC_DeleteCallbackSetup , NULL, NULL},
  {VER, "HandleDeleteByNetHdl",  tclmkkernel_MkObjectC_HandleDeleteByNetHdl , NULL, NULL},
 
  {VER, "SysHashI32"          ,  tclmkkernel_MkObjectC_SysHashI32 , NULL, NULL},
  {VER, "SysHashSTR"          ,  tclmkkernel_MkObjectC_SysHashSTR , NULL, NULL},
 
  {0, NULL, NULL, NULL}
}

Definition at line 1017 of file MkObjectC_tcl.c.

                                                {
 
// BEGIN-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
// doc-key: MkObjectC,MkDbg,sm_
  {VER, "DbgM"                , NS(MkObjectC_DbgM)                      , NULL, NULL},
 
// doc-key: MkObjectC,MkObject,sc_
  {VER, "GetNull"             , NS(MkObjectC_GetNull)                   , NULL, NULL},
  {VER, "HandleResolve"       , NS(MkObjectC_HandleResolve)             , NULL, NULL},
  {VER, "Instances"           , NS(MkObjectC_Instances)                 , NULL, NULL},
 
// doc-key: MkObjectC,MkObject,sm_
  {VER, "DeleteCallbackCleanup", NS(MkObjectC_DeleteCallbackCleanup)     , NULL, NULL},
  {VER, "DeleteCallbackSetup" , NS(MkObjectC_DeleteCallbackSetup)       , NULL, NULL},
  {VER, "HandleDeleteByNetHdl", NS(MkObjectC_HandleDeleteByNetHdl)      , NULL, NULL},
 
// doc-key: MkObjectC,MkSys,sm_
  {VER, "SysHashI32"          , NS(MkObjectC_SysHashI32)                , NULL, NULL},
  {VER, "SysHashSTR"          , NS(MkObjectC_SysHashSTR)                , NULL, NULL},
 
// END-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
  {0, NULL, NULL, NULL}
};

Macros

Functions

Variables

Detailed Description

Macro Definition Documentation

◆ ALL_INIT_AT_STARTUP

◆ ClassInit

◆ DbgDump_doc

◆ DbgL_doc

◆ DbgLogC_doc

◆ DbgM_doc

◆ DbgO_doc

◆ DbgSTACK_doc

◆ Delete_doc

◆ DeleteCallbackCleanup_doc

◆ DeleteCallbackSetup_doc

◆ Dispose_doc

◆ ErrorCatch_doc

◆ GetNull_doc

◆ HandleDelete_doc

◆ HandleDeleteByNetHdl_doc

◆ HandleExists_doc

◆ HandleGet_doc

◆ HandleGetOfType_doc

◆ HandleGetOr0_doc

◆ HandleResolve_doc

◆ Instances_doc

◆ IsNull_doc

◆ Log_doc

◆ LogC_doc

◆ LogHEX_doc

◆ LogLong_doc

◆ LogShort_doc

◆ LogType_doc

◆ META_FILE_NAME

◆ MkDbgDumpTmpl

◆ MkDbgO_O

◆ MkObjectErrorCatchTmpl

◆ MkObjectToNameOfClassTmpl

◆ Next_doc

◆ OBJECT2OBJ

◆ OT_CLASS

◆ OT_CLASS_NAME

◆ OT_SETUP_hdl

◆ OT_SETUP_hdl__null_allow

◆ OT_SETUP_hdl_constr

◆ OT_SETUP_hdl_constr_pre

◆ OT_SETUP_hdl_destr

◆ OT_SETUP_hdl_static

◆ OT_SETUP_hdl_static_constr

◆ OT_SETUP_hdl_static_constr_pre

◆ Prev_doc

◆ RefGet_doc

◆ SetupRtFromHdl_X

◆ SetupRtFromHdl_XN

◆ SysGetPid_doc

◆ SysHashI32_doc

◆ SysHashSTR_doc

◆ SysKill_doc

◆ ToError_doc

◆ ToName_doc

◆ ToNameOfClass_doc

◆ ToNameOfType_doc

◆ ToString_doc

◆ VER

Function Documentation

◆ TclDbgDump()

◆ tclmkkernel_MkObjectC_selfCreate()

◆ tclmkkernel_MkObjectC_selfDelete()

◆ tclmkkernel_MkObjectC_selfUnlink()

◆ tclmkkernel_pMkObjectC_Init()

◆ tclmkkernel_sUnknownAllMethods()

◆ tclmkkernel_UnknownSetup()

Variable Documentation

◆ MkObjectCTT

◆ OT_CLASS

◆ tclmkkernel_MkObjectC_MK_NULL

◆ tclmkkernel_sInstanceDef

◆ tclmkkernel_sOtClassDef