83d72a091e
Initial check-in of openocd-0.7.0 as it can be downloaded from http://sourceforge.net/projects/openocd/files/openocd/0.7.0/ Any modifications will follow. Change-Id: I6949beaefd589e046395ea0cb80f4e1ab1654d55
11 lines
450 B
Tcl
11 lines
450 B
Tcl
package require sqlite3
|
|
|
|
set db [sqlite3.open :memory:]
|
|
$db query {CREATE TABLE plays (id, author, title)}
|
|
$db query {INSERT INTO plays (id, author, title) VALUES (1, 'Goethe', 'Faust');}
|
|
$db query {INSERT INTO plays (id, author, title) VALUES (2, 'Shakespeare', 'Hamlet');}
|
|
$db query {INSERT INTO plays (id, author, title) VALUES (3, 'Sophocles', 'Oedipus Rex');}
|
|
set res [$db query "SELECT * FROM plays"]
|
|
$db close
|
|
foreach r $res {puts $r(author)}
|