1
0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00

Fix sqlite3_analyzer so that it works when compiled against Tcl8.5. (CVS 3458)

FossilOrigin-Name: e774adce8e461a70ead9474cd64cb05c2d633eb9
This commit is contained in:
drh
2006-10-03 12:08:54 +00:00
parent f316c8c08b
commit 35c12830d1
3 changed files with 10 additions and 8 deletions

View File

@ -583,7 +583,9 @@ set user_percent [percent $user_payload $file_bytes]
# Output the summary statistics calculated above.
#
puts "/** Disk-Space Utilization Report For $file_to_analyze"
puts "*** As of [clock format [clock seconds] -format {%Y-%b-%d %H:%M:%S}]"
catch {
puts "*** As of [clock format [clock seconds] -format {%Y-%b-%d %H:%M:%S}]"
}
puts ""
statline {Page size in bytes} $pageSize
statline {Pages in the whole file (measured)} $file_pgcnt