1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr
new file mode 100644
index 0000000000..38d9616489
--- /dev/null
+++ b/testsuite/tests/parser/should_fail/RecordDotSyntaxFail10.stderr
@@ -0,0 +1,13 @@
+RecordDotSyntaxFail10.hs:40:11:
+     Couldn't match type ‘Int’ with ‘[Char]’
+        arising from a functional dependency between:
+          constraint ‘HasField "quux" Quux String’
+            arising from a use of ‘setField’
+          instance ‘HasField "quux" Quux Int’
+            at RecordDotSyntaxFail10.hs:34:10-33
+     In the second argument of ‘($)’, namely ‘a {foo.bar.baz.quux}’
+      In a stmt of a 'do' block: print $ a {foo.bar.baz.quux}
+      In the expression:
+        do let a = ...
+           let quux = "Expecto patronum!"
+           print $ a {foo.bar.baz.quux}