Test Trac #5281

testsuite/tests/rename/should_fail/T5281.hs

+-- The issue here is getting an error message with a decent source location
+module T5281 where
+
+x = catch   -- This use of catch 
+            -- (a) comes from the implicitly imported Prelue
+            -- (b) this Prelude.catch is deprecated
+
+

testsuite/tests/rename/should_fail/T5281.stderr

+
+T5281.hs:2:8:
+    Warning: In the use of `catch'
+             (imported from Prelude, but defined in System.IO.Error):
+             Deprecated: "Please use the new exceptions variant, Control.Exception.catch"

testsuite/tests/rename/should_fail/all.T

@@ -81,3 +81,4 @@ test('mc13', normal, compile_fail, [''])
 test('mc14', normal, compile_fail, [''])
 test('T5211', normal, compile, [''])  # Warnings only
 test('T1595a', normal, compile_fail, [''])
+test('T5281', normal, compile, [''])  # Warnings only