Add Gen module

cardano-foundation · May 3, 2024 · 13ccf9b · 13ccf9b
1 parent 86d5119
commit 13ccf9b
Show file tree

Hide file tree

Showing 2 changed files with 27 additions and 1 deletion.
diff --git a/lib/balance-tx/cardano-balance-tx.cabal b/lib/balance-tx/cardano-balance-tx.cabal
@@ -96,7 +96,7 @@ library internal
     Internal.Cardano.Write.Tx.Sign
     Internal.Cardano.Write.Tx.SizeEstimation
     Internal.Cardano.Write.Tx.TimeTranslation
-    Internal.Cardano.Write.Tx.TxWithUTxO
+    Internal.Cardano.Write.Tx.TxWithUTxO.Gen
     Internal.Cardano.Write.UTxOAssumptions
 
 test-suite test

diff --git a/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx/TxWithUTxO/Gen.hs b/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx/TxWithUTxO/Gen.hs
@@ -0,0 +1,26 @@
+{-# LANGUAGE ExplicitNamespaces #-}
+
+-- |
+-- Copyright: © 2024 Cardano Foundation
+-- License: Apache-2.0
+--
+-- Provides generators and shrinkers for the 'TxWithUTxO' data type.
+--
+module Internal.Cardano.Write.Tx.TxWithUTxO.Gen
+    ( genTxWithUTxO
+    )
+    where
+
+import Prelude
+
+import Internal.Cardano.Write.Tx.TxWithUTxO
+    ( type TxWithUTxO
+    )
+import Test.QuickCheck
+    ( Gen
+    )
+
+--import qualified Internal.Cardano.Write.Tx.TxWithUTxO as TxWithUTxO
+
+genTxWithUTxO :: Gen (TxWithUTxO era)
+genTxWithUTxO = undefined