1 files changed, 17 insertions, 0 deletions
diff --git a/testsuite/tests/backpack/should_fail/T13323.bkp b/testsuite/tests/backpack/should_fail/T13323.bkp
new file mode 100644
index 0000000000..70a1ccf89c
--- /dev/null
+++ b/testsuite/tests/backpack/should_fail/T13323.bkp
@@ -0,0 +1,17 @@
+{-# LANGUAGE DuplicateRecordFields #-}
+unit p where
+    signature A where
+        data A = A { foo :: Int }
+        data B = B { foo :: Bool }
+    module P where
+        import A
+        x :: A -> Int
+        x = foo
+unit q where
+    module A where
+        data A = A { foo :: Int }
+        data B = B { foo :: Bool }
+unit r where
+    dependency p[A=q:A]
+    module R where
+        import P