MkRuntimeC_atl.c File Reference

tag: nhi1-release-250425 More...

#include "LibMkKernel_private_atl.h"

Include dependency graph for MkRuntimeC_atl.c:

Go to the source code of this file.

Macros
#define	META_FILE_NAME   "MkRuntimeC_atl.c"
#define	OT_CLASS   amkrt->AtlMkRuntimeC
#define	OT_NULL   amkrt->AtlMkRuntimeC_MK_NULL
#define	OT_CLASS_NAME   "MkRuntimeC"
#define	SELF2HDL(O)
#define	OT_SETUP_hdl   SetupHdlFromMetaData_2(MK_RT)
#define	OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(MK_RT)
#define	OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(MK_RT)
#define	OT_SETUP_hdl_constr   SetupHdlConstr(MkRuntimeC)
#define	OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static
#define	OT_SETUP_hdl_static   SetupHdlStatic(MkRuntimeC)
#define	OT_retObj_CONSTR(x)
#define	ClassInit
#define	DebugGet_doc   "int32 [MkRuntimeC::DebugGet]"
#define	DebugSet_doc   "MkRuntimeC::DebugSet dbg:int32"
#define	ErrorGetCode_doc   "MkErrorE [MkRuntimeC::ErrorGetCode]"
#define	IsSilentGet_doc   "bool [MkRuntimeC::IsSilentGet]"
#define	IsSilentSet_doc   "MkRuntimeC::IsSilentSet silent:bool"
#define	Log0_doc   "MkRuntimeC::Log0 ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"
#define	LogTargetGet_doc   "string [MkRuntimeC::LogTargetGet]"
#define	LogTargetReset_doc   "MkRuntimeC::LogTargetReset"
#define	LogTargetSet_doc   "MkRuntimeC::LogTargetSet logTgt:string"
#define	NoDecoSet_doc   "MkRuntimeC::NoDecoSet noDeco:bool"

Functions
static MK_PTR	atlmkkernel_MkRuntimeC_selfCreate (MK_RT mkrt, MK_OBJ const obj, MK_PTR const env)
static void	atlmkkernel_MkRuntimeC_selfDelete (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
static void	atlmkkernel_MkRuntimeC_selfUnlink (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
static OT_ProcRet	atlmkkernel_MkRuntimeC_DebugGet (OtClass_ARGS)
	Atl: (static) int32 [MkRuntimeC::DebugGet] → C-API get the MkRuntimeS::debug value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_DebugSet (OtClass_ARGS)
	Atl: (static) MkRuntimeC::DebugSet dbg:int32 → C-API set the MkRuntimeS::debug value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_ErrorGetCode (OtClass_ARGS)
	Atl: (static) MkErrorE [MkRuntimeC::ErrorGetCode] → C-API return MkErrorS::code from a given MkRuntimeC …
static OT_ProcRet	atlmkkernel_MkRuntimeC_IsSilentGet (OtClass_ARGS)
	Atl: (static) bool [MkRuntimeC::IsSilentGet] → C-API get the MkRuntimeS::isSilent value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_IsSilentSet (OtClass_ARGS)
	Atl: (static) MkRuntimeC::IsSilentSet silent:bool → C-API set the MkRuntimeS::isSilent value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_LogTargetGet (OtClass_ARGS)
	Atl: (static) string [MkRuntimeC::LogTargetGet] → C-API get the MkLogDataS::logNAME value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_LogTargetReset (OtClass_ARGS)
	Atl: (static) MkRuntimeC::LogTargetReset → C-API set the MkRuntimeS::log value to the DEFAULT value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_LogTargetSet (OtClass_ARGS)
	Atl: (static) MkRuntimeC::LogTargetSet logTgt:string → C-API set the MkRuntimeS::log value and cleanup old value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_NoDecoSet (OtClass_ARGS)
	Atl: (static) MkRuntimeC::NoDecoSet noDeco:bool → C-API set the MkRuntimeS::noDeco value …
static OT_ProcRet	atlmkkernel_MkRuntimeC_Log0 (OtClass_ARGS)
	Atl: (static) MkRuntimeC::Log0 ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API log the MkRuntimeC …
int	atlmkkernel_pMkRuntimeC_Init (OT_MK_ARGS OT_NS_T ns)

Variables
static const OtObjProcDefS	atlmkkernel_sOtClassDef []
static const OtObjProcDefS	atlmkkernel_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 MkRuntimeC_atl.c.

Macro Definition Documentation

ClassInit

#define ClassInit

Definition at line 57 of file MkRuntimeC_atl.c.

#define   ClassInit \
  /* if not already done, initialize NEW META type */ \
  if (MkRuntimeCTT == NULL) MkRuntimeCTT = MkRuntimeSTT; \
 \
  /* protect against double call */ \
  if (MkRuntimeCTT->selfCreate == NS(MkRuntimeC_selfCreate)) return MK_OK; \
 \
  /* add "selfCreate" and "selfDelete" feature to the META-Class */ \
  MkRuntimeCTT->selfCreate    = NS(MkRuntimeC_selfCreate); \
  MkRuntimeCTT->selfDelete    = NS(MkRuntimeC_selfDelete); \
  MkRuntimeCTT->selfUnlink    = NS(MkRuntimeC_selfUnlink); \
 \
  /* create the ATL-class */ \
  OT_CLASS = AltClassDef(MkRuntimeCTT,&amkrt->AtlMkRuntimeC_NS); \
    if (OT_CLASS == NULL) goto error; \
    OT_REF_INCR(OT_CLASS); \
 \
  /* create the ATL static Methods */ \
  check_LNG(AtlUnknownSetup (NS(sOtClassDef),amkrt)) goto error; \
 \
  /* create the ATL instance Methods */ \
  check_LNG(AtlUnknownSetup (NS(sInstanceDef),amkrt)) goto error; \
 \
  /* after class was modified, recompile the class */ \
  RL_init(2, recompile, RL_T(0,RecompileN)); RL_O(1,OT_CLASS) ; \
    int retI = RL_EvalEx(0); \
      if (retI != TCL_OK) return retI; \
 \
  /* define the "NULL" object */ \
  OT_NULL = AtomCreateNULL(OT_CLASS, "::MkRuntimeC::MK_NULL", (MK_PTR)amkrt); \
    if (OT_NULL == NULL) goto error; \
    OT_REF_INCR(OT_NULL);

DebugGet_doc

#define DebugGet_doc   "int32 [MkRuntimeC::DebugGet]"

Definition at line 94 of file MkRuntimeC_atl.c.

DebugSet_doc

#define DebugSet_doc   "MkRuntimeC::DebugSet dbg:int32"

Definition at line 95 of file MkRuntimeC_atl.c.

ErrorGetCode_doc

#define ErrorGetCode_doc   "MkErrorE [MkRuntimeC::ErrorGetCode]"

Definition at line 96 of file MkRuntimeC_atl.c.

IsSilentGet_doc

#define IsSilentGet_doc   "bool [MkRuntimeC::IsSilentGet]"

Definition at line 97 of file MkRuntimeC_atl.c.

IsSilentSet_doc

#define IsSilentSet_doc   "MkRuntimeC::IsSilentSet silent:bool"

Definition at line 98 of file MkRuntimeC_atl.c.

Log0_doc

#define Log0_doc   "MkRuntimeC::Log0 ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 99 of file MkRuntimeC_atl.c.

LogTargetGet_doc

#define LogTargetGet_doc   "string [MkRuntimeC::LogTargetGet]"

Definition at line 100 of file MkRuntimeC_atl.c.

LogTargetReset_doc

#define LogTargetReset_doc   "MkRuntimeC::LogTargetReset"

Definition at line 101 of file MkRuntimeC_atl.c.

LogTargetSet_doc

#define LogTargetSet_doc   "MkRuntimeC::LogTargetSet logTgt:string"

Definition at line 102 of file MkRuntimeC_atl.c.

META_FILE_NAME

#define META_FILE_NAME   "MkRuntimeC_atl.c"

Definition at line 11 of file MkRuntimeC_atl.c.

NoDecoSet_doc

#define NoDecoSet_doc   "MkRuntimeC::NoDecoSet noDeco:bool"

Definition at line 103 of file MkRuntimeC_atl.c.

OT_CLASS

#define OT_CLASS   amkrt->AtlMkRuntimeC

Definition at line 15 of file MkRuntimeC_atl.c.

OT_CLASS_NAME

#define OT_CLASS_NAME   "MkRuntimeC"

Definition at line 17 of file MkRuntimeC_atl.c.

OT_NULL

#define OT_NULL   amkrt->AtlMkRuntimeC_MK_NULL

Definition at line 16 of file MkRuntimeC_atl.c.

OT_retObj_CONSTR

#define OT_retObj_CONSTR

(

x

)

Value:

OT_retObj_SET(AtomInit(OT_SELF,MkRuntimeC_X2obj(x),amkrt))

Definition at line 54 of file MkRuntimeC_atl.c.

OT_SETUP_hdl

#define OT_SETUP_hdl   SetupHdlFromMetaData_2(MK_RT)

Definition at line 47 of file MkRuntimeC_atl.c.

OT_SETUP_hdl__null_allow

#define OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(MK_RT)

Definition at line 48 of file MkRuntimeC_atl.c.

OT_SETUP_hdl_constr

#define OT_SETUP_hdl_constr   SetupHdlConstr(MkRuntimeC)

Definition at line 50 of file MkRuntimeC_atl.c.

OT_SETUP_hdl_destr

#define OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(MK_RT)

Definition at line 49 of file MkRuntimeC_atl.c.

OT_SETUP_hdl_static

#define OT_SETUP_hdl_static   SetupHdlStatic(MkRuntimeC)

Definition at line 52 of file MkRuntimeC_atl.c.

OT_SETUP_hdl_static_constr

#define OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static

Definition at line 51 of file MkRuntimeC_atl.c.

SELF2HDL

#define SELF2HDL

(

O

)

Value:

MkRt(VAL2MNG(O))

Definition at line 19 of file MkRuntimeC_atl.c.

Function Documentation

atlmkkernel_MkRuntimeC_selfCreate()

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

static

Definition at line 28 of file MkRuntimeC_atl.c.

                                                                                        {
  SETUP_amkrt(env);
  return AtomMake(obj,OT_CLASS,NULL,NULL,env);
}

atlmkkernel_MkRuntimeC_selfDelete()

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

static

Definition at line 34 of file MkRuntimeC_atl.c.

                                                                                  {
  OT_SELF_T selfO = selfP;
  SETUP_amkrt(env);
  MK(AtomDeleteHard) (OT_MK_CALL selfO);
}

atlmkkernel_MkRuntimeC_selfUnlink()

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

static

Definition at line 41 of file MkRuntimeC_atl.c.

                                                                                  {
  OT_SELF_T selfO = selfP;
  SETUP_amkrt(env);
  return MK(AtomUnlink) (OT_MK_CALL selfO);
}

atlmkkernel_pMkRuntimeC_Init()

int atlmkkernel_pMkRuntimeC_Init

(

OT_MK_ARGS OT_NS_T

ns

)

TCL API Public API

Definition at line 341 of file MkRuntimeC_atl.c.

{
  ClassInit
 
  return TCL_OK;
error:
  return TCL_ERROR;
}

Variable Documentation

atlmkkernel_sInstanceDef

const OtObjProcDefS atlmkkernel_sInstanceDef[]

static

Initial value:

= {
  
 
  
 
  
  { NULL }
}

Definition at line 320 of file MkRuntimeC_atl.c.

                                                {
  // BEGIN-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
  // → no data
 
  // END-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
  { NULL }
};

atlmkkernel_sOtClassDef

const OtObjProcDefS atlmkkernel_sOtClassDef[]

static

Initial value:

= {
  
 
  
  { "::MkRuntimeC::DebugGet"       ,  atlmkkernel_MkRuntimeC_DebugGet },
  { "::MkRuntimeC::DebugSet"       ,  atlmkkernel_MkRuntimeC_DebugSet },
  { "::MkRuntimeC::ErrorGetCode"   ,  atlmkkernel_MkRuntimeC_ErrorGetCode },
  { "::MkRuntimeC::IsSilentGet"    ,  atlmkkernel_MkRuntimeC_IsSilentGet },
  { "::MkRuntimeC::IsSilentSet"    ,  atlmkkernel_MkRuntimeC_IsSilentSet },
  { "::MkRuntimeC::Log0"           ,  atlmkkernel_MkRuntimeC_Log0 },
  { "::MkRuntimeC::LogTargetGet"   ,  atlmkkernel_MkRuntimeC_LogTargetGet },
  { "::MkRuntimeC::LogTargetReset" ,  atlmkkernel_MkRuntimeC_LogTargetReset },
  { "::MkRuntimeC::LogTargetSet"   ,  atlmkkernel_MkRuntimeC_LogTargetSet },
  { "::MkRuntimeC::NoDecoSet"      ,  atlmkkernel_MkRuntimeC_NoDecoSet },
 
  
  { NULL }
}

METHOD API

Definition at line 299 of file MkRuntimeC_atl.c.

                                               {
  // BEGIN-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
  // doc-key: MkRuntimeC,MkRuntime,sm_
  { "::MkRuntimeC::DebugGet"       , NS(MkRuntimeC_DebugGet)       },
  { "::MkRuntimeC::DebugSet"       , NS(MkRuntimeC_DebugSet)       },
  { "::MkRuntimeC::ErrorGetCode"   , NS(MkRuntimeC_ErrorGetCode)   },
  { "::MkRuntimeC::IsSilentGet"    , NS(MkRuntimeC_IsSilentGet)    },
  { "::MkRuntimeC::IsSilentSet"    , NS(MkRuntimeC_IsSilentSet)    },
  { "::MkRuntimeC::Log0"           , NS(MkRuntimeC_Log0)           },
  { "::MkRuntimeC::LogTargetGet"   , NS(MkRuntimeC_LogTargetGet)   },
  { "::MkRuntimeC::LogTargetReset" , NS(MkRuntimeC_LogTargetReset) },
  { "::MkRuntimeC::LogTargetSet"   , NS(MkRuntimeC_LogTargetSet)   },
  { "::MkRuntimeC::NoDecoSet"      , NS(MkRuntimeC_NoDecoSet)      },
 
  // END-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
  { NULL }
};