<div dir="ltr">Thanks all for the responses. I managed to put them all together and I [got it all to work](<a href="https://github.com/AmpersandTarski/Ampersand/blob/cefbc08ad8fb3152ce1a55dce5f6334cfc732d46/src/Ampersand/Test/Parser/QuickChecks.hs">https://github.com/AmpersandTarski/Ampersand/blob/cefbc08ad8fb3152ce1a55dce5f6334cfc732d46/src/Ampersand/Test/Parser/QuickChecks.hs</a>). <div><br></div><div>Cheers,</div><div>Han. </div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Op za 12 jun. 2021 om 13:28 schreef Henning Thielemann <<a href="mailto:lemming@henning-thielemann.de">lemming@henning-thielemann.de</a>>:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><br>
On Sat, 12 Jun 2021, Han Joosten wrote:<br>
<br>
> Thanks for this respons, Rubén. I might not have explained what I am looking for very well. I already have <br>
> instance Arbitrary Foo <br>
> That is not the problem. The problem is, that when a counterexample is found, it is dumped to the output with the `show` function.<br>
> I would like to be able to use another function for that, say show'. In order to do so, I need to obtain the counterexample itself<br>
> in some way, so I can use it to generate a useful message after the tests are done. <br>
<br>
<a href="https://hackage.haskell.org/package/QuickCheck-2.14.2/docs/Test-QuickCheck.html#v:forAllShow" rel="noreferrer" target="_blank">https://hackage.haskell.org/package/QuickCheck-2.14.2/docs/Test-QuickCheck.html#v:forAllShow</a></blockquote></div>