mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-27 20:41:58 +03:00
Changes to reduce the heap space consumed by triggers, views and tables in the in-memory representation of the schema. Also to reduce the space used by prepared statements slightly. (CVS 6305)
FossilOrigin-Name: d9f6ffbc5ea090ba0daac571fc9a6c68b9c864e4
This commit is contained in:
@ -11,7 +11,7 @@
|
||||
# This file implements some common TCL routines used for regression
|
||||
# testing the SQLite library
|
||||
#
|
||||
# $Id: tester.tcl,v 1.139 2009/02/05 16:31:46 drh Exp $
|
||||
# $Id: tester.tcl,v 1.140 2009/02/19 14:39:25 danielk1977 Exp $
|
||||
|
||||
#
|
||||
# What for user input before continuing. This gives an opportunity
|
||||
@ -895,16 +895,16 @@ proc memdebug_log_sql {{filename mallocs.sql}} {
|
||||
|
||||
set database temp
|
||||
|
||||
set tbl "CREATE TABLE ${database}.malloc(nCall, nByte"
|
||||
for {set ii 1} {$ii <= $nFrame} {incr ii} {
|
||||
append tbl ", f${ii}"
|
||||
}
|
||||
append tbl ");\n"
|
||||
set tbl "CREATE TABLE ${database}.malloc(zTest, nCall, nByte, lStack);"
|
||||
|
||||
set sql ""
|
||||
foreach e $data {
|
||||
append sql "INSERT INTO ${database}.malloc VALUES([join $e ,]);\n"
|
||||
foreach f [lrange $e 2 end] {
|
||||
set nCall [lindex $e 0]
|
||||
set nByte [lindex $e 1]
|
||||
set lStack [lrange $e 2 end]
|
||||
append sql "INSERT INTO ${database}.malloc VALUES"
|
||||
append sql "('test', $nCall, $nByte, '$lStack');\n"
|
||||
foreach f $lStack {
|
||||
set frames($f) 1
|
||||
}
|
||||
}
|
||||
|
Reference in New Issue
Block a user