Re: test-is reporting problem

2009-01-16 Thread Stuart Sierra
On Jan 16, 11:02 am, Stuart Sierra wrote: > Fixed now, SVN rev. 377.  I've temporarily abandoned the fancier error > reporting I had for functional predicates.  I'm going to try to > restore that without breaking anything else. :) Ok, I figured out how to do it. Now (rev. 380) you get nice erro

Re: test-is reporting problem

2009-01-16 Thread Stuart Sierra
Hello, fellow Stuarts, and others, Fixed now, SVN rev. 377. I've temporarily abandoned the fancier error reporting I had for functional predicates. I'm going to try to restore that without breaking anything else. :) Peace, love, and happy testing, -Stuart Sierra On Jan 16, 7:54 am, Stuart Ha

Re: test-is reporting problem

2009-01-16 Thread Stuart Halloway
S. Sierra, Here is a good test case. It would be nice if the Java interop form worked, without having to be wrapped in an anonymous function. user=> (use 'clojure.contrib.test-is) nil user=> (.startsWith "abc" "a") true user=> (is (.startsWith "abc" "a")) java.lang.Exception: Unable to resolve

Re: test-is reporting problem

2009-01-15 Thread Stu Hood
You do that. -another Stuart On Thu, Jan 15, 2009 at 10:32 PM, Stuart Sierra wrote: > > I was afraid that would happen. I'll fix it, probably tomorrow. > -the other Stuart > > On Jan 15, 6:27 pm, Stuart Halloway wrote: > > The improved error reposting in test-is breaks some tests, e.g. from >

Re: test-is reporting problem

2009-01-15 Thread Stuart Sierra
I was afraid that would happen. I'll fix it, probably tomorrow. -the other Stuart On Jan 15, 6:27 pm, Stuart Halloway wrote: > The improved error reposting in test-is breaks some tests, e.g. from   > the book: > > (deftest test-lazy-index-of-any-with-match >   (is (with-out-str (is (zero? (inde

test-is reporting problem

2009-01-15 Thread Stuart Halloway
The improved error reposting in test-is breaks some tests, e.g. from the book: (deftest test-lazy-index-of-any-with-match (is (with-out-str (is (zero? (index-of-any "zzabyycdxx" #{\z \a} "Iterating overz\n") (is (with-out-str (is (= 3 (index-of-any "zzabyycdxx" #{\b \y}