Tcl Source Code

The glob command can accept many pattern arguments 
but the lsearch do not. As it is often interesting to 
search lists for several elements, this feature could be 
powerful:

lsearch ?switches? list pattern ?pattern...?

This syntax is totally compatible with the current lsearch 
command. It would provide a smart replacement for:

set newList {}
foreach pattern patternList {
   set result [lsearch ?switches? $list $pattern]
   set newList [concat $newList $pattern]
}

It would then be possible to easily find the common 
elements of 2 lists:

eval lsearch -all -inline [list $list1] $list2

or to delete list elements that are already in the second 
list:

eval lsearch -all -not -inline [list $list1] $list2


JM. Philippe