1 files changed, 14 insertions, 0 deletions
diff --git a/tests/purs/passing/3595.purs b/tests/purs/passing/3595.purs
new file mode 100644
index 0000000..f5c7941
--- /dev/null
+++ b/tests/purs/passing/3595.purs
@@ -0,0 +1,14 @@
+module Main where
+
+import Prelude as P
+import Effect (Effect)
+import Effect.Console (log)
+
+class P.Show a <= Show a where
+  id :: a -> a
+
+instance showString :: Show String where
+  id x = x
+
+main :: Effect P.Unit
+main = log (id "Done")