A page to collect useful [Sugar] macros.

This one was suggested by [Richard Suchenwirth] (but the implementation is mine ([SS]), so even possible bugs):

 sugar::macro inlist argv {
     if {[llength $argv] != 3} {error "Bad number of arguments"}
     list expr \
         "\{\[lsearch -exact [lindex $argv 1] [lindex $argv 2]\] != -1\}"
 }

This expands

 inlist $list $foo

in

 expr {[lsearch -exact $list $foo] != -1}

----