fixup! Add MintBurn tests

Add comment for the first test explaining that it doesn't test an
actual indexer.

marconi/test/MintBurn.hs

@@ -56,6 +56,8 @@ import Marconi.Indexers qualified as M
 import Marconi.Logging ()
 import RewindableIndex.Storable qualified as RI
 
+-- | Each test case is described beside every top level property
+-- declaration.
 tests :: TestTree
 tests = testGroup "MintBurn"
   [ testPropertyNamed "mintsPreserved" "mintsPreserved" mintsPreserved
@@ -65,7 +67,11 @@ tests = testGroup "MintBurn"
   , testPropertyNamed "endToEnd" "endToEnd" endToEnd
   ]
 
--- | Create a transaction that mints a value, convertit to a @Tx@
+-- | This is a sanity-check test that turns a TxBodyContent with mint
+-- events into a TxBody and checks if the mint events are found in the
+-- result. It doesn't test an indexer.
+--
+-- Create a transaction that mints a value, convertit to a @Tx@
 -- through `makeTransactionBody` and `signShelleyTransaction` and find
 -- that the minted assets are still there.
 mintsPreserved :: Property