Bugs item #1471885, was opened at 2006-04-17 11:32
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=112883&aid=1471885&group_id=12883

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: snit
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Nobody/Anonymous (nobody)
Assigned to: Will Duquette (duquette)
Summary: snit2.tcl - faulty "in" keyword

Initial Comment:
Don't know what the deal is..


-@- -) tclsh
% info tclversion
8.5
% info patchlevel
8.5a2
% package require snit
2.0
% snit::type dog { }
syntax error in expression "$name in $arglist": extra 
tokens at end of expression


So I look in the source and find
    if {$name in $arglist} {
replace it with
    if {[lsearch $arglist $name] != 1} {
and recompile which fixes that 'bug'.


-@- -) tclsh
...
% snit::type dog { }
::dog
% snit::type dog {option -color brown}
syntax error in expression "$option in $compile
(delegatedoptions)": extra tokens at end of expression


So I find all instances of:
    if {X in Y} {
replace them with
    if {[lsearch Y X] != 1} {
and recompile to fix.


But what gives? I can't find "X in Y" used anywhere 
else in tcllib, and the only clue I have is the "in" 
procedure for xifo objects.

Dylan.

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=112883&aid=1471885&group_id=12883


-------------------------------------------------------
This SF.Net email is sponsored by xPML, a groundbreaking scripting language
that extends applications into web and mobile media. Attend the live webcast
and join the prime developer group breaking into this new coding territory!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=110944&bid=241720&dat=121642
_______________________________________________
Tcllib-bugs mailing list
Tcllib-bugs@[...].net
https://lists.sourceforge.net/lists/listinfo/tcllib-bugs