theSq3Lite 10.0
Loading...
Searching...
No Matches
LibSq3Lite_cs.c
Go to the documentation of this file.
1
9/* LABEL-START */
10/* LABEL-END */
11
12#include "LibSq3Lite_cs.h"
13
16 Sq3CsTypeLookupE const typeL,
17 MkSelfCreateF const selfCTOR,
18 MkSelfUnlinkF const selfUnlink
19) {
21 MK_TYP type = NULL;
22 switch (typeL) {
23 // BEGIN-CLS - created by 'cs_PreMeta.tcl -i NHI1_HOME/theSq3Lite/c/gen/c_sq3lite.meta' - DO NOT change
24
25 case SQ3_CS_TYPE_LOOKUP_VAL : type = Sq3ValueC_TT ; break;
26 case SQ3_CS_TYPE_LOOKUP_STMT : type = Sq3StmtC_TT ; break;
27 case SQ3_CS_TYPE_LOOKUP_BLOB : type = Sq3BlobC_TT ; break;
28 case SQ3_CS_TYPE_LOOKUP_FILE : type = Sq3FileC_TT ; break;
29 case SQ3_CS_TYPE_LOOKUP_LITE : type = Sq3LiteC_TT ; break;
30
31 // END-CLS - created by 'cs_PreMeta.tcl -i NHI1_HOME/theSq3Lite/c/gen/c_sq3lite.meta' - DO NOT change
32 default: MkPanicV_1("get invalid type enum '%d' not part of 'Sq3CsTypeLookupE'", typeL);
33 }
34 assert(type != NULL);
35 type->selfCreate = selfCTOR;
36 type->selfUnlink = selfUnlink;
37}
void Sq3CsTypeUpdate_RT(MK_RT mkrt, Sq3CsTypeLookupE const typeL, MkSelfCreateF const selfCTOR, MkSelfUnlinkF const selfUnlink)
#define MkPanicV_1(printfmt,...)
void(* MkSelfUnlinkF)(MK_RT mkrt, MK_PTR self, MK_PTR const env)
MK_PTR(* MkSelfCreateF)(MK_RT mkrt, MK_OBJ const obj, MK_PTR const env)
#define MkRtSetup_NULL_RT
#define MK_RT_ARGS
__thread MK_TYP Sq3BlobC_TT
class as MkTypeDefS-class-type …
__thread MK_TYP Sq3FileC_TT
class as MkTypeDefS-class-type …
__thread MK_TYP Sq3LiteC_TT
class as MkTypeDefS-class-type …
__thread MK_TYP Sq3StmtC_TT
class as MkTypeDefS-class-type …
__thread MK_TYP Sq3ValueC_TT
class as MkTypeDefS-class-type …
MkSelfUnlinkF selfUnlink
MkSelfCreateF selfCreate