Artifact 41f18fa39e0199f360ff6ee93bd1aa9e9f436291:
File
tools/tclfossil/lib/tf_db.tcl
part of check-in
[7f9c5ee722]
- tclfossil, starting with db_ commands
by
mjanssen on
2008-02-03 16:23:38.
0000: 70 61 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 package require
0010: 54 63 6c 20 38 2e 35 0a 70 61 63 6b 61 67 65 20 Tcl 8.5.package
0020: 72 65 71 75 69 72 65 20 73 71 6c 69 74 65 33 0a require sqlite3.
0030: 70 61 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 package require
0040: 73 6e 69 74 0a 0a 73 6e 69 74 3a 3a 74 79 70 65 snit..snit::type
0050: 20 3a 3a 76 63 3a 3a 66 6f 73 73 69 6c 3a 3a 64 ::vc::fossil::d
0060: 62 20 7b 0a 20 20 20 20 74 79 70 65 6d 65 74 68 b {. typemeth
0070: 6f 64 20 6f 70 65 6e 5f 72 65 70 6f 73 69 74 6f od open_reposito
0080: 72 79 20 7b 7b 6e 61 6d 65 20 7b 7d 7d 7d 20 7b ry {{name {}}} {
0090: 0a 20 20 20 20 7d 0a 7d 0a . }.}.