From e11ac7c1abfa0ad01e7b9d6c593e86b84bf462bb Mon Sep 17 00:00:00 2001
From: Jonathan Knowles <jonathan.knowles@iohk.io>
Date: Wed, 15 Mar 2023 07:15:11 +0000
Subject: [PATCH] Disable ambiguous field warnings in specific modules.

Tracking ticket: https://input-output.atlassian.net/browse/ADP-2841
---
 .../test/spec/Cardano/CoinSelection/BalanceSpec.hs             | 3 +++
 lib/wallet/api/http/Cardano/Wallet/Api/Http/Shelley/Server.hs  | 3 +++
 lib/wallet/src/Cardano/Wallet/DB/Pure/Implementation.hs        | 3 +++
 lib/wallet/src/Cardano/Wallet/Write/Tx/Balance.hs              | 3 +++
 lib/wallet/test/unit/Cardano/Pool/DB/Arbitrary.hs              | 3 +++
 lib/wallet/test/unit/Cardano/Wallet/DB/Properties.hs           | 3 +++
 lib/wallet/test/unit/Cardano/Wallet/Shelley/TransactionSpec.hs | 3 +++
 7 files changed, 21 insertions(+)

diff --git a/lib/coin-selection/test/spec/Cardano/CoinSelection/BalanceSpec.hs b/lib/coin-selection/test/spec/Cardano/CoinSelection/BalanceSpec.hs
index abf1c0b5409..acf12360236 100644
--- a/lib/coin-selection/test/spec/Cardano/CoinSelection/BalanceSpec.hs
+++ b/lib/coin-selection/test/spec/Cardano/CoinSelection/BalanceSpec.hs
@@ -15,6 +15,9 @@
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 {- HLINT ignore "Use camelCase" -}
 
+-- TODO: https://input-output.atlassian.net/browse/ADP-2841
+{-# OPTIONS_GHC -fno-warn-ambiguous-fields #-}
+
 module Cardano.CoinSelection.BalanceSpec
     ( spec
     , MockAssessTokenBundleSize
diff --git a/lib/wallet/api/http/Cardano/Wallet/Api/Http/Shelley/Server.hs b/lib/wallet/api/http/Cardano/Wallet/Api/Http/Shelley/Server.hs
index 18bed35c873..ee24e4103c5 100644
--- a/lib/wallet/api/http/Cardano/Wallet/Api/Http/Shelley/Server.hs
+++ b/lib/wallet/api/http/Cardano/Wallet/Api/Http/Shelley/Server.hs
@@ -20,6 +20,9 @@
 
 {-# HLINT ignore "Use record patterns" #-}
 
+-- TODO: https://input-output.atlassian.net/browse/ADP-2841
+{-# OPTIONS_GHC -fno-warn-ambiguous-fields #-}
+
 -- |
 -- Copyright: © 2018-2020 IOHK
 -- License: Apache-2.0
diff --git a/lib/wallet/src/Cardano/Wallet/DB/Pure/Implementation.hs b/lib/wallet/src/Cardano/Wallet/DB/Pure/Implementation.hs
index 07af66e2675..97f4c75883d 100644
--- a/lib/wallet/src/Cardano/Wallet/DB/Pure/Implementation.hs
+++ b/lib/wallet/src/Cardano/Wallet/DB/Pure/Implementation.hs
@@ -17,6 +17,9 @@
 {-# LANGUAGE TupleSections #-}
 {-# LANGUAGE UndecidableInstances #-}
 
+-- TODO: https://input-output.atlassian.net/browse/ADP-2841
+{-# OPTIONS_GHC -fno-warn-ambiguous-fields #-}
+
 -- |
 -- Copyright: © 2018-2020 IOHK
 -- License: Apache-2.0
diff --git a/lib/wallet/src/Cardano/Wallet/Write/Tx/Balance.hs b/lib/wallet/src/Cardano/Wallet/Write/Tx/Balance.hs
index 4f3db9343af..4467d1d550a 100644
--- a/lib/wallet/src/Cardano/Wallet/Write/Tx/Balance.hs
+++ b/lib/wallet/src/Cardano/Wallet/Write/Tx/Balance.hs
@@ -11,6 +11,9 @@
 
 {- HLINT ignore "Use ||" -}
 
+-- TODO: https://input-output.atlassian.net/browse/ADP-2841
+{-# OPTIONS_GHC -fno-warn-ambiguous-fields #-}
+
 module Cardano.Wallet.Write.Tx.Balance where
 
 import Prelude
diff --git a/lib/wallet/test/unit/Cardano/Pool/DB/Arbitrary.hs b/lib/wallet/test/unit/Cardano/Pool/DB/Arbitrary.hs
index 385741d6983..429e3dfc6db 100644
--- a/lib/wallet/test/unit/Cardano/Pool/DB/Arbitrary.hs
+++ b/lib/wallet/test/unit/Cardano/Pool/DB/Arbitrary.hs
@@ -8,6 +8,9 @@
 
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 
+-- TODO: https://input-output.atlassian.net/browse/ADP-2841
+{-# OPTIONS_GHC -fno-warn-ambiguous-fields #-}
+
 module Cardano.Pool.DB.Arbitrary
     ( MultiPoolCertificateSequence (..)
     , getMultiPoolCertificateSequence
diff --git a/lib/wallet/test/unit/Cardano/Wallet/DB/Properties.hs b/lib/wallet/test/unit/Cardano/Wallet/DB/Properties.hs
index 608d2b6e114..43215017dd6 100644
--- a/lib/wallet/test/unit/Cardano/Wallet/DB/Properties.hs
+++ b/lib/wallet/test/unit/Cardano/Wallet/DB/Properties.hs
@@ -16,6 +16,9 @@
 
 {-# OPTIONS_GHC -fno-warn-unused-imports #-}
 
+-- TODO: https://input-output.atlassian.net/browse/ADP-2841
+{-# OPTIONS_GHC -fno-warn-ambiguous-fields #-}
+
 module Cardano.Wallet.DB.Properties
     ( properties
     ) where
diff --git a/lib/wallet/test/unit/Cardano/Wallet/Shelley/TransactionSpec.hs b/lib/wallet/test/unit/Cardano/Wallet/Shelley/TransactionSpec.hs
index 9a49a361d6c..ac6460400e7 100644
--- a/lib/wallet/test/unit/Cardano/Wallet/Shelley/TransactionSpec.hs
+++ b/lib/wallet/test/unit/Cardano/Wallet/Shelley/TransactionSpec.hs
@@ -24,6 +24,9 @@
 
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 
+-- TODO: https://input-output.atlassian.net/browse/ADP-2841
+{-# OPTIONS_GHC -fno-warn-ambiguous-fields #-}
+
 module Cardano.Wallet.Shelley.TransactionSpec (spec) where
 
 import Prelude