Lines Matching refs:db1
26 # Then extract the database into the $::db1 variable.
27 # Verify that the size of $::db1 is the same as the size of
30 unset -nocomplain db1
40 set ::db1 [db serialize]
41 expr {[string length $::db1]==$::sz1}
43 set fd [open db1.db wb]
44 puts -nonewline $fd $db1
47 # Create a new MEMDB and initialize it to the content of $::db1
52 db deserialize $db1
76 catch {db deserialize -unknown 1 $db1} msg
80 db deserialize -readonly 1 $db1
89 db deserialize -maxsize 32768 $db1