[sqlite] is there a shorter way to get select results into an associative tcl array?

[dean gwilliam]

set lst [gDb eval "SELECT nm, itm_typ FROM std_nms;"]
array set cells {}
set r 0
set c 0
foreach {nm typ} $lst {
    set cells($r,$c) $nm
    incr c
    set cells($r,$c) $typ
    incr r
    set c [expr $c -1]
}
Any advice much appreciated
_______________________________________________
sqlite-users mailing list
sqlite-users@sqlite.org
http://sqlite.org:8080/cgi-bin/mailman/listinfo/sqlite-users