theSq3Lite 10.0 NHI1 - theKernel - theLink - theConfig - theSq3Lite - theCompiler - theBrain - theGuard - theLib - theATL
c - tcl - atl - cs - py - rb - jv - cc
Loading...
Searching...
No Matches
Sq3LiteC_tcl.c File Reference

Sq3LiteC_tcl.c - 10 Apr 2025 - aotto1968. More...

+ Include dependency graph for Sq3LiteC_tcl.c:

Go to the source code of this file.

Macros

#define META_FILE_NAME   "Sq3LiteC_tcl.c"
 
#define OT_CLASS   NS(Sq3LiteC)
 
#define OT_CLASS_NAME   "Sq3LiteC"
 
#define OBJECT2LITE(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(LITE,SQ3_LITE);
 
#define OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(LITE,SQ3_LITE);
 
#define OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(LITE,SQ3_LITE);
 
#define OT_SETUP_hdl_constr_pre
 
#define OT_SETUP_hdl_constr
 
#define SetupRtFromHdl_XN(hdl)
 
#define SetupRtFromHdl_X(hdl)
 
#define ClassInit
 
#define VER   TCL_OO_METHOD_VERSION_CURRENT
 
#define CTOR_doc   "Sq3LiteC [Sq3LiteC CTOR filename:string ?flags:Sq3OpenEF={SQ3_OPEN_READWRITE SQ3_OPEN_CREATE}? ?zVfs:string=\"MK_NULL\"?]"
 
#define OpenV2_doc   "Sq3LiteC [Sq3LiteC OpenV2 filename:string ?flags:Sq3OpenEF={SQ3_OPEN_READWRITE SQ3_OPEN_CREATE}? ?zVfs:string=\"MK_NULL\"?]"
 
#define GetNull_doc   "Sq3LiteC [Sq3LiteC GetNull]"
 
#define HandleResolve_doc   "Sq3LiteC [Sq3LiteC HandleResolve netHdl:MK_HDL]"
 
#define Instances_doc   "Sq3LiteC [Sq3LiteC Instances]"
 
#define ErrStr_doc   "string [Sq3LiteC ErrStr arg0:int32]"
 
#define Sleep_doc   "Sq3LiteC Sleep arg0:int32"
 
#define Next_doc   "Sq3LiteC [$lite Next]"
 
#define Prev_doc   "Sq3LiteC [$lite Prev]"
 
#define DbStatusBFL_doc   "MkBufferListC [$sq3lite DbStatusBFL op:Sq3DbStatusE resetFlg:bool]"
 
#define PrepareV2_doc   "Sq3StmtC [$db PrepareV2 zSql:string]"
 
#define BusyTimeout_doc   "$sq3lite BusyTimeout ms:int32"
 
#define Changes_doc   "int32 [$sq3lite Changes]"
 
#define Changes64_doc   "int64 [$sq3lite Changes64]"
 
#define CloseV2_doc   "$sq3lite CloseV2"
 
#define DbCacheflush_doc   "$sq3lite DbCacheflush"
 
#define DbFilename_doc   "string [$db DbFilename zDbName:string]"
 
#define DbName_doc   "string [$db DbName N:int32]"
 
#define DbReadonly_doc   "$db DbReadonly zDbName:string"
 
#define DbReleaseMemory_doc   "$sq3lite DbReleaseMemory"
 
#define DeclareVtab_doc   "$sq3lite DeclareVtab zSQL:string"
 
#define Deserialize_doc   "$sq3lite Deserialize zSchema:string pData:binary mFlags:Sq3DeSerializeEF"
 
#define DropModules_doc   "$sq3lite DropModules azKeepBfl:MkBufferListC"
 
#define ErrCode_doc   "Sq3ErrorE [$db ErrCode]"
 
#define ErrMsg_doc   "string [$sq3lite ErrMsg]"
 
#define ErrorOffset_doc   "$db ErrorOffset"
 
#define Exec_doc   "$sq3lite Exec sql:string ?callback_data:callable=\"MK_NULL\"?"
 
#define ExecV2_doc   "$sq3lite ExecV2 sql:string ?callback:callable=\"MK_NULL\"?"
 
#define ExtendedResultCodes_doc   "$sq3lite ExtendedResultCodes onoff:int32"
 
#define ExtendetErrCode_doc   "Sq3ExtendetResultCodesE [$db ExtendetErrCode]"
 
#define GetAutocommit_doc   "int32 [$sq3lite GetAutocommit]"
 
#define Interrupt_doc   "$sq3lite Interrupt"
 
#define IsInterrupted_doc   "bool [$sq3lite IsInterrupted]"
 
#define LastInsertRowid_doc   "int64 [$sq3lite LastInsertRowid]"
 
#define Limit_doc   "$sq3lite Limit id:Sq3LimitE newVal:int32"
 
#define OverloadFunction_doc   "$sq3lite OverloadFunction zFuncName:string nArg:int32"
 
#define Serialize_doc   "binary [$sq3lite Serialize zSchema:string mFlags:Sq3SerializeE]"
 
#define SetLastInsertRowid_doc   "$sq3lite SetLastInsertRowid arg1:int64"
 
#define SystemErrno_doc   "$sq3lite SystemErrno"
 
#define TotalChanges_doc   "int32 [$sq3lite TotalChanges]"
 
#define TotalChanges64_doc   "int64 [$sq3lite TotalChanges64]"
 
#define TxnState_doc   "$sq3lite TxnState zSchema:string"
 
#define VtabOnConflict_doc   "$sq3lite VtabOnConflict"
 
#define WalAutocheckpoint_doc   "$db WalAutocheckpoint N:int32"
 
#define DbStatus_doc   "{pCur:int32 pHiwtr:int32} [$sq3lite DbStatus op:Sq3DbStatusE resetFlg:bool]"
 
#define TableColumnMetadata_doc   "{pzDataType:string pzCollSeq:string pNotNull:int32 pPrimaryKey:int32 pAutoinc:int32} [$db TableColumnMetadata zDbName:string zTableName:string zColumnName:string]"
 
#define WalCheckpointV2_doc   "{pnLog:int32 pnCkpt:int32} [$db WalCheckpointV2 zDb:string eMode:int32]"
 

Functions

static MK_PTR tclsq3lite_Sq3LiteC_selfCreate (MK_RT mkrt, MK_OBJ const obj, MK_PTR const env)
 
static void tclsq3lite_Sq3LiteC_selfDelete (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
 
static void tclsq3lite_Sq3LiteC_selfUnlink (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
 
static OT_ProcRet tclsq3lite_Sq3LiteC_HandleResolve (OtClass_ARGS)
  Tcl: (static) Sq3LiteC [Sq3LiteC HandleResolve netHdl:MK_HDL] C-API
Handle-Resolve-Slot - return a Sq3LiteC from netHdl or "MK_NULL" if invalid…
 
MK_DEPRECATED static MK_UNUSED OT_ProcRet tclsq3lite_Sq3LiteC_HandleGet (Sq3LiteC_ARGS)
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Next (Sq3LiteC_ARGS)
  Tcl: Sq3LiteC [$lite Next] C-API
get next instance from linked-list of Sq3LiteS type
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Prev (Sq3LiteC_ARGS)
  Tcl: Sq3LiteC [$lite Prev] C-API
get previous instance from linked-list of Sq3LiteS type
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Instances (OtClass_ARGS)
  Tcl: (static) Sq3LiteC [Sq3LiteC Instances] C-API
get head-instance from linked-list of Sq3LiteS type …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_GetNull (OtClass_ARGS)
  Tcl: (static) Sq3LiteC [Sq3LiteC GetNull] C-API
Null-Slot - return a Sq3LiteC typed NULL instance …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_BusyTimeout (Sq3LiteC_ARGS)
  Tcl: $sq3lite BusyTimeout ms:int32 C-API
Set A Busy Timeout …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DeclareVtab (Sq3LiteC_ARGS)
  Tcl: $sq3lite DeclareVtab zSQL:string C-API
Declare The Schema Of A Virtual Table …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_ExtendedResultCodes (Sq3LiteC_ARGS)
  Tcl: $sq3lite ExtendedResultCodes onoff:int32 C-API
Enable Or Disable Extended Result Codes …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Limit (Sq3LiteC_ARGS)
  Tcl: $sq3lite Limit id:Sq3LimitE newVal:int32 C-API
Run-time Limits …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_ErrCode (Sq3LiteC_ARGS)
  Tcl: Sq3ErrorE [$db ErrCode] C-API
Error Codes And Messages …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_ErrMsg (Sq3LiteC_ARGS)
  Tcl: string [$sq3lite ErrMsg] C-API
Error Codes And Messages …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_ErrorOffset (Sq3LiteC_ARGS)
  Tcl: $db ErrorOffset C-API
Error Codes And Messages …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_ExtendetErrCode (Sq3LiteC_ARGS)
  Tcl: Sq3ExtendetResultCodesE [$db ExtendetErrCode] C-API
Error Codes And Messages …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_SystemErrno (Sq3LiteC_ARGS)
  Tcl: $sq3lite SystemErrno C-API
Low-level system error code …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_ErrStr (OtClass_ARGS)
  Tcl: (static) string [Sq3LiteC ErrStr arg0:int32] C-API
Error Codes And Messages …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Exec (Sq3LiteC_ARGS)
  Tcl: $sq3lite Exec sql:string ?callback_data:callable="MK_NULL"? C-API
One-Step Query Execution Interface …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_ExecV2 (Sq3LiteC_ARGS)
  Tcl: $sq3lite ExecV2 sql:string ?callback:callable="MK_NULL"? C-API
The Sq3LiteExecV2() interface is a convenience wrapper around Sq3StmtPrepareV2(), Sq3StmtStep(), and Sq3StmtFinalize(), that allows an application to run multiple statements of SQL without having to use a lot of C code.
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Sleep (OtClass_ARGS)
  Tcl: (static) Sq3LiteC Sleep arg0:int32 C-API
Suspend Execution For A Short Time …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_GetAutocommit (Sq3LiteC_ARGS)
  Tcl: int32 [$sq3lite GetAutocommit] C-API
Test For Auto-Commit Mode …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_LastInsertRowid (Sq3LiteC_ARGS)
  Tcl: int64 [$sq3lite LastInsertRowid] C-API
Last Insert Rowid …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_TxnState (Sq3LiteC_ARGS)
  Tcl: $sq3lite TxnState zSchema:string C-API
Determine the transaction state of a database …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_VtabOnConflict (Sq3LiteC_ARGS)
  Tcl: $sq3lite VtabOnConflict C-API
Determine The Virtual Table Conflict Policy …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DbStatusBFL (Sq3LiteC_ARGS)
  Tcl: MkBufferListC [$sq3lite DbStatusBFL op:Sq3DbStatusE resetFlg:bool] C-API
Database Connection Status …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DbCacheflush (Sq3LiteC_ARGS)
  Tcl: $sq3lite DbCacheflush C-API
Flush caches to disk mid-transaction …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DbFilename (Sq3LiteC_ARGS)
  Tcl: string [$db DbFilename zDbName:string] C-API
Return The Filename For A Database Connection …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DbName (Sq3LiteC_ARGS)
  Tcl: string [$db DbName N:int32] C-API
Return The Schema Name For A Database Connection …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DbReadonly (Sq3LiteC_ARGS)
  Tcl: $db DbReadonly zDbName:string C-API
Determine if a database is read-only …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DbReleaseMemory (Sq3LiteC_ARGS)
  Tcl: $sq3lite DbReleaseMemory C-API
Free Memory Used By A Database Connection …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Deserialize (Sq3LiteC_ARGS)
  Tcl: $sq3lite Deserialize zSchema:string pData:binary mFlags:Sq3DeSerializeEF C-API
Deserialize a database …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DropModules (Sq3LiteC_ARGS)
  Tcl: $sq3lite DropModules azKeepBfl:MkBufferListC C-API
Remove Unnecessary Virtual Table Implementations …
 
MK_DEPRECATED static MK_UNUSED OT_ProcRet tclsq3lite_Sq3LiteC_Log (Sq3LiteC_ARGS)
 
static OT_ProcRet tclsq3lite_Sq3LiteC_OverloadFunction (Sq3LiteC_ARGS)
  Tcl: $sq3lite OverloadFunction zFuncName:string nArg:int32 C-API
Overload A Function For A Virtual Table …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Serialize (Sq3LiteC_ARGS)
  Tcl: binary [$sq3lite Serialize zSchema:string mFlags:Sq3SerializeE] C-API
Serialize a database …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_DbStatus (Sq3LiteC_ARGS)
  Tcl: {pCur:int32 pHiwtr:int32} [$sq3lite DbStatus op:Sq3DbStatusE resetFlg:bool] C-API
Database Connection Status …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_TableColumnMetadata (Sq3LiteC_ARGS)
  Tcl: {pzDataType:string pzCollSeq:string pNotNull:int32 pPrimaryKey:int32 pAutoinc:int32} [$db TableColumnMetadata zDbName:string zTableName:string zColumnName:string] C-API
Extract Metadata About A Column Of A Table …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_WalAutocheckpoint (Sq3LiteC_ARGS)
  Tcl: $db WalAutocheckpoint N:int32 C-API
Configure an auto-checkpoint …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_WalCheckpointV2 (Sq3LiteC_ARGS)
  Tcl: {pnLog:int32 pnCkpt:int32} [$db WalCheckpointV2 zDb:string eMode:int32] C-API
Checkpoint a database …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Interrupt (Sq3LiteC_ARGS)
  Tcl: $sq3lite Interrupt C-API
Interrupt A Long-Running Query …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_IsInterrupted (Sq3LiteC_ARGS)
  Tcl: bool [$sq3lite IsInterrupted] C-API
Interrupt A Long-Running Query …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Changes (Sq3LiteC_ARGS)
  Tcl: int32 [$sq3lite Changes] C-API
Count The Number Of Rows Modified …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_Changes64 (Sq3LiteC_ARGS)
  Tcl: int64 [$sq3lite Changes64] C-API
Count The Number Of Rows Modified …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_SetLastInsertRowid (Sq3LiteC_ARGS)
  Tcl: $sq3lite SetLastInsertRowid arg1:int64 C-API
Set the Last Insert Rowid value …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_TotalChanges (Sq3LiteC_ARGS)
  Tcl: int32 [$sq3lite TotalChanges] C-API
Total Number Of Rows Modified …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_TotalChanges64 (Sq3LiteC_ARGS)
  Tcl: int64 [$sq3lite TotalChanges64] C-API
Total Number Of Rows Modified …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_CTOR (CONSTR_ARGS)
  Tcl: (constructor,static) Sq3LiteC [Sq3LiteC CTOR filename:string ?flags:Sq3OpenEF={SQ3_OPEN_READWRITE SQ3_OPEN_CREATE}? ?zVfs:string="MK_NULL"?] C-API
Opening A New Database Connection …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_OpenV2 (OtClass_ARGS)
  Tcl: (constructor,static) Sq3LiteC [Sq3LiteC OpenV2 filename:string ?flags:Sq3OpenEF={SQ3_OPEN_READWRITE SQ3_OPEN_CREATE}? ?zVfs:string="MK_NULL"?] C-API
Opening A New Database Connection …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_PrepareV2 (Sq3LiteC_ARGS)
  Tcl: (constructor) Sq3StmtC [$db PrepareV2 zSql:string] C-API
Compiling An SQL Statement …
 
static OT_ProcRet tclsq3lite_Sq3LiteC_CloseV2 (Sq3LiteC_ARGS)
  Tcl: (destructor) $sq3lite CloseV2 C-API
Closing A Database Connection …
 
int tclsq3lite_pSq3LiteC_Init (MK_RT mkrt, Tcl_Interp *interp, Tcl_Namespace *ns)
 

Variables

__thread OT_CLS_T OT_CLASS = NULL
 
static __thread MK_TYP Sq3LiteCTT = NULL
 
__thread OT_OBJ_T tclsq3lite_Sq3LiteC_MK_NULL = NULL
 
static Tcl_MethodType tclsq3lite_sOtClassDef []
 
static Tcl_MethodType tclsq3lite_sInstanceDef []
 

Detailed Description

Sq3LiteC_tcl.c - 10 Apr 2025 - aotto1968.

Version
220e89cf9473580117e04029d678fcf7e7736959
Date
Thu Apr 10 14:00:03 2025 +0200
Author
aotto1968 aotto.nosp@m.1968.nosp@m.@t-on.nosp@m.line.nosp@m..de

Definition in file Sq3LiteC_tcl.c.

Macro Definition Documentation

◆ BusyTimeout_doc

#define BusyTimeout_doc   "$sq3lite BusyTimeout ms:int32"

Definition at line 139 of file Sq3LiteC_tcl.c.

◆ Changes64_doc

#define Changes64_doc   "int64 [$sq3lite Changes64]"

Definition at line 141 of file Sq3LiteC_tcl.c.

◆ Changes_doc

#define Changes_doc   "int32 [$sq3lite Changes]"

Definition at line 140 of file Sq3LiteC_tcl.c.

◆ ClassInit

#define ClassInit
Value:
/* if not already done, initialize NEW MQ type */ \
if (Sq3LiteCTT == NULL) Sq3LiteCTT = Sq3LiteSTT; \
\
/* protect against double call */ \
if (Sq3LiteCTT->selfCreate == NS(Sq3LiteC_selfCreate)) return MK_OK; \
\
/* add "selfCreate" and "selfDelete" feature to the MQ-Class */ \
Sq3LiteCTT->selfCreate = NS(Sq3LiteC_selfCreate); \
Sq3LiteCTT->selfDelete = NS(Sq3LiteC_selfDelete); \
Sq3LiteCTT->selfUnlink = NS(Sq3LiteC_selfUnlink); \
\
/* create the TCL-class */ \
OT_SELF_T classO = MK(ClassDef)(interp,ns,Sq3LiteCTT); \
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 */ \
SQ3(Sq3LiteC_MK_NULL) = Tcl_GetObjectName(interp, \
MK(AtomCreate) (MK_RT_CALL interp, NULL /*obj*/, OT_CLASS, "MK_NULL" /*name*/, "::tclsq3lite::Sq3LiteC" /*ns*/) \
); \
Tcl_IncrRefCount(SQ3(Sq3LiteC_MK_NULL));
#define MK(n)
@ OT_UNKNOWN_CLASS
@ OT_UNKNOWN_INSTANCE
Tcl_Object OT_SELF_T
#define SQ3(n)
#define NS(n)
#define OT_CLASS
static __thread MK_TYP Sq3LiteCTT
MK_OK
#define MkThreadLocal
#define MK_RT_CALL
#define Sq3LiteSTT
instance-type as MkTypeS-class-type (cast from Sq3LiteST into MkTypeS) …
MkSelfUnlinkF selfUnlink
MkSelfDeleteF selfDelete
MkSelfCreateF selfCreate

Definition at line 80 of file Sq3LiteC_tcl.c.

80#define ClassInit \
81 /* if not already done, initialize NEW MQ type */ \
82 if (Sq3LiteCTT == NULL) Sq3LiteCTT = Sq3LiteSTT; \
83 \
84 /* protect against double call */ \
85 if (Sq3LiteCTT->selfCreate == NS(Sq3LiteC_selfCreate)) return MK_OK; \
86 \
87 /* add "selfCreate" and "selfDelete" feature to the MQ-Class */ \
88 Sq3LiteCTT->selfCreate = NS(Sq3LiteC_selfCreate); \
89 Sq3LiteCTT->selfDelete = NS(Sq3LiteC_selfDelete); \
90 Sq3LiteCTT->selfUnlink = NS(Sq3LiteC_selfUnlink); \
91 \
92 /* create the TCL-class */ \
93 OT_SELF_T classO = MK(ClassDef)(interp,ns,Sq3LiteCTT); \
94 check_NULL(classO) goto error; \
95 OT_CLASS = Tcl_GetObjectAsClass(classO); \
96 \
97 /* create the TCL static Methods */ \
98 static MkThreadLocal OtUnknownS NS(sClassUnknown) = {OT_UNKNOWN_CLASS}; \
99 check_LNG(MK(UnknownSetup) (interp,classO,NS(sOtClassDef),&NS(sClassUnknown))) goto error; \
100 \
101 /* create the TCL instance Methods */ \
102 static MkThreadLocal OtUnknownS NS(sInstanceUnknown) = {OT_UNKNOWN_INSTANCE}; \
103 check_LNG(MK(UnknownSetup) (interp,classO,NS(sInstanceDef),&NS(sInstanceUnknown))) goto error; \
104 \
105 /* define the "NULL" object */ \
106 SQ3(Sq3LiteC_MK_NULL) = Tcl_GetObjectName(interp, \
107 MK(AtomCreate) (MK_RT_CALL interp, NULL /*obj*/, OT_CLASS, "MK_NULL" /*name*/, "::tclsq3lite::Sq3LiteC" /*ns*/) \
108 ); \
109 Tcl_IncrRefCount(SQ3(Sq3LiteC_MK_NULL));

◆ CloseV2_doc

#define CloseV2_doc   "$sq3lite CloseV2"

Definition at line 142 of file Sq3LiteC_tcl.c.

◆ CTOR_doc

#define CTOR_doc   "Sq3LiteC [Sq3LiteC CTOR filename:string ?flags:Sq3OpenEF={SQ3_OPEN_READWRITE SQ3_OPEN_CREATE}? ?zVfs:string=\"MK_NULL\"?]"

Definition at line 118 of file Sq3LiteC_tcl.c.

◆ DbCacheflush_doc

#define DbCacheflush_doc   "$sq3lite DbCacheflush"

Definition at line 143 of file Sq3LiteC_tcl.c.

◆ DbFilename_doc

#define DbFilename_doc   "string [$db DbFilename zDbName:string]"

Definition at line 144 of file Sq3LiteC_tcl.c.

◆ DbName_doc

#define DbName_doc   "string [$db DbName N:int32]"

Definition at line 145 of file Sq3LiteC_tcl.c.

◆ DbReadonly_doc

#define DbReadonly_doc   "$db DbReadonly zDbName:string"

Definition at line 146 of file Sq3LiteC_tcl.c.

◆ DbReleaseMemory_doc

#define DbReleaseMemory_doc   "$sq3lite DbReleaseMemory"

Definition at line 147 of file Sq3LiteC_tcl.c.

◆ DbStatus_doc

#define DbStatus_doc   "{pCur:int32 pHiwtr:int32} [$sq3lite DbStatus op:Sq3DbStatusE resetFlg:bool]"

Definition at line 176 of file Sq3LiteC_tcl.c.

◆ DbStatusBFL_doc

#define DbStatusBFL_doc   "MkBufferListC [$sq3lite DbStatusBFL op:Sq3DbStatusE resetFlg:bool]"

Definition at line 135 of file Sq3LiteC_tcl.c.

◆ DeclareVtab_doc

#define DeclareVtab_doc   "$sq3lite DeclareVtab zSQL:string"

Definition at line 148 of file Sq3LiteC_tcl.c.

◆ Deserialize_doc

#define Deserialize_doc   "$sq3lite Deserialize zSchema:string pData:binary mFlags:Sq3DeSerializeEF"

Definition at line 149 of file Sq3LiteC_tcl.c.

◆ DropModules_doc

#define DropModules_doc   "$sq3lite DropModules azKeepBfl:MkBufferListC"

Definition at line 150 of file Sq3LiteC_tcl.c.

◆ ErrCode_doc

#define ErrCode_doc   "Sq3ErrorE [$db ErrCode]"

Definition at line 151 of file Sq3LiteC_tcl.c.

◆ ErrMsg_doc

#define ErrMsg_doc   "string [$sq3lite ErrMsg]"

Definition at line 152 of file Sq3LiteC_tcl.c.

◆ ErrorOffset_doc

#define ErrorOffset_doc   "$db ErrorOffset"

Definition at line 153 of file Sq3LiteC_tcl.c.

◆ ErrStr_doc

#define ErrStr_doc   "string [Sq3LiteC ErrStr arg0:int32]"

Definition at line 127 of file Sq3LiteC_tcl.c.

◆ Exec_doc

#define Exec_doc   "$sq3lite Exec sql:string ?callback_data:callable=\"MK_NULL\"?"

Definition at line 154 of file Sq3LiteC_tcl.c.

◆ ExecV2_doc

#define ExecV2_doc   "$sq3lite ExecV2 sql:string ?callback:callable=\"MK_NULL\"?"

Definition at line 155 of file Sq3LiteC_tcl.c.

◆ ExtendedResultCodes_doc

#define ExtendedResultCodes_doc   "$sq3lite ExtendedResultCodes onoff:int32"

Definition at line 156 of file Sq3LiteC_tcl.c.

◆ ExtendetErrCode_doc

#define ExtendetErrCode_doc   "Sq3ExtendetResultCodesE [$db ExtendetErrCode]"

Definition at line 157 of file Sq3LiteC_tcl.c.

◆ GetAutocommit_doc

#define GetAutocommit_doc   "int32 [$sq3lite GetAutocommit]"

Definition at line 158 of file Sq3LiteC_tcl.c.

◆ GetNull_doc

#define GetNull_doc   "Sq3LiteC [Sq3LiteC GetNull]"

Definition at line 122 of file Sq3LiteC_tcl.c.

◆ HandleResolve_doc

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

Definition at line 123 of file Sq3LiteC_tcl.c.

◆ Instances_doc

#define Instances_doc   "Sq3LiteC [Sq3LiteC Instances]"

Definition at line 124 of file Sq3LiteC_tcl.c.

◆ Interrupt_doc

#define Interrupt_doc   "$sq3lite Interrupt"

Definition at line 160 of file Sq3LiteC_tcl.c.

◆ IsInterrupted_doc

#define IsInterrupted_doc   "bool [$sq3lite IsInterrupted]"

Definition at line 161 of file Sq3LiteC_tcl.c.

◆ LastInsertRowid_doc

#define LastInsertRowid_doc   "int64 [$sq3lite LastInsertRowid]"

Definition at line 162 of file Sq3LiteC_tcl.c.

◆ Limit_doc

#define Limit_doc   "$sq3lite Limit id:Sq3LimitE newVal:int32"

Definition at line 163 of file Sq3LiteC_tcl.c.

◆ META_FILE_NAME

#define META_FILE_NAME   "Sq3LiteC_tcl.c"

Definition at line 14 of file Sq3LiteC_tcl.c.

◆ Next_doc

#define Next_doc   "Sq3LiteC [$lite Next]"

Definition at line 131 of file Sq3LiteC_tcl.c.

◆ OBJECT2LITE

#define OBJECT2LITE ( O)
Value:
MkAssertCastM(Sq3LiteC,(Tcl_ObjectGetMetadata(O, &MK(AtomMeta))))
#define MkAssertCastM(cls, m)

Definition at line 21 of file Sq3LiteC_tcl.c.

◆ OpenV2_doc

#define OpenV2_doc   "Sq3LiteC [Sq3LiteC OpenV2 filename:string ?flags:Sq3OpenEF={SQ3_OPEN_READWRITE SQ3_OPEN_CREATE}? ?zVfs:string=\"MK_NULL\"?]"

Definition at line 119 of file Sq3LiteC_tcl.c.

◆ OT_CLASS

#define OT_CLASS   NS(Sq3LiteC)

Definition at line 18 of file Sq3LiteC_tcl.c.

◆ OT_CLASS_NAME

#define OT_CLASS_NAME   "Sq3LiteC"

Definition at line 19 of file Sq3LiteC_tcl.c.

◆ OT_SETUP_hdl

#define OT_SETUP_hdl   SetupHdlFromMetaData_2(LITE,SQ3_LITE);

Definition at line 62 of file Sq3LiteC_tcl.c.

◆ OT_SETUP_hdl__null_allow

#define OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(LITE,SQ3_LITE);

Definition at line 63 of file Sq3LiteC_tcl.c.

◆ OT_SETUP_hdl_constr

#define OT_SETUP_hdl_constr
Value:
int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
MK_RT_UNUSED OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
#define OT_SETUP_hdl_constr_pre
#define MkERROR
#define AllRtSetup_NULL
#define MK_RT_UNUSED
struct Sq3LiteS * SQ3_LITE
class-shortcut for struct Sq3LiteS *, all shortcut using the XX_YYY syntax (only for public API) …
Struct to represent the data of the Sq3LiteC …

Definition at line 67 of file Sq3LiteC_tcl.c.

67#define OT_SETUP_hdl_constr \
68 OT_SETUP_hdl_constr_pre; \
69 int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
70 AllRtSetup_NULL; \
71 MK_RT_UNUSED OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
72 SQ3_LITE hdl = (SQ3_LITE) &MkERROR;

◆ OT_SETUP_hdl_constr_pre

#define OT_SETUP_hdl_constr_pre

Definition at line 66 of file Sq3LiteC_tcl.c.

◆ OT_SETUP_hdl_destr

#define OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(LITE,SQ3_LITE);

Definition at line 64 of file Sq3LiteC_tcl.c.

◆ OT_SETUP_hdl_static

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

Definition at line 56 of file Sq3LiteC_tcl.c.

56#define OT_SETUP_hdl_static \
57 int __skip=Tcl_ObjectContextSkippedArgs(objCtx); \
58 AllRtSetup_NULL; \
59 __attribute__((unused)) OT_SELF_T selfO = Tcl_ObjectContextObject(objCtx); \
60 __attribute__((unused)) MK_TYP hdl = Sq3LiteC##_TT;

◆ OT_SETUP_hdl_static_constr

#define OT_SETUP_hdl_static_constr
Value:
#define OT_SETUP_hdl_static_constr_pre
#define OT_SETUP_hdl_static

Definition at line 52 of file Sq3LiteC_tcl.c.

52#define OT_SETUP_hdl_static_constr \
53 OT_SETUP_hdl_static_constr_pre; \
54 OT_SETUP_hdl_static

◆ OT_SETUP_hdl_static_constr_pre

#define OT_SETUP_hdl_static_constr_pre

Definition at line 51 of file Sq3LiteC_tcl.c.

◆ OverloadFunction_doc

#define OverloadFunction_doc   "$sq3lite OverloadFunction zFuncName:string nArg:int32"

Definition at line 165 of file Sq3LiteC_tcl.c.

◆ PrepareV2_doc

#define PrepareV2_doc   "Sq3StmtC [$db PrepareV2 zSql:string]"

Definition at line 136 of file Sq3LiteC_tcl.c.

◆ Prev_doc

#define Prev_doc   "Sq3LiteC [$lite Prev]"

Definition at line 132 of file Sq3LiteC_tcl.c.

◆ Serialize_doc

#define Serialize_doc   "binary [$sq3lite Serialize zSchema:string mFlags:Sq3SerializeE]"

Definition at line 166 of file Sq3LiteC_tcl.c.

◆ SetLastInsertRowid_doc

#define SetLastInsertRowid_doc   "$sq3lite SetLastInsertRowid arg1:int64"

Definition at line 167 of file Sq3LiteC_tcl.c.

◆ SetupRtFromHdl_X

#define SetupRtFromHdl_X ( hdl)
Value:
#define AllRtSetup_X(x)

Definition at line 76 of file Sq3LiteC_tcl.c.

◆ SetupRtFromHdl_XN

#define SetupRtFromHdl_XN ( hdl)
Value:
#define AllRtSetup_XN(x)

Definition at line 75 of file Sq3LiteC_tcl.c.

◆ Sleep_doc

#define Sleep_doc   "Sq3LiteC Sleep arg0:int32"

Definition at line 128 of file Sq3LiteC_tcl.c.

◆ SystemErrno_doc

#define SystemErrno_doc   "$sq3lite SystemErrno"

Definition at line 168 of file Sq3LiteC_tcl.c.

◆ TableColumnMetadata_doc

#define TableColumnMetadata_doc   "{pzDataType:string pzCollSeq:string pNotNull:int32 pPrimaryKey:int32 pAutoinc:int32} [$db TableColumnMetadata zDbName:string zTableName:string zColumnName:string]"

Definition at line 177 of file Sq3LiteC_tcl.c.

◆ TotalChanges64_doc

#define TotalChanges64_doc   "int64 [$sq3lite TotalChanges64]"

Definition at line 170 of file Sq3LiteC_tcl.c.

◆ TotalChanges_doc

#define TotalChanges_doc   "int32 [$sq3lite TotalChanges]"

Definition at line 169 of file Sq3LiteC_tcl.c.

◆ TxnState_doc

#define TxnState_doc   "$sq3lite TxnState zSchema:string"

Definition at line 171 of file Sq3LiteC_tcl.c.

◆ VER

#define VER   TCL_OO_METHOD_VERSION_CURRENT

Definition at line 111 of file Sq3LiteC_tcl.c.

◆ VtabOnConflict_doc

#define VtabOnConflict_doc   "$sq3lite VtabOnConflict"

Definition at line 172 of file Sq3LiteC_tcl.c.

◆ WalAutocheckpoint_doc

#define WalAutocheckpoint_doc   "$db WalAutocheckpoint N:int32"

Definition at line 173 of file Sq3LiteC_tcl.c.

◆ WalCheckpointV2_doc

#define WalCheckpointV2_doc   "{pnLog:int32 pnCkpt:int32} [$db WalCheckpointV2 zDb:string eMode:int32]"

Definition at line 178 of file Sq3LiteC_tcl.c.

Function Documentation

◆ tclsq3lite_pSq3LiteC_Init()

int tclsq3lite_pSq3LiteC_Init ( MK_RT mkrt,
Tcl_Interp * interp,
Tcl_Namespace * ns )

Public API

Definition at line 1169 of file Sq3LiteC_tcl.c.

1170{
1171 ClassInit
1172
1173 return TCL_OK;
1174error:
1175 return TCL_ERROR;
1176}
#define ClassInit

◆ tclsq3lite_Sq3LiteC_selfCreate()

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

Definition at line 31 of file Sq3LiteC_tcl.c.

31 {
32 OT_ENV_T interp = env;
33 return MK(AtomCreate) (MK_RT_CALL interp,obj,OT_CLASS,NULL,NULL);
34}
Tcl_Interp * OT_ENV_T

◆ tclsq3lite_Sq3LiteC_selfDelete()

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

Definition at line 36 of file Sq3LiteC_tcl.c.

36 {
37 OT_SELF_T selfO = selfP;
38 OT_ENV_T interp = env;
39 MK(AtomDeleteHard) (MK_RT_CALL interp, selfO);
40}

◆ tclsq3lite_Sq3LiteC_selfUnlink()

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

Definition at line 42 of file Sq3LiteC_tcl.c.

42 {
43 OT_SELF_T selfO = selfP;
44 OT_ENV_T interp = env;
45 MK(AtomUnlink) (MK_RT_CALL interp, selfO);
46}

Variable Documentation

◆ OT_CLASS

__thread OT_CLS_T OT_CLASS = NULL

Definition at line 24 of file Sq3LiteC_tcl.c.

◆ Sq3LiteCTT

__thread MK_TYP Sq3LiteCTT = NULL
static

Definition at line 27 of file Sq3LiteC_tcl.c.

◆ tclsq3lite_sInstanceDef

Tcl_MethodType tclsq3lite_sInstanceDef[]
static

Definition at line 1103 of file Sq3LiteC_tcl.c.

1103 {
1104// BEGIN-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theSq3Lite/c/gen/c_sq3lite.meta' - DO NOT change
1105
1106// doc-key: Sq3LiteC,Sq3Lite,oC_
1107 {VER, "<constructor>" , NS(Sq3LiteC_CTOR) , NULL, NULL},
1108
1109// doc-key: Sq3LiteC,Sq3Lite,oc_
1110 {VER, "Next" , NS(Sq3LiteC_Next) , NULL, NULL},
1111 {VER, "Prev" , NS(Sq3LiteC_Prev) , NULL, NULL},
1112
1113// doc-key: Sq3LiteC,Sq3Lite,oco
1114 {VER, "DbStatusBFL" , NS(Sq3LiteC_DbStatusBFL) , NULL, NULL},
1115 {VER, "PrepareV2" , NS(Sq3LiteC_PrepareV2) , NULL, NULL},
1116
1117// doc-key: Sq3LiteC,Sq3Lite,om_
1118 {VER, "BusyTimeout" , NS(Sq3LiteC_BusyTimeout) , NULL, NULL},
1119 {VER, "Changes" , NS(Sq3LiteC_Changes) , NULL, NULL},
1120 {VER, "Changes64" , NS(Sq3LiteC_Changes64) , NULL, NULL},
1121 {VER, "CloseV2" , NS(Sq3LiteC_CloseV2) , NULL, NULL},
1122 {VER, "DbCacheflush" , NS(Sq3LiteC_DbCacheflush) , NULL, NULL},
1123 {VER, "DbFilename" , NS(Sq3LiteC_DbFilename) , NULL, NULL},
1124 {VER, "DbName" , NS(Sq3LiteC_DbName) , NULL, NULL},
1125 {VER, "DbReadonly" , NS(Sq3LiteC_DbReadonly) , NULL, NULL},
1126 {VER, "DbReleaseMemory" , NS(Sq3LiteC_DbReleaseMemory) , NULL, NULL},
1127 {VER, "DeclareVtab" , NS(Sq3LiteC_DeclareVtab) , NULL, NULL},
1128 {VER, "Deserialize" , NS(Sq3LiteC_Deserialize) , NULL, NULL},
1129 {VER, "DropModules" , NS(Sq3LiteC_DropModules) , NULL, NULL},
1130 {VER, "ErrCode" , NS(Sq3LiteC_ErrCode) , NULL, NULL},
1131 {VER, "ErrMsg" , NS(Sq3LiteC_ErrMsg) , NULL, NULL},
1132 {VER, "ErrorOffset" , NS(Sq3LiteC_ErrorOffset) , NULL, NULL},
1133 {VER, "Exec" , NS(Sq3LiteC_Exec) , NULL, NULL},
1134 {VER, "ExecV2" , NS(Sq3LiteC_ExecV2) , NULL, NULL},
1135 {VER, "ExtendedResultCodes" , NS(Sq3LiteC_ExtendedResultCodes) , NULL, NULL},
1136 {VER, "ExtendetErrCode" , NS(Sq3LiteC_ExtendetErrCode) , NULL, NULL},
1137 {VER, "GetAutocommit" , NS(Sq3LiteC_GetAutocommit) , NULL, NULL},
1138 // skip class-overload: Sq3LiteHandleGet → HandleGet, NS(Sq3LiteC_HandleGet)
1139 {VER, "Interrupt" , NS(Sq3LiteC_Interrupt) , NULL, NULL},
1140 {VER, "IsInterrupted" , NS(Sq3LiteC_IsInterrupted) , NULL, NULL},
1141 {VER, "LastInsertRowid" , NS(Sq3LiteC_LastInsertRowid) , NULL, NULL},
1142 {VER, "Limit" , NS(Sq3LiteC_Limit) , NULL, NULL},
1143 // skip class-overload: Sq3LiteLog → Log, NS(Sq3LiteC_Log)
1144 {VER, "OverloadFunction" , NS(Sq3LiteC_OverloadFunction) , NULL, NULL},
1145 {VER, "Serialize" , NS(Sq3LiteC_Serialize) , NULL, NULL},
1146 {VER, "SetLastInsertRowid" , NS(Sq3LiteC_SetLastInsertRowid) , NULL, NULL},
1147 {VER, "SystemErrno" , NS(Sq3LiteC_SystemErrno) , NULL, NULL},
1148 {VER, "TotalChanges" , NS(Sq3LiteC_TotalChanges) , NULL, NULL},
1149 {VER, "TotalChanges64" , NS(Sq3LiteC_TotalChanges64) , NULL, NULL},
1150 {VER, "TxnState" , NS(Sq3LiteC_TxnState) , NULL, NULL},
1151 {VER, "VtabOnConflict" , NS(Sq3LiteC_VtabOnConflict) , NULL, NULL},
1152 {VER, "WalAutocheckpoint" , NS(Sq3LiteC_WalAutocheckpoint) , NULL, NULL},
1153
1154// doc-key: Sq3LiteC,Sq3Lite,omo
1155 {VER, "DbStatus" , NS(Sq3LiteC_DbStatus) , NULL, NULL},
1156 {VER, "TableColumnMetadata" , NS(Sq3LiteC_TableColumnMetadata) , NULL, NULL},
1157 {VER, "WalCheckpointV2" , NS(Sq3LiteC_WalCheckpointV2) , NULL, NULL},
1158
1159// END-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theSq3Lite/c/gen/c_sq3lite.meta' - DO NOT change
1160 {0, NULL, NULL, NULL, NULL}
1161};
#define VER

◆ tclsq3lite_sOtClassDef

Tcl_MethodType tclsq3lite_sOtClassDef[]
static
Initial value:
= {
{VER, "OpenV2" , tclsq3lite_Sq3LiteC_OpenV2 , NULL, NULL},
{VER, "GetNull" , tclsq3lite_Sq3LiteC_GetNull , NULL, NULL},
{VER, "HandleResolve" , tclsq3lite_Sq3LiteC_HandleResolve , NULL, NULL},
{VER, "Instances" , tclsq3lite_Sq3LiteC_Instances , NULL, NULL},
{VER, "ErrStr" , tclsq3lite_Sq3LiteC_ErrStr , NULL, NULL},
{VER, "Sleep" , tclsq3lite_Sq3LiteC_Sleep , NULL, NULL},
{0, NULL, NULL, NULL}
}
static OT_ProcRet tclsq3lite_Sq3LiteC_HandleResolve(OtClass_ARGS)
Tcl: (static) Sq3LiteC [Sq3LiteC HandleResolve netHdl:MK_HDL] → C-API Handle-Resolve-Slot - retu...
static OT_ProcRet tclsq3lite_Sq3LiteC_Instances(OtClass_ARGS)
Tcl: (static) Sq3LiteC [Sq3LiteC Instances] → C-API get head-instance from linked-list of Sq3Lit...
static OT_ProcRet tclsq3lite_Sq3LiteC_GetNull(OtClass_ARGS)
Tcl: (static) Sq3LiteC [Sq3LiteC GetNull] → C-API Null-Slot - return a Sq3LiteC typed NULL insta...
static OT_ProcRet tclsq3lite_Sq3LiteC_ErrStr(OtClass_ARGS)
Tcl: (static) string [Sq3LiteC ErrStr arg0:int32] → C-API Error Codes And Messages …
static OT_ProcRet tclsq3lite_Sq3LiteC_Sleep(OtClass_ARGS)
Tcl: (static) Sq3LiteC Sleep arg0:int32 → C-API Suspend Execution For A Short Time …
static OT_ProcRet tclsq3lite_Sq3LiteC_OpenV2(OtClass_ARGS)
Tcl: (constructor,static) Sq3LiteC [Sq3LiteC OpenV2 filename:string ?flags:Sq3OpenEF={SQ3_OPEN_READWR...

Definition at line 1082 of file Sq3LiteC_tcl.c.

1082 {
1083// BEGIN-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theSq3Lite/c/gen/c_sq3lite.meta' - DO NOT change
1084
1085// doc-key: Sq3LiteC,Sq3Lite,sCo
1086 {VER, "OpenV2" , NS(Sq3LiteC_OpenV2) , NULL, NULL},
1087
1088// doc-key: Sq3LiteC,Sq3Lite,sc_
1089 {VER, "GetNull" , NS(Sq3LiteC_GetNull) , NULL, NULL},
1090 {VER, "HandleResolve" , NS(Sq3LiteC_HandleResolve) , NULL, NULL},
1091 {VER, "Instances" , NS(Sq3LiteC_Instances) , NULL, NULL},
1092
1093// doc-key: Sq3LiteC,Sq3Lite,sm_
1094 {VER, "ErrStr" , NS(Sq3LiteC_ErrStr) , NULL, NULL},
1095 {VER, "Sleep" , NS(Sq3LiteC_Sleep) , NULL, NULL},
1096
1097// END-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theSq3Lite/c/gen/c_sq3lite.meta' - DO NOT change
1098 {0, NULL, NULL, NULL}
1099};

◆ tclsq3lite_Sq3LiteC_MK_NULL

__thread OT_OBJ_T tclsq3lite_Sq3LiteC_MK_NULL = NULL

Definition at line 28 of file Sq3LiteC_tcl.c.