wolfg...@alle-noten.de writes:
> Now, for pl/tcl, I could use either
> create function check(text) returns text as $$
> set data {
> # the data value
> }
> foreach d $data {
># the work
> }
> $$ language pltcl;
> or
> create function check(text) returns text as $$
> if ![info exists
Hi,
suppose I want to create a tcl function that basically walks through a long
list and compares its
argument against all entries
In plain tcl I would probably write
set data {
# lots of stuff here
}
proc check val {
global data
foreach d $data {
# this does the work
}