mirror of
https://github.com/sqlite/sqlite.git
synced 2025-11-14 00:22:38 +03:00
96a206fa10
compiling with -DTCLSH_INIT_PROC=name to cause the TCL interpreter to be initialized using procedure name(). Both sqlite3_analyzer and testfixture are now built this way. FossilOrigin-Name: d65d1f297ddb07b799ff5b2e560575fc59a6fa74c752269cc85ab84348fb7da4
28 lines
726 B
C
28 lines
726 B
C
/*
|
|
** Read an SQLite database file and analyze its space utilization. Generate
|
|
** text on standard output.
|
|
*/
|
|
#define TCLSH_INIT_PROC sqlite3_analyzer_init_proc
|
|
#define SQLITE_ENABLE_DBSTAT_VTAB 1
|
|
#undef SQLITE_THREADSAFE
|
|
#define SQLITE_THREADSAFE 0
|
|
#undef SQLITE_ENABLE_COLUMN_METADATA
|
|
#define SQLITE_OMIT_DECLTYPE 1
|
|
#define SQLITE_OMIT_DEPRECATED 1
|
|
#define SQLITE_OMIT_PROGRESS_CALLBACK 1
|
|
#define SQLITE_OMIT_SHARED_CACHE 1
|
|
#define SQLITE_DEFAULT_MEMSTATUS 0
|
|
#define SQLITE_MAX_EXPR_DEPTH 0
|
|
#define SQLITE_OMIT_LOAD_EXTENSION 1
|
|
INCLUDE sqlite3.c
|
|
INCLUDE $ROOT/src/tclsqlite.c
|
|
|
|
const char *sqlite3_analyzer_init_proc(Tcl_Interp *interp){
|
|
(void)interp;
|
|
return
|
|
BEGIN_STRING
|
|
INCLUDE $ROOT/tool/spaceanal.tcl
|
|
END_STRING
|
|
;
|
|
}
|