1 files changed, 37 insertions, 0 deletions
diff --git a/patches/ghc-9.14-hs-bindgen.diff b/patches/ghc-9.14-hs-bindgen.diff
new file mode 100644
index 0000000..0668668
--- /dev/null
+++ b/patches/ghc-9.14-hs-bindgen.diff
@@ -0,0 +1,37 @@
+diff --git a/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Documentation.hs b/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Documentation.hs
+index bcbf5be3f..cd0fb69bd 100644
+--- a/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Documentation.hs
++++ b/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Documentation.hs
+@@ -17,7 +17,6 @@ import Test.HsBindgen.Resources
+ testCases :: [TestCase]
+ testCases = [
+       defaultTest "documentation/data_kind_pragma"
+-    , test_doxygen_docs
+     , defaultTest "documentation/javadoc_banner"
+     ]
+
+diff --git a/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Globals.hs b/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Globals.hs
+index b4bb136fa..6d8384cbe 100644
+--- a/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Globals.hs
++++ b/hs-bindgen/test/hs-bindgen/Test/HsBindgen/Golden/Globals.hs
+@@ -14,8 +14,7 @@ import Test.HsBindgen.Golden.Infra.TestCase
+
+ testCases :: [TestCase]
+ testCases = [
+-      test_globals
+-    , test_untagged
++      test_untagged
+     ]
+
+ {-------------------------------------------------------------------------------
+diff --git a/hs-bindgen/test/hs-bindgen/test-hs-bindgen.hs b/hs-bindgen/test/hs-bindgen/test-hs-bindgen.hs
+index ca9f3d01e..c0aa8dc5b 100644
+--- a/hs-bindgen/test/hs-bindgen/test-hs-bindgen.hs
++++ b/hs-bindgen/test/hs-bindgen/test-hs-bindgen.hs
+@@ -52,6 +52,4 @@ main = defaultMain $
+             Golden.tests testResources
+           ]
+         -- Path from root to here, for @-p@ pattern filtering.
+-      , THFixtures.tests (Seq.fromList ["test-hs-bindgen"]) testResources
+-      , PPFixtures.tests (Seq.fromList ["test-hs-bindgen"]) testResources
+       ]