LibMkKernel_cs.c

Go to the documentation of this file.

 
/* LABEL-START */
 
#define META_FILE_NAME "LibMkKernel_cs.c"
 
/* LABEL-END */
 
#include "LibMkKernel_cs.h"
 
void MkCsTypeUpdate_RT (
  MK_RT_ARGS
  MkCsTypeLookupE const typeL, 
  MkSelfCreateF   const selfCTOR, 
  MkSelfUnlinkF   const selfUnlink
) {
  MK_STATIC_RT;
  MK_TYP type = NULL;
  switch (typeL) {
    // BEGIN-CLS - created by 'cs_PreMeta.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
    case MK_CS_TYPE_LOOKUP_OBJ   :  type = MkObjectC_TT       ; break;
    case MK_CS_TYPE_LOOKUP_BUF   :  type = MkBufferC_TT       ; break;
    case MK_CS_TYPE_LOOKUP_BUS   :  type = MkBufferStreamC_TT ; break;
    case MK_CS_TYPE_LOOKUP_BFL   :  type = MkBufferListC_TT   ; break;
    case MK_CS_TYPE_LOOKUP_LFL   :  type = MkLogFileC_TT      ; break;
    case MK_CS_TYPE_LOOKUP_ERR   :  type = MkErrorC_TT        ; break;
    case MK_CS_TYPE_LOOKUP_RT    :  type = MkRuntimeC_TT      ; break;
 
    // END-CLS - created by 'cs_PreMeta.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
  }
  if (type == NULL) {
    MkPanicC_1("get invalid type enum '%d' not part of 'MkCsTypeLookupE'");
  }
  type->selfCreate = selfCTOR;
  type->selfUnlink = selfUnlink;
}