Posted to tcl by CecilWesterhof at Tue Jul 31 08:34:24 GMT 2018view raw

  1. When executing:
  2. #!/usr/bin/env tclsh
  3.  
  4. puts [package require sqlite3]
  5. sqlite3 db :memory:
  6. set i [expr 1]
  7. set s [string trim { 1 }]
  8. puts [db eval {select $i < $s}]
  9.  
  10.  
  11. I get:
  12. 3.16.2
  13. 1
  14.  
  15.  
  16. But the last one is different interactively:
  17. $ puts [package require sqlite3]
  18. 3.16.2
  19. $ sqlite3 db :memory:
  20. $ set i [expr 1]
  21. 1
  22. $ set s [string trim { 1 }]
  23. 1
  24. $ puts [db eval {select $i < $s}]
  25. 0
  26.  

Comments

Posted by CecilWesterhof at Tue Jul 31 08:56:00 GMT 2018 [text] [code]

The problem is that I use ::tclreadline::Loop. When I remove this from my .tclshrc it works as expected.