[Bese-devel] Re: New patches to fiveam: 30-Sep-2006

[Marco Baringer]

mbaringer at common-lisp.net (Marco Baringer) writes:

> Sat Sep 30 11:54:02 EDT 2006  attila.lendvai at gmail.com
>   * Added is-string=
>
>     M ./src/check.lisp +7
>     M ./src/packages.lisp +1

here i would prefer something like is-every:

(defmacro is-every (predicate &rest clauses)
  (loop
    for (expected actual &rest reason) in clauses
    collect `(is (,predicate ,expected ,actual) , at reason) into tests
    finally (return `(progn , at tests))))

and it'd be used like this:

(is-every string=
  ("a" (foo))
  ("b" (bar)))

i admit that's more verbose, but i don't really
like creating is-string= without creating is-string-equal, is-=,
is-char=, etc. and i don't really want a proliferation of is-FOO macro
(otherwise i would not have bothered with IS in the first place).

what do you think?

-- 
-Marco
Ring the bells that still can ring.
Forget your perfect offering.
There is a crack in everything.
That's how the light gets in.
	-Leonard Cohen