theKernel 10.0
Loading...
Searching...
No Matches
MkBufferC_tcl.c
Go to the documentation of this file.
1
9/* LABEL-START */
10
11#define META_FILE_NAME "MkBufferC_tcl.c"
12
14
15#define OT_CLASS NS(MkBufferC)
16#define OT_CLASS_NAME "MkBufferC"
17
18#define OBJECT2BUF(O) MkAssertCastM(MkBufferC,(Tcl_ObjectGetMetadata(O, &MK(AtomMeta))))
19
20// TCL class
22
23// META class
25MkThreadLocal OT_OBJ_T MK(MkBufferC_MK_NULL) = NULL;
26
27// META: ObjNew feature: selfCreate will be called from "ObjNew->MkSelfNew" if MkObj need a SELF pointer
28static MK_PTR NS(MkBufferC_selfCreate) (MK_RT_ARGS MK_OBJ const obj, MK_PTR const env) {
29 OT_ENV_T interp = env;
30 return MK(AtomCreate) (MK_RT_CALL interp,obj,OT_CLASS,NULL,NULL);
31}
32// META: is called when the META object is destroyed and SELF does NOT belongs to the META.
33static void NS(MkBufferC_selfDelete) (MK_RT_ARGS MK_PTR selfP, MK_PTR const env) {
34 OT_SELF_T selfO = selfP;
35 OT_ENV_T interp = env;
36 MK(AtomDeleteHard) (MK_RT_CALL interp, selfO);
37}
38// META: is called when the META object is destroyed and SELF does NOT belong to the META.
39static void NS(MkBufferC_selfUnlink) (MK_RT_ARGS MK_PTR selfP, MK_PTR const env) {
40 OT_SELF_T selfO = selfP;
41 OT_ENV_T interp = env;
42 MK(AtomUnlink) (MK_RT_CALL interp, selfO);
43}
44
45// ATTENTION: TCL has no "Unlink" because the "Tcl_ObjectSetMetadata(selfO,&MK(AtomMeta),NULL);" call
46// also the destructor
47
48#define OT_SETUP_hdl_static_constr_pre
49#define OT_SETUP_hdl_static_constr \
50 OT_SETUP_hdl_static_constr_pre; \
51 OT_SETUP_hdl_static
52
53#define OT_SETUP_hdl_static \
54 int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
55 AllRtSetup_NULL; \
56 __attribute__((unused)) OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
57 __attribute__((unused)) MK_TYP hdl = MkBufferC##_TT;
58
59#define OT_SETUP_hdl SetupHdlFromMetaData_2(BUF,MK_BUF);
60#define OT_SETUP_hdl__null_allow SetupHdlFromMetaData__null_allow_2(BUF,MK_BUF);
61#define OT_SETUP_hdl_destr SetupHdlFromMetaData__null_allow_2(BUF,MK_BUF);
62
63#define OT_SETUP_hdl_constr_pre
64#define OT_SETUP_hdl_constr \
65 OT_SETUP_hdl_constr_pre; \
66 int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
67 AllRtSetup_NULL; \
68 MK_RT_UNUSED OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
69 MK_BUF hdl = (MK_BUF) &MkERROR;
70
71#if !defined(SetupRtFromHdl_XN)
72 #define SetupRtFromHdl_XN(hdl) AllRtSetup_XN(hdl)
73 #define SetupRtFromHdl_X(hdl) AllRtSetup_X(hdl)
74#endif
75
76// initialize the TCL and MO class specific object
77#define ClassInit \
78 /* if not already done, initialize NEW MQ type */ \
79 if (MkBufferCTT == NULL) MkBufferCTT = MkBufferSTT; \
80 \
81 /* protect against double call */ \
82 if (MkBufferCTT->selfCreate == NS(MkBufferC_selfCreate)) return MK_OK; \
83 \
84 /* add "selfCreate" and "selfDelete" feature to the MQ-Class */ \
85 MkBufferCTT->selfCreate = NS(MkBufferC_selfCreate); \
86 MkBufferCTT->selfDelete = NS(MkBufferC_selfDelete); \
87 MkBufferCTT->selfUnlink = NS(MkBufferC_selfUnlink); \
88 \
89 /* create the TCL-class */ \
90 OT_SELF_T classO = MK(ClassDef)(interp,ns,MkBufferCTT); \
91 check_NULL(classO) goto error; \
92 OT_CLASS = Tcl_GetObjectAsClass(classO); \
93 \
94 /* create the TCL static Methods */ \
95 static MkThreadLocal OtUnknownS NS(sClassUnknown) = {OT_UNKNOWN_CLASS}; \
96 check_LNG(MK(UnknownSetup) (interp,classO,NS(sOtClassDef),&NS(sClassUnknown))) goto error; \
97 \
98 /* create the TCL instance Methods */ \
99 static MkThreadLocal OtUnknownS NS(sInstanceUnknown) = {OT_UNKNOWN_INSTANCE}; \
100 check_LNG(MK(UnknownSetup) (interp,classO,NS(sInstanceDef),&NS(sInstanceUnknown))) goto error; \
101 \
102 /* define the "NULL" object */ \
103 MK(MkBufferC_MK_NULL) = Tcl_GetObjectName(interp, \
104 MK(AtomCreate) (MK_RT_CALL interp, NULL /*obj*/, OT_CLASS, "MK_NULL" /*name*/, "::tclmkkernel::MkBufferC" /*ns*/) \
105 ); \
106 Tcl_IncrRefCount(MK(MkBufferC_MK_NULL));
107
108#define VER TCL_OO_METHOD_VERSION_CURRENT
109
110/* LABEL-END */
111
112// BEGIN-DOC - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
113
114// doc-key: MkBufferC,MkBuffer,sCc,func
115#define CTOR_doc "MkBufferC [MkBufferC CTOR ?size:int32=0?]"
116#define Create_doc "MkBufferC [MkBufferC Create ?size:int32=0?]"
117#define Create1024_doc "MkBufferC [MkBufferC Create1024 ?size:int32=0?]"
118#define Create256_doc "MkBufferC [MkBufferC Create256 ?size:int32=0?]"
119#define Create64_doc "MkBufferC [MkBufferC Create64 ?size:int32=0?]"
120#define CreateBIN_doc "MkBufferC [MkBufferC CreateBIN val:binary]"
121#define CreateBOL_doc "MkBufferC [MkBufferC CreateBOL val:bool]"
122#define CreateBUF_doc "MkBufferC [MkBufferC CreateBUF val:MkBufferC]"
123#define CreateDBL_doc "MkBufferC [MkBufferC CreateDBL val:double]"
124#define CreateFLT_doc "MkBufferC [MkBufferC CreateFLT val:float]"
125#define CreateI16_doc "MkBufferC [MkBufferC CreateI16 val:int16]"
126#define CreateI32_doc "MkBufferC [MkBufferC CreateI32 val:int32]"
127#define CreateI64_doc "MkBufferC [MkBufferC CreateI64 val:int64]"
128#define CreateI8_doc "MkBufferC [MkBufferC CreateI8 val:int8]"
129#define CreateSTR_doc "MkBufferC [MkBufferC CreateSTR val:string]"
130
131// doc-key: MkBufferC,MkBuffer,sc_,func
132#define CreateTLS_doc "MkBufferC [MkBufferC CreateTLS tlsName:string ?resetB:bool=true?]"
133#define GetNull_doc "MkBufferC [MkBufferC GetNull]"
134#define HandleResolve_doc "MkBufferC [MkBufferC HandleResolve netHdl:MK_HDL]"
135#define Instances_doc "MkBufferC [MkBufferC Instances]"
136
137// doc-key: MkBufferC,MkBuffer,oC_,func
138#define Merge_doc "MkBufferC [$buf Merge]"
139
140// doc-key: MkBufferC,MkBuffer,oCx,func
141#define Dup_doc "MkBufferC [$buf Dup] (const)"
142
143// doc-key: MkBufferC,MkBuffer,oc_,func
144#define AppendC_doc "MkBufferC [$buf AppendC val:string]"
145#define AppendStringR_doc "MkBufferC [$buf AppendStringR val:string]"
146#define Copy_doc "MkBufferC [$buf Copy srce:MkBufferC] (const)"
147#define Next_doc "MkBufferC [$buf Next]"
148#define Prev_doc "MkBufferC [$buf Prev]"
149#define Reset_doc "MkBufferC [$buf Reset]"
150#define SetBIN_doc "MkBufferC [$buf SetBIN val:binary]"
151#define SetBOL_doc "MkBufferC [$buf SetBOL val:bool]"
152#define SetBUF_doc "MkBufferC [$buf SetBUF val:MkBufferC]"
153#define SetBinaryR_doc "MkBufferC [$buf SetBinaryR val:binary]"
154#define SetDBL_doc "MkBufferC [$buf SetDBL val:double]"
155#define SetFLT_doc "MkBufferC [$buf SetFLT val:float]"
156#define SetI16_doc "MkBufferC [$buf SetI16 val:int16]"
157#define SetI32_doc "MkBufferC [$buf SetI32 val:int32]"
158#define SetI64_doc "MkBufferC [$buf SetI64 val:int64]"
159#define SetI8_doc "MkBufferC [$buf SetI8 val:int8]"
160#define SetSTR_doc "MkBufferC [$buf SetSTR val:string]"
161#define SetStringR_doc "MkBufferC [$buf SetStringR val:string]"
162#define SizeAdd_doc "MkBufferC [$buf SizeAdd size:int32]"
163#define SizeNew_doc "MkBufferC [$buf SizeNew size:int32]"
164#define Temp_doc "MkBufferC [$buf Temp] (const)"
165
166// doc-key: MkBufferC,MkBuffer,oci,func
167#define GetBFL_doc "MkBufferListC [$buf GetBFL ?val_inout:MkBufferListC=\"MK_NULL\"?] (const)"
168
169// doc-key: MkBufferC,MkBuffer,oco,func
170#define GetBUF_doc "MkBufferC [$buf GetBUF]"
171
172// doc-key: MkBufferC,MkBuffer,om_,func
173#define CastTo_doc "$buf CastTo typ:MkTypeE"
174#define Cmp_doc "int32 [$buf1 Cmp buf2:MkBufferC] (const)"
175#define GetType1_doc "string[1] [$buf GetType1] (const)"
176#define GetType2_doc "MkTypeE [$buf GetType2] (const)"
177#define GetType3_doc "string [$buf GetType3] (const)"
178// skip class-overload: HandleGet → MkObjectHandleGet
179#define IsLocal_doc "bool [$buf IsLocal] (const)"
180// skip class-overload: Log → MkObjectLog
181#define LogS_doc "$buf LogS ?varname:string=\"buf\"? ?fmtobj:MkObjectC=\"MK_NULL\"? ?callfunc:string=\"MK_NULL\"? (const)"
182#define Pop_doc "int32 [$buf Pop val:string]"
183#define Push_doc "int32 [$buf Push val:string]"
184#define ResetFull_doc "$buf ResetFull"
185// skip class-overload: ToString → MkObjectToString
186
187// doc-key: MkBufferC,MkBuffer,omo,func
188#define GetBIN_doc "binary [$buf GetBIN] (const)"
189#define GetBOL_doc "bool [$buf GetBOL] (const)"
190#define GetDBL_doc "double [$buf GetDBL] (const)"
191#define GetFLT_doc "float [$buf GetFLT] (const)"
192#define GetI16_doc "int16 [$buf GetI16] (const)"
193#define GetI32_doc "int32 [$buf GetI32] (const)"
194#define GetI64_doc "int64 [$buf GetI64] (const)"
195#define GetI8_doc "int8 [$buf GetI8] (const)"
196#define GetSTR_doc "string [$buf GetSTR] (const)"
197#define GetStringR_doc "string [$buf GetStringR] (const)"
198#define ToObject_doc "obj [$buf ToObject]"
199
200// END-DOC - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
201
202/*****************************************************************************/
203/* */
204/* O B J E C T */
205/* */
206/*****************************************************************************/
207
212
213// BEGIN-MkBufferC - created by 'tcl_MqC.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
214
218
219// doc-key: MkBufferC,MkBufferC-Access,oc_
220
222static OT_ProcRet NS(MkBufferC_AppendC) (MkBufferC_ARGS) {
225 MK_STRN val = 0;
228 MK_BUF retVal = MkBufferAppendC (hdl, val);
229 OT_retObj_SET_BUF(retVal);
230 goto end;
231 error:
233 end:
235}
236
238static OT_ProcRet NS(MkBufferC_AppendStringR) (MkBufferC_ARGS) {
241 MkStringR val = {0};
244 MK_BUF retVal = MkBufferAppendStringR (hdl, val);
245 OT_retObj_SET_BUF(retVal);
246 goto end;
247 error:
249 end:
251}
252
253// doc-key: MkBufferC,MkBufferC-Access,om_
254
256static OT_ProcRet NS(MkBufferC_Pop) (MkBufferC_ARGS) {
259 MK_STRN val = 0;
262 OT_retObj_SET_I32(MkBufferPop (hdl, val));
263 goto end;
264 error:
266 end:
268}
269
271static OT_ProcRet NS(MkBufferC_Push) (MkBufferC_ARGS) {
274 MK_STRN val = 0;
278 goto end;
279 error:
281 end:
283}
284
285// doc-key: MkBufferC,MkBufferC-Access,omo
286
288OT_ProcRet NS(MkBufferC_ToObject) (MkBufferC_ARGS) ; // skip template-required
289
291// MkBufferC_Access_TCL_API
292
296
297// doc-key: MkBufferC,MkBufferC-Class-Export,sc_
298
300static OT_ProcRet NS(MkBufferC_HandleResolve) (OtClass_ARGS) {
303 MK_HDL netHdl = 0;
306 MK_BUF retVal = MkBufferHandleResolve (netHdl);
307 OT_retObj_SET_BUF(retVal);
308 goto end;
309 error:
311 end:
313}
314
315// doc-key: MkBufferC,MkBufferC-Class-Export,om_
316
317// skip on class-overload: MkBufferHandleGet → MkObjectHandleGet
319static OT_ProcRet NS(MkBufferC_HandleGet) (MkBufferC_ARGS) {OT_ERROR_LNG_RETURN;}
320
322// MkBufferC_Class_TCL_API
323
327
328// doc-key: MkBufferC,MkBufferC-Class-Introspection,oc_
329
331static OT_ProcRet NS(MkBufferC_Next) (MkBufferC_ARGS) {
335 MK_BUF retVal = MkBufferNext (hdl);
336 OT_retObj_SET_BUF(retVal);
337 goto end;
338 error:
340 end:
342}
343
345static OT_ProcRet NS(MkBufferC_Prev) (MkBufferC_ARGS) {
349 MK_BUF retVal = MkBufferPrev (hdl);
350 OT_retObj_SET_BUF(retVal);
351 goto end;
352 error:
354 end:
356}
357
358// doc-key: MkBufferC,MkBufferC-Class-Introspection,sc_
359
361static OT_ProcRet NS(MkBufferC_Instances) (OtClass_ARGS) {
365 MK_BUF retVal = MkBufferInstances ();
366 OT_retObj_SET_BUF(retVal);
367 goto end;
368 error:
370 end:
372}
373
375// MkBufferC_Class_TCL_API
376
380
381// doc-key: MkBufferC,MkBufferC-Class-Misc,sc_
382
384static OT_ProcRet NS(MkBufferC_GetNull) (OtClass_ARGS) {
388 MK_BUF retVal = MkBufferGetNull ();
389 OT_retObj_SET_BUF(retVal);
390 goto end;
391 error:
393 end:
395}
396
398// MkBufferC_Class_TCL_API
399
403
404// doc-key: MkBufferC,MkBufferC-Get,oci
405
407OT_ProcRet NS(MkBufferC_GetBFL) (MkBufferC_ARGS) {
410 MkBufferListCreateTLS_T(val_inout,10);
413 MkErrorC_Check(hdl,MkBufferGetBFL (hdl, &val_inout));
414 OT_retObj_SET_BFL(val_inout);
415 goto end;
416 error:
418 end:
420}
421
422// doc-key: MkBufferC,MkBufferC-Get,oco
423
425static OT_ProcRet NS(MkBufferC_GetBUF) (MkBufferC_ARGS) {
429 MK_BUF val_out;
430 MkErrorC_Check(hdl,MkBufferGetBUF (hdl, &val_out));
431 OT_retObj_SET_BUF(val_out);
432 goto end;
433 error:
435 end:
437}
438
439// doc-key: MkBufferC,MkBufferC-Get,omo
440
442static OT_ProcRet NS(MkBufferC_GetBIN) (MkBufferC_ARGS) {
446 MkBinaryR val_out;
447 MkErrorC_Check(hdl,MkBufferGetBIN (hdl, &val_out));
448 MkBinaryR retVal = val_out;
450 goto end;
451 error:
453 end:
455}
456
458static OT_ProcRet NS(MkBufferC_GetBOL) (MkBufferC_ARGS) {
462 MK_BOL val_out;
463 MkErrorC_Check(hdl,MkBufferGetBOL (hdl, &val_out));
464 OT_retObj_SET_BOL(val_out == 1);
465 goto end;
466 error:
468 end:
470}
471
473static OT_ProcRet NS(MkBufferC_GetDBL) (MkBufferC_ARGS) {
477 MK_DBL val_out;
478 MkErrorC_Check(hdl,MkBufferGetDBL (hdl, &val_out));
479 OT_retObj_SET_DBL(val_out);
480 goto end;
481 error:
483 end:
485}
486
488static OT_ProcRet NS(MkBufferC_GetFLT) (MkBufferC_ARGS) {
492 MK_FLT val_out;
493 MkErrorC_Check(hdl,MkBufferGetFLT (hdl, &val_out));
494 OT_retObj_SET_FLT(val_out);
495 goto end;
496 error:
498 end:
500}
501
503static OT_ProcRet NS(MkBufferC_GetI16) (MkBufferC_ARGS) {
507 MK_I16 val_out;
508 MkErrorC_Check(hdl,MkBufferGetI16 (hdl, &val_out));
509 OT_retObj_SET_I16(val_out);
510 goto end;
511 error:
513 end:
515}
516
518static OT_ProcRet NS(MkBufferC_GetI32) (MkBufferC_ARGS) {
522 MK_I32 val_out;
523 MkErrorC_Check(hdl,MkBufferGetI32 (hdl, &val_out));
524 OT_retObj_SET_I32(val_out);
525 goto end;
526 error:
528 end:
530}
531
533static OT_ProcRet NS(MkBufferC_GetI64) (MkBufferC_ARGS) {
537 MK_I64 val_out;
538 MkErrorC_Check(hdl,MkBufferGetI64 (hdl, &val_out));
539 OT_retObj_SET_I64(val_out);
540 goto end;
541 error:
543 end:
545}
546
548static OT_ProcRet NS(MkBufferC_GetI8) (MkBufferC_ARGS) {
552 MK_I8 val_out;
553 MkErrorC_Check(hdl,MkBufferGetI8 (hdl, &val_out));
554 OT_retObj_SET_I8(val_out);
555 goto end;
556 error:
558 end:
560}
561
563static OT_ProcRet NS(MkBufferC_GetSTR) (MkBufferC_ARGS) {
567 MK_STRN val_out;
568 MkErrorC_Check(hdl,MkBufferGetSTR (hdl, &val_out));
569 OT_retObj_SET_STR(val_out);
570 goto end;
571 error:
573 end:
575}
576
578static OT_ProcRet NS(MkBufferC_GetStringR) (MkBufferC_ARGS) {
582 MkStringR val_out;
583 MkErrorC_Check(hdl,MkBufferGetStringR (hdl, &val_out));
584 MkStringR retVal = val_out;
586 goto end;
587 error:
589 end:
591}
592
594// MkBufferC_Get_TCL_API
595
599
600// doc-key: MkBufferC,MkBufferC-Info,om_
601
603static OT_ProcRet NS(MkBufferC_GetType1) (MkBufferC_ARGS) {
607 char ret_str[2] = {MkBufferGetType1 (hdl), '\0'};
608 OT_retObj_SET_STR(ret_str);
609 goto end;
610 error:
612 end:
614}
615
617static OT_ProcRet NS(MkBufferC_GetType2) (MkBufferC_ARGS) {
622 goto end;
623 error:
625 end:
627}
628
630static OT_ProcRet NS(MkBufferC_GetType3) (MkBufferC_ARGS) {
635 goto end;
636 error:
638 end:
640}
641
643static OT_ProcRet NS(MkBufferC_IsLocal) (MkBufferC_ARGS) {
648 goto end;
649 error:
651 end:
653}
654
655// skip on class-overload: MkBufferLog → MkObjectLog
658
660static OT_ProcRet NS(MkBufferC_LogS) (MkBufferC_ARGS) {
663 MK_STRN varname = "buf";
665 MK_OBJN fmtobj = NULL;
667 MK_STRN callfunc = NULL;
670 if (MkSysStringIsNULL(callfunc)) {callfunc = OT_GET_CALL_PROC;}
671 MkBufferLogS (hdl, varname, fmtobj, callfunc);
673 goto end;
674 error:
676 end:
679}
680
682// MkBufferC_Info_TCL_API
683
687
688// doc-key: MkBufferC,MkBufferC-Misc,oc_
689
691static OT_ProcRet NS(MkBufferC_Copy) (MkBufferC_ARGS) {
694 MK_BUFN srce = 0;
697 MK_BUF retVal = MkBufferCopy (hdl, srce);
698 OT_retObj_SET_BUF(retVal);
699 goto end;
700 error:
702 end:
704}
705
707static OT_ProcRet NS(MkBufferC_Reset) (MkBufferC_ARGS) {
711 MK_BUF retVal = MkBufferReset (hdl);
712 OT_retObj_SET_BUF(retVal);
713 goto end;
714 error:
716 end:
718}
719
721static OT_ProcRet NS(MkBufferC_SizeAdd) (MkBufferC_ARGS) {
724 MK_NUM size = 0;
727 MK_BUF retVal = MkBufferSizeAdd (hdl, size);
728 OT_retObj_SET_BUF(retVal);
729 goto end;
730 error:
732 end:
734}
735
737static OT_ProcRet NS(MkBufferC_SizeNew) (MkBufferC_ARGS) {
740 MK_NUM size = 0;
743 MK_BUF retVal = MkBufferSizeNew (hdl, size);
744 OT_retObj_SET_BUF(retVal);
745 goto end;
746 error:
748 end:
750}
751
753OT_ProcRet NS(MkBufferC_Temp) (MkBufferC_ARGS) {
757 MK_BUF retVal = MkBufferTemp (hdl);
758 OT_retObj_SET_BUF(retVal);
759 goto end;
760 error:
762 end:
764}
765
766// doc-key: MkBufferC,MkBufferC-Misc,om_
767
769static OT_ProcRet NS(MkBufferC_CastTo) (MkBufferC_ARGS) {
772 enum MkTypeE typ = 0;
775 MkErrorC_Check(hdl,MkBufferCastTo (hdl, typ));
777 goto end;
778 error:
780 end:
782}
783
785static OT_ProcRet NS(MkBufferC_Cmp) (MkBufferC_ARGS) {
788 MK_BUFN buf2 = 0;
791 OT_retObj_SET_I32(MkBufferCmp (hdl, buf2));
792 goto end;
793 error:
795 end:
797}
798
800static OT_ProcRet NS(MkBufferC_ResetFull) (MkBufferC_ARGS) {
804 MkBufferResetFull (hdl);
806 goto end;
807 error:
809 end:
811}
812
813// skip on class-overload: MkBufferToString → MkObjectToString
815static OT_ProcRet NS(MkBufferC_ToString) (MkBufferC_ARGS) {OT_ERROR_LNG_RETURN;}
816
818// MkBufferC_Misc_TCL_API
819
823
824// doc-key: MkBufferC,MkBufferC-Set,oc_
825
827static OT_ProcRet NS(MkBufferC_SetBIN) (MkBufferC_ARGS) {
830 MkBinaryR val = {0};
833 MK_BUF retVal = MkBufferSetBIN (hdl, val);
834 OT_retObj_SET_BUF(retVal);
835 goto end;
836 error:
838 end:
840}
841
843static OT_ProcRet NS(MkBufferC_SetBOL) (MkBufferC_ARGS) {
846 MK_BOL val = 0;
849 MK_BUF retVal = MkBufferSetBOL (hdl, (MK_BOL)(val?1:0));
850 OT_retObj_SET_BUF(retVal);
851 goto end;
852 error:
854 end:
856}
857
859static OT_ProcRet NS(MkBufferC_SetBUF) (MkBufferC_ARGS) {
862 MK_BUFN val = 0;
865 MK_BUF retVal = MkBufferSetBUF (hdl, val);
866 OT_retObj_SET_BUF(retVal);
867 goto end;
868 error:
870 end:
872}
873
875static OT_ProcRet NS(MkBufferC_SetBinaryR) (MkBufferC_ARGS) {
878 MkBinaryR val = {0};
881 MK_BUF retVal = MkBufferSetBinaryR (hdl, val);
882 OT_retObj_SET_BUF(retVal);
883 goto end;
884 error:
886 end:
888}
889
891static OT_ProcRet NS(MkBufferC_SetDBL) (MkBufferC_ARGS) {
894 MK_DBL val = 0;
897 MK_BUF retVal = MkBufferSetDBL (hdl, val);
898 OT_retObj_SET_BUF(retVal);
899 goto end;
900 error:
902 end:
904}
905
907static OT_ProcRet NS(MkBufferC_SetFLT) (MkBufferC_ARGS) {
910 MK_FLT val = 0;
913 MK_BUF retVal = MkBufferSetFLT (hdl, val);
914 OT_retObj_SET_BUF(retVal);
915 goto end;
916 error:
918 end:
920}
921
923static OT_ProcRet NS(MkBufferC_SetI16) (MkBufferC_ARGS) {
926 MK_I16 val = 0;
929 MK_BUF retVal = MkBufferSetI16 (hdl, val);
930 OT_retObj_SET_BUF(retVal);
931 goto end;
932 error:
934 end:
936}
937
939static OT_ProcRet NS(MkBufferC_SetI32) (MkBufferC_ARGS) {
942 MK_I32 val = 0;
945 MK_BUF retVal = MkBufferSetI32 (hdl, val);
946 OT_retObj_SET_BUF(retVal);
947 goto end;
948 error:
950 end:
952}
953
955static OT_ProcRet NS(MkBufferC_SetI64) (MkBufferC_ARGS) {
958 MK_I64 val = 0;
961 MK_BUF retVal = MkBufferSetI64 (hdl, val);
962 OT_retObj_SET_BUF(retVal);
963 goto end;
964 error:
966 end:
968}
969
971static OT_ProcRet NS(MkBufferC_SetI8) (MkBufferC_ARGS) {
974 MK_I8 val = 0;
977 MK_BUF retVal = MkBufferSetI8 (hdl, (MK_I8)(val));
978 OT_retObj_SET_BUF(retVal);
979 goto end;
980 error:
982 end:
984}
985
987static OT_ProcRet NS(MkBufferC_SetSTR) (MkBufferC_ARGS) {
990 MK_STRN val = 0;
993 MK_BUF retVal = MkBufferSetSTR (hdl, val);
994 OT_retObj_SET_BUF(retVal);
995 goto end;
996 error:
998 end:
1000}
1001
1003static OT_ProcRet NS(MkBufferC_SetStringR) (MkBufferC_ARGS) {
1006 MkStringR val = {0};
1009 MK_BUF retVal = MkBufferSetStringR (hdl, val);
1010 OT_retObj_SET_BUF(retVal);
1011 goto end;
1012 error:
1014 end:
1016}
1017
1019// MkBufferC_Set_TCL_API
1020
1024
1025// doc-key: MkBufferC,MkBufferC-TOR,oC_
1026
1028static OT_ProcRet NS(MkBufferC_Merge) (MkBufferC_ARGS) {
1032 MK_BUF retVal = MkBufferMerge (hdl);
1033 if (retVal == NULL) {
1034 OT_ERROR_CONSTRUCTOR(MkBufferC);
1035 goto error;
1036 }
1037 OT_retObj_SET_BUF(retVal);
1038 goto end;
1039 error:
1041 end:
1043}
1044
1045// doc-key: MkBufferC,MkBufferC-TOR,oCx
1046
1048static OT_ProcRet NS(MkBufferC_Dup) (MkBufferC_ARGS) {
1052 MK_BUF retVal = MkBufferDup (hdl);
1053 if (retVal == NULL) {
1054 OT_ERROR_CONSTRUCTOR(MkBufferC);
1055 goto error;
1056 }
1057 OT_retObj_SET_BUF(retVal);
1058 goto end;
1059 error:
1061 end:
1063}
1064
1065// doc-key: MkBufferC,MkBufferC-TOR,sCc
1066
1068static OT_ProcRet NS(MkBufferC_CTOR) (CONSTR_ARGS) {
1071 MK_NUM size = 0;
1073 MK_BUF retVal = MkBufferCreate (NULL, size);
1074 if (retVal == NULL) {
1075 OT_ERROR_CONSTRUCTOR(MkBufferC);
1076 goto error;
1077 }
1078 OT_CONSTRUCTOR_POST(retVal)
1079 OT_retObj_CONSTR(retVal);
1080 goto end;
1081 error:
1083 end:
1085}
1086
1088static OT_ProcRet NS(MkBufferC_Create) (OtClass_ARGS) {
1091 MK_NUM size = 0;
1094 MK_BUF retVal = MkBufferCreate (NULL, size);
1095 if (retVal == NULL) {
1096 OT_ERROR_CONSTRUCTOR(MkBufferC);
1097 goto error;
1098 }
1099 OT_CONSTRUCTOR_POST(retVal)
1100 OT_retObj_SET_BUF(retVal);
1101 goto end;
1102 error:
1104 end:
1106}
1107
1109static OT_ProcRet NS(MkBufferC_Create1024) (OtClass_ARGS) {
1112 MK_NUM size = 0;
1115 MK_BUF retVal = MkBufferCreate1024 (size);
1116 if (retVal == NULL) {
1117 OT_ERROR_CONSTRUCTOR(MkBufferC);
1118 goto error;
1119 }
1120 OT_retObj_SET_BUF(retVal);
1121 goto end;
1122 error:
1124 end:
1126}
1127
1129static OT_ProcRet NS(MkBufferC_Create256) (OtClass_ARGS) {
1132 MK_NUM size = 0;
1135 MK_BUF retVal = MkBufferCreate256 (size);
1136 if (retVal == NULL) {
1137 OT_ERROR_CONSTRUCTOR(MkBufferC);
1138 goto error;
1139 }
1140 OT_retObj_SET_BUF(retVal);
1141 goto end;
1142 error:
1144 end:
1146}
1147
1149static OT_ProcRet NS(MkBufferC_Create64) (OtClass_ARGS) {
1152 MK_NUM size = 0;
1155 MK_BUF retVal = MkBufferCreate64 (size);
1156 if (retVal == NULL) {
1157 OT_ERROR_CONSTRUCTOR(MkBufferC);
1158 goto error;
1159 }
1160 OT_retObj_SET_BUF(retVal);
1161 goto end;
1162 error:
1164 end:
1166}
1167
1169static OT_ProcRet NS(MkBufferC_CreateBIN) (OtClass_ARGS) {
1172 MkBinaryR val = {0};
1175 MK_BUF retVal = MkBufferCreateBIN (val);
1176 if (retVal == NULL) {
1177 OT_ERROR_CONSTRUCTOR(MkBufferC);
1178 goto error;
1179 }
1180 OT_retObj_SET_BUF(retVal);
1181 goto end;
1182 error:
1184 end:
1186}
1187
1189static OT_ProcRet NS(MkBufferC_CreateBOL) (OtClass_ARGS) {
1192 MK_BOL val = 0;
1195 MK_BUF retVal = MkBufferCreateBOL ((MK_BOL)(val?1:0));
1196 if (retVal == NULL) {
1197 OT_ERROR_CONSTRUCTOR(MkBufferC);
1198 goto error;
1199 }
1200 OT_retObj_SET_BUF(retVal);
1201 goto end;
1202 error:
1204 end:
1206}
1207
1209static OT_ProcRet NS(MkBufferC_CreateBUF) (OtClass_ARGS) {
1212 MK_BUFN val = 0;
1215 MK_BUF retVal = MkBufferCreateBUF (val);
1216 if (retVal == NULL) {
1217 OT_ERROR_CONSTRUCTOR(MkBufferC);
1218 goto error;
1219 }
1220 OT_retObj_SET_BUF(retVal);
1221 goto end;
1222 error:
1224 end:
1226}
1227
1229static OT_ProcRet NS(MkBufferC_CreateDBL) (OtClass_ARGS) {
1232 MK_DBL val = 0;
1235 MK_BUF retVal = MkBufferCreateDBL (val);
1236 if (retVal == NULL) {
1237 OT_ERROR_CONSTRUCTOR(MkBufferC);
1238 goto error;
1239 }
1240 OT_retObj_SET_BUF(retVal);
1241 goto end;
1242 error:
1244 end:
1246}
1247
1249static OT_ProcRet NS(MkBufferC_CreateFLT) (OtClass_ARGS) {
1252 MK_FLT val = 0;
1255 MK_BUF retVal = MkBufferCreateFLT (val);
1256 if (retVal == NULL) {
1257 OT_ERROR_CONSTRUCTOR(MkBufferC);
1258 goto error;
1259 }
1260 OT_retObj_SET_BUF(retVal);
1261 goto end;
1262 error:
1264 end:
1266}
1267
1269static OT_ProcRet NS(MkBufferC_CreateI16) (OtClass_ARGS) {
1272 MK_I16 val = 0;
1275 MK_BUF retVal = MkBufferCreateI16 (val);
1276 if (retVal == NULL) {
1277 OT_ERROR_CONSTRUCTOR(MkBufferC);
1278 goto error;
1279 }
1280 OT_retObj_SET_BUF(retVal);
1281 goto end;
1282 error:
1284 end:
1286}
1287
1289static OT_ProcRet NS(MkBufferC_CreateI32) (OtClass_ARGS) {
1292 MK_I32 val = 0;
1295 MK_BUF retVal = MkBufferCreateI32 (val);
1296 if (retVal == NULL) {
1297 OT_ERROR_CONSTRUCTOR(MkBufferC);
1298 goto error;
1299 }
1300 OT_retObj_SET_BUF(retVal);
1301 goto end;
1302 error:
1304 end:
1306}
1307
1309static OT_ProcRet NS(MkBufferC_CreateI64) (OtClass_ARGS) {
1312 MK_I64 val = 0;
1315 MK_BUF retVal = MkBufferCreateI64 (val);
1316 if (retVal == NULL) {
1317 OT_ERROR_CONSTRUCTOR(MkBufferC);
1318 goto error;
1319 }
1320 OT_retObj_SET_BUF(retVal);
1321 goto end;
1322 error:
1324 end:
1326}
1327
1329static OT_ProcRet NS(MkBufferC_CreateI8) (OtClass_ARGS) {
1332 MK_I8 val = 0;
1335 MK_BUF retVal = MkBufferCreateI8 ((MK_I8)(val));
1336 if (retVal == NULL) {
1337 OT_ERROR_CONSTRUCTOR(MkBufferC);
1338 goto error;
1339 }
1340 OT_retObj_SET_BUF(retVal);
1341 goto end;
1342 error:
1344 end:
1346}
1347
1349static OT_ProcRet NS(MkBufferC_CreateSTR) (OtClass_ARGS) {
1352 MK_STRN val = 0;
1355 MK_BUF retVal = MkBufferCreateSTR (val);
1356 if (retVal == NULL) {
1357 OT_ERROR_CONSTRUCTOR(MkBufferC);
1358 goto error;
1359 }
1360 OT_retObj_SET_BUF(retVal);
1361 goto end;
1362 error:
1364 end:
1366}
1367
1368// doc-key: MkBufferC,MkBufferC-TOR,sc_
1369
1371static OT_ProcRet NS(MkBufferC_CreateTLS) (OtClass_ARGS) {
1374 MK_STRN tlsName = 0;
1376 MK_BOOL resetB = true;
1379 MK_BUF retVal = MkBufferCreateTLS (tlsName, resetB);
1380 OT_retObj_SET_BUF(retVal);
1381 goto end;
1382 error:
1384 end:
1386}
1387
1389// MkBufferC_TOR_TCL_API
1390
1391// END-MkBufferC - created by 'tcl_MqC.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1392
1398
1399const static Tcl_MethodType NS(sOtClassDef)[] = {
1400
1401// BEGIN-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1402
1403// doc-key: MkBufferC,MkBuffer,sCc
1404 {VER, "Create" , NS(MkBufferC_Create) , NULL, NULL},
1405 {VER, "Create1024" , NS(MkBufferC_Create1024) , NULL, NULL},
1406 {VER, "Create256" , NS(MkBufferC_Create256) , NULL, NULL},
1407 {VER, "Create64" , NS(MkBufferC_Create64) , NULL, NULL},
1408 {VER, "CreateBIN" , NS(MkBufferC_CreateBIN) , NULL, NULL},
1409 {VER, "CreateBOL" , NS(MkBufferC_CreateBOL) , NULL, NULL},
1410 {VER, "CreateBUF" , NS(MkBufferC_CreateBUF) , NULL, NULL},
1411 {VER, "CreateDBL" , NS(MkBufferC_CreateDBL) , NULL, NULL},
1412 {VER, "CreateFLT" , NS(MkBufferC_CreateFLT) , NULL, NULL},
1413 {VER, "CreateI16" , NS(MkBufferC_CreateI16) , NULL, NULL},
1414 {VER, "CreateI32" , NS(MkBufferC_CreateI32) , NULL, NULL},
1415 {VER, "CreateI64" , NS(MkBufferC_CreateI64) , NULL, NULL},
1416 {VER, "CreateI8" , NS(MkBufferC_CreateI8) , NULL, NULL},
1417 {VER, "CreateSTR" , NS(MkBufferC_CreateSTR) , NULL, NULL},
1418
1419// doc-key: MkBufferC,MkBuffer,sc_
1420 {VER, "CreateTLS" , NS(MkBufferC_CreateTLS) , NULL, NULL},
1421 {VER, "GetNull" , NS(MkBufferC_GetNull) , NULL, NULL},
1422 {VER, "HandleResolve" , NS(MkBufferC_HandleResolve) , NULL, NULL},
1423 {VER, "Instances" , NS(MkBufferC_Instances) , NULL, NULL},
1424
1425// END-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1426 {0, NULL, NULL, NULL}
1427};
1428
1429// ---------------------------------------------------------------------------------------
1430
1431const static Tcl_MethodType NS(sInstanceDef)[] = {
1432
1433// BEGIN-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1434
1435// doc-key: MkBufferC,MkBuffer,oC_
1436 {VER, "<constructor>" , NS(MkBufferC_CTOR) , NULL, NULL},
1437 {VER, "Merge" , NS(MkBufferC_Merge) , NULL, NULL},
1438
1439// doc-key: MkBufferC,MkBuffer,oCx
1440 {VER, "Dup" , NS(MkBufferC_Dup) , NULL, NULL},
1441
1442// doc-key: MkBufferC,MkBuffer,oc_
1443 {VER, "AppendC" , NS(MkBufferC_AppendC) , NULL, NULL},
1444 {VER, "AppendStringR" , NS(MkBufferC_AppendStringR) , NULL, NULL},
1445 {VER, "Copy" , NS(MkBufferC_Copy) , NULL, NULL},
1446 {VER, "Next" , NS(MkBufferC_Next) , NULL, NULL},
1447 {VER, "Prev" , NS(MkBufferC_Prev) , NULL, NULL},
1448 {VER, "Reset" , NS(MkBufferC_Reset) , NULL, NULL},
1449 {VER, "SetBIN" , NS(MkBufferC_SetBIN) , NULL, NULL},
1450 {VER, "SetBOL" , NS(MkBufferC_SetBOL) , NULL, NULL},
1451 {VER, "SetBUF" , NS(MkBufferC_SetBUF) , NULL, NULL},
1452 {VER, "SetBinaryR" , NS(MkBufferC_SetBinaryR) , NULL, NULL},
1453 {VER, "SetDBL" , NS(MkBufferC_SetDBL) , NULL, NULL},
1454 {VER, "SetFLT" , NS(MkBufferC_SetFLT) , NULL, NULL},
1455 {VER, "SetI16" , NS(MkBufferC_SetI16) , NULL, NULL},
1456 {VER, "SetI32" , NS(MkBufferC_SetI32) , NULL, NULL},
1457 {VER, "SetI64" , NS(MkBufferC_SetI64) , NULL, NULL},
1458 {VER, "SetI8" , NS(MkBufferC_SetI8) , NULL, NULL},
1459 {VER, "SetSTR" , NS(MkBufferC_SetSTR) , NULL, NULL},
1460 {VER, "SetStringR" , NS(MkBufferC_SetStringR) , NULL, NULL},
1461 {VER, "SizeAdd" , NS(MkBufferC_SizeAdd) , NULL, NULL},
1462 {VER, "SizeNew" , NS(MkBufferC_SizeNew) , NULL, NULL},
1463 {VER, "Temp" , NS(MkBufferC_Temp) , NULL, NULL},
1464
1465// doc-key: MkBufferC,MkBuffer,oci
1466 {VER, "GetBFL" , NS(MkBufferC_GetBFL) , NULL, NULL},
1467
1468// doc-key: MkBufferC,MkBuffer,oco
1469 {VER, "GetBUF" , NS(MkBufferC_GetBUF) , NULL, NULL},
1470
1471// doc-key: MkBufferC,MkBuffer,om_
1472 {VER, "CastTo" , NS(MkBufferC_CastTo) , NULL, NULL},
1473 {VER, "Cmp" , NS(MkBufferC_Cmp) , NULL, NULL},
1474 {VER, "GetType1" , NS(MkBufferC_GetType1) , NULL, NULL},
1475 {VER, "GetType2" , NS(MkBufferC_GetType2) , NULL, NULL},
1476 {VER, "GetType3" , NS(MkBufferC_GetType3) , NULL, NULL},
1477 // skip class-overload: MkBufferHandleGet → HandleGet, NS(MkBufferC_HandleGet)
1478 {VER, "IsLocal" , NS(MkBufferC_IsLocal) , NULL, NULL},
1479 // skip class-overload: MkBufferLog → Log, NS(MkBufferC_Log)
1480 {VER, "LogS" , NS(MkBufferC_LogS) , NULL, NULL},
1481 {VER, "Pop" , NS(MkBufferC_Pop) , NULL, NULL},
1482 {VER, "Push" , NS(MkBufferC_Push) , NULL, NULL},
1483 {VER, "ResetFull" , NS(MkBufferC_ResetFull) , NULL, NULL},
1484 // skip class-overload: MkBufferToString → ToString, NS(MkBufferC_ToString)
1485
1486// doc-key: MkBufferC,MkBuffer,omo
1487 {VER, "GetBIN" , NS(MkBufferC_GetBIN) , NULL, NULL},
1488 {VER, "GetBOL" , NS(MkBufferC_GetBOL) , NULL, NULL},
1489 {VER, "GetDBL" , NS(MkBufferC_GetDBL) , NULL, NULL},
1490 {VER, "GetFLT" , NS(MkBufferC_GetFLT) , NULL, NULL},
1491 {VER, "GetI16" , NS(MkBufferC_GetI16) , NULL, NULL},
1492 {VER, "GetI32" , NS(MkBufferC_GetI32) , NULL, NULL},
1493 {VER, "GetI64" , NS(MkBufferC_GetI64) , NULL, NULL},
1494 {VER, "GetI8" , NS(MkBufferC_GetI8) , NULL, NULL},
1495 {VER, "GetSTR" , NS(MkBufferC_GetSTR) , NULL, NULL},
1496 {VER, "GetStringR" , NS(MkBufferC_GetStringR) , NULL, NULL},
1497 {VER, "ToObject" , NS(MkBufferC_ToObject) , NULL, NULL},
1498
1499// END-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
1500 {0, NULL, NULL, NULL, NULL}
1501};
1502
1508
1509int NS(pMkBufferC_Init) ( MK_RT_ARGS OT_ENV_T interp, OT_NS_T ns )
1510{
1511 ClassInit
1512
1513 MkBuffer64C_TT->selfCreate = NS(MkBufferC_selfCreate) ;
1514 MkBuffer64C_TT->selfDelete = NS(MkBufferC_selfDelete) ;
1515 MkBuffer64C_TT->selfUnlink = NS(MkBufferC_selfUnlink) ;
1516 MkBuffer256C_TT->selfCreate = NS(MkBufferC_selfCreate) ;
1517 MkBuffer256C_TT->selfDelete = NS(MkBufferC_selfDelete) ;
1518 MkBuffer256C_TT->selfUnlink = NS(MkBufferC_selfUnlink) ;
1519 MkBuffer1024C_TT->selfCreate = NS(MkBufferC_selfCreate) ;
1520 MkBuffer1024C_TT->selfDelete = NS(MkBufferC_selfDelete) ;
1521 MkBuffer1024C_TT->selfUnlink = NS(MkBufferC_selfUnlink) ;
1522
1523 return TCL_OK;
1524error:
1525 return TCL_ERROR;
1526}
tag: nhi1-release-250425
#define OtClass_ARGS
#define OT_CHECK_NI1(val)
#define OT_CHECK_bool(val)
#define OT_retObj_SET_I8(nat)
#define MK(n)
#define OT_retObj_SET_FLT(nat)
#define OT_SETUP_VARARGS(min, max, d)
#define OT_CHECK_NIH(val)
#define OT_retObj_SET_BOL(nat)
#define OT_SETUP_NOARG(d)
#define OT_SETUP_ONEARG(d)
Tcl_Class OT_CLS_T
#define OT_ERROR_LNG_RETURN
Tcl_Namespace * OT_NS_T
#define OT_CHECK_NI4(val)
#define OT_CHECK_NI8(val)
#define OT_retObj_SET_I16(nat)
#define OT_retObj_SET_Error
#define OT_CHECK_NF8(val)
#define OT_CONSTRUCTOR_POST(x)
#define OT_FRAME_CLEANUP
#define OT_retObj_SET_BUF(nat)
#define OT_ERROR_CONSTRUCTOR(class)
#define OT_retObj_SET_DBL(nat)
#define OT_retObj_SET_I64(nat)
#define OT_CHECK_REQUIRED(val)
#define OT_retObj_SET_None
#define OT_retObj_SET_I32(nat)
#define OT_CHECK_NF4(val)
#define OT_retObj_SET_BFL(nat)
#define OT_GET__ME_REF_MkStringR(s)
#define MkBufferC_ARGS
#define NS(n)
#define OT_GET__ME_REF_MkBinaryR(b)
#define OT_SETUP_CONSTRUCTOR_ARGS(...)
#define OT_CHECK_ENUM(ename, val)
#define OT_retObj_RETURN
#define OT_GET_CALL_PROC
#define OT_CHECK__ME_REF_MkStringR(val)
#define OT_CHECK__ME_REF_MkBinaryR(val)
#define OT_CHECK_NI2(val)
#define OT_retObj_SET_STR(nat)
#define OT_CHECK_NB1(val)
#define OT_NEW_Mk_enum_OBJ(typ, val)
Tcl_Object OT_SELF_T
#define OT_CHECK_OPTIONAL(val)
#define OT_retObj_SET(val)
#define OT_retObj_CONSTR(x)
#define OT_CHECK_NOARGS
#define MkErrorC_Check(mng, PROC)
#define OT_ProcRet
Tcl_Interp * OT_ENV_T
#define CONSTR_ARGS
Tcl_Obj * OT_OBJ_T
#define OT_CHECK_STRN(val)
tag: nhi1-release-250425
OT_ProcRet NS MkBufferC_ToObject(MkBufferC_ARGS)
#define CreateSTR_doc
#define Instances_doc
#define GetDBL_doc
#define GetBFL_doc
#define Create64_doc
#define GetSTR_doc
#define CreateI64_doc
#define GetType3_doc
#define GetI16_doc
#define ResetFull_doc
#define SetBOL_doc
#define GetI8_doc
#define CreateBUF_doc
#define OT_SETUP_hdl_static_constr
#define CreateI8_doc
#define AppendStringR_doc
#define CreateBIN_doc
#define SizeNew_doc
#define Reset_doc
#define GetStringR_doc
#define Create256_doc
#define OT_SETUP_hdl
#define GetBIN_doc
#define SetI8_doc
#define SetSTR_doc
#define GetBUF_doc
#define Dup_doc
#define CreateFLT_doc
#define SetFLT_doc
#define CreateTLS_doc
#define CastTo_doc
#define Pop_doc
#define GetNull_doc
#define SetI16_doc
#define Next_doc
#define GetType2_doc
#define SetBinaryR_doc
#define GetBOL_doc
#define SetI64_doc
#define Merge_doc
#define GetI64_doc
#define GetType1_doc
static __thread MK_TYP MkBufferCTT
#define Create_doc
#define HandleResolve_doc
#define SizeAdd_doc
#define Prev_doc
#define SetBUF_doc
#define VER
#define Create1024_doc
#define OT_CLASS
#define Push_doc
#define LogS_doc
#define OT_SETUP_hdl_static
#define OT_SETUP_hdl_constr
#define SetI32_doc
#define CreateBOL_doc
#define GetFLT_doc
#define SetBIN_doc
#define CreateDBL_doc
#define Temp_doc
#define CreateI16_doc
#define CreateI32_doc
#define SetStringR_doc
#define GetI32_doc
#define SetDBL_doc
#define Cmp_doc
#define IsLocal_doc
#define AppendC_doc
#define CTOR_doc
#define ClassInit
#define Copy_doc
#define MkBuffer1024C_TT
class as MkTypeS-class-type, useable in a class-macro as: class##_TT …
#define MkBuffer256C_TT
class as MkTypeS-class-type, useable in a class-macro as: class##_TT …
#define MkBuffer64C_TT
class as MkTypeS-class-type, useable in a class-macro as: class##_TT …
#define MkBufferAppendC(...)
#define MkBufferAppendStringR(...)
#define MkBufferPush(...)
#define MkBufferPop(...)
#define MkBufferInstances()
static MK_BUF MkBufferNext(MK_BUF const buf)
get next instance from linked-list of MkBufferS type
static MK_BUF MkBufferGetNull(void)
Null-Slot - return a MkBufferC typed NULL instance …
#define MkBufferHandleResolve(...)
static MK_BUF MkBufferPrev(MK_BUF const buf)
get previous instance from linked-list of MkBufferS type
#define MkBufferGetStringR(...)
#define MkBufferGetSTR(...)
#define MkBufferGetFLT(...)
#define MkBufferGetI16(...)
#define MkBufferGetBIN(...)
#define MkBufferGetBFL(...)
#define MkBufferGetBUF(...)
#define MkBufferGetBOL(...)
#define MkBufferGetI32(...)
#define MkBufferGetDBL(...)
#define MkBufferGetI64(...)
#define MkBufferGetI8(...)
#define MkBufferGetType3(...)
#define MkBufferLogS(...)
#define MkBufferIsLocal(...)
#define MkBufferGetType1(...)
#define MkBufferGetType2(...)
#define MkBufferCmp(...)
#define MkBufferCopy(...)
#define MkBufferTemp(...)
#define MkBufferSizeAdd(...)
#define MkBufferCastTo(...)
#define MkBufferResetFull(...)
#define MkBufferReset(...)
#define MkBufferSizeNew(...)
#define MkBufferSetDBL(...)
#define MkBufferSetStringR(...)
#define MkBufferSetBOL(...)
#define MkBufferSetBIN(...)
#define MkBufferSetI64(...)
#define MkBufferSetI16(...)
#define MkBufferSetBUF(...)
#define MkBufferSetFLT(...)
#define MkBufferSetSTR(...)
#define MkBufferSetBinaryR(...)
#define MkBufferSetI8(...)
#define MkBufferSetI32(...)
#define MkBufferCreateSTR(...)
#define MkBufferCreateBOL(...)
#define MkBufferCreateTLS(...)
#define MkBufferMerge(...)
#define MkBufferCreate1024(...)
#define MkBufferCreate(...)
#define MkBufferCreateDBL(...)
#define MkBufferCreateI32(...)
#define MkBufferCreateFLT(...)
#define MkBufferCreateI16(...)
#define MkBufferCreateBUF(...)
#define MkBufferCreateBIN(...)
#define MkBufferCreateI64(...)
#define MkBufferCreateI8(...)
#define MkBufferCreate256(...)
#define MkBufferCreate64(...)
#define MkBufferDup(...)
#define MkBufferListCreateTLS_T(name, num)
create a MkBufferListC instance as thread-local-storage …
#define MK_NULL_NO
flag, not allow NULL
#define MK_NULL_YES
flag, allow NULL
#define MK_UNUSED
mark unnused variables and functions
#define MK_DEPRECATED
MkTypeE
basic data-types supported by Programming-Language-Micro-Kernel (PLMK) …
int32_t MK_NUM
array size data-type ('num' items in array …
float MK_FLT
4 byte float data-type
MK_PTRB * MK_PTR
generic pointer data-type
const MK_STRB * MK_STRN
constant string pointer data-type
signed char MK_I8
1 byte byte data-type
signed long long MK_I64
8 byte wide integer data-type
bool MK_BOOL
real bool data-type
unsigned char MK_BOL
1 byte boolean data-type
signed short int MK_I16
2 byte short data-type
double MK_DBL
8 byte double data-type
int32_t MK_HDL
4 byte int handle data-type
signed int MK_I32
4 byte integer data-type
static bool MkSysStringIsNULL(MK_STRN str)
test if string is NULL or EMPTY …
#define MkThreadLocal
#define MK_RT_CALL
#define MK_RT_ARGS
#define OT_CHECK_BUFN(val, nullB)
#define OT_CHECK_OBJN(val, nullB)
#define OT_CHECK_BFL(val, nullB)
binary data default format …
The ABSTRACT-CLASS used to store a native-type-data-item defined by PRIMITIVE TYPE …
object header …
string data default format …
MkTypeS - class known as typ or type is used as class-base for a Managed-Object-Technology (MOT) type...