Tcl Library Source Code

cache::async 0.3 has a critical bug.
By running the following code

-----------------------------
package require cache::async

proc myDataFetcher args {  }

cache::async myDataProvider myDataFetcher
myDataProvider clear KEY
--------------------------------------------

.. an error is raised
  
errorInfo: can't read "arg": no such variable
    while executing
"llength $arg"
    (procedure "::cache::async::Snit_methodclear" line 18)
    invoked from within
"myDataProvider clear KEY"


Fixing the bug only requires to correct "arg" in "args".

I included a zip with all the updated files
- async.tcl     --  the main correction, and version changed to 0.3.1
- pkgIndex.tcl  --  version changed from 0.3 to 0.3.1
- async.test    --  added 2 testcases

ABU

And done with commit [5e257ddf79].

Thanks for that, and thanks for everybody's patience.
Currently running the entire test suite as the last check.
I do not expect to see issues, the small run just on the module was good, and I am not aware of dependent modules in Tcllib.

Assigning back the fix to Andreas for his review and approval.

Andrew Mangogna

I'm assigning this bug to myself. The submitter has included the fix, so it will be a matter of applying it.

Andrew Mangogna