1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/tests/deSugar/should_compile/T13290.hs b/testsuite/tests/deSugar/should_compile/T13290.hs
new file mode 100644
index 0000000000..9c722258bd
--- /dev/null
+++ b/testsuite/tests/deSugar/should_compile/T13290.hs
@@ -0,0 +1,7 @@
+module T13290 where
+
+data Foo = Bar Int Char | Baz Char
+
+{-# RULES
+"BarBaz" Bar 0 'a' = Baz 'b'
+ #-}