From: Andreas K. <and...@ac...> - 2015-05-11 17:03:44
|
Thank you for the report. Please report this at the ticket system at https://core.tcl.tk/tcllib/tktnew An anon login is enough to be allowed to make tickets. Looking at the history of the file, at https://core.tcl.tk/tcllib/finfo?name=modules/fileutil/fileutil.tcl&ci=4dc136d4389178dc only the top 4 changes were made after 1.16 (Feb 11, 2014) was released. Right now I suspect the top-most, last change, because it is the only one directly reworking "find" a bit. This "/sys/devices" directory, is that a special filesystem on linux ? Or some other platform ? On Sat, May 9, 2015 at 6:43 AM, Frank Storm <Fra...@gm...> wrote: > Hi, > > I'm using the fileutil::find command to search for certain USB devices > under /sys/devices. This still worked fine in tcllib 1.16. However, the > functions hangs (endless loop?) in tcllib 1.17. > Here is a small test program: > > --- snip --- > > package require fileutil > > > proc IsIdVendorFile {fileName} { > > return [string equal idVendor $fileName] > } > > > foreach vendorIdFileName [fileutil::find /sys/devices IsIdVendorFile] { > puts $vendorIdFileName > } > > --- snip --- > > I did not check the find command for other trees. As the function is > also a bit more complex, I also did not start any debugging ;-) > > > Best regards, > Frank > > > > ------------------------------------------------------------------------------ > One dashboard for servers and applications across Physical-Virtual-Cloud > Widest out-of-the-box monitoring support with 50+ applications > Performance metrics, stats and reports that give you Actionable Insights > Deep dive visibility with transaction tracing using APM Insight. > http://ad.doubleclick.net/ddm/clk/290420510;117567292;y > _______________________________________________ > Tcllib-devel mailing list > Tcl...@li... > https://lists.sourceforge.net/lists/listinfo/tcllib-devel -- % Tcl'2015 Oct 19-23 = http://www.tcl.tk/community/tcl2015/cfp.html % EuroTcl'15 June 20-21 = http://www.eurotcl.tcl3d.org/ Andreas Kupries Senior Tcl Developer Code to Cloud: Smarter, Safer, Faster™ F: 778.786.1133 and...@ac..., http://www.activestate.com Learn about Stackato for Private PaaS: http://www.activestate.com/stackato |