On 30.07.2024 21:51, Tomas Volf wrote:
> Hello,
>
> I think I found a bug in (srfi srfi-64) module shipped with GNU Guile.
>
> The specification says that test-eqv is equivalent to:
>
>> (test-assert [test-name] (eqv? expected test-expr))
> Hence the test-assert's requirement to evaluate test-name only once applies.
>
> However the test-name is evaluated multiple times:
>
> (use-modules (srfi srfi-64))
> (test-begin "x")
> (test-eqv (pk "t") #t #t)
>
> Leading to:
>
> ;;; ("t")
>
> ;;; ("t")
>
> Have a nice day
> Tomas Volf
>
>
Same exact deal as in bug reports 72372 and 72373.
Affected line is 768 this time.
Already fixed in my implementation.
- Taylan
