Horrid abuse of scope
Posted to
tcl
by bairui at Fri Feb 01 00:31:12 GMT 2019
view raw
proc
as_dict {query} {
uplevel
1 db
eval
[
list
$query
res {
lappend
results [
dict
remove [
array
get res] *]
}]
return
[
uplevel
set results]
}
Recent Posts
tcl by kevin_walzer
4 days ago
tcl by rmax
6 days ago
tcl by emiliano
7 days ago
tcl by apn
9 days ago
tcl by dandyn
14 days ago
tcl by dandyn
14 days ago
tcl by stevel
15 days ago
openbsd by Bradipo
27 days ago
tcl by stevel
30 days ago
tcl by prep
39 days ago
Submit
New paste
Documentation
From Jabber