Posted to tcl by aspect at Sat Feb 06 06:16:52 GMT 2016view pretty
package require sqlite3
sqlite3 db ""
set i [expr 1]
set s [string trim " 1 "]
puts [db eval {select $i < $s}]
# 1
package require sqlite3
sqlite3 db ""
set i [expr 1]
set s [string trim " 1 "]
puts [db eval {select $i < $s}]
# 1