diff --git a/testsuite/tests/typecheck/should_fail/T9858c.hs b/testsuite/tests/typecheck/should_fail/T9858d.hs
similarity index 90%
rename from testsuite/tests/typecheck/should_fail/T9858c.hs
rename to testsuite/tests/typecheck/should_fail/T9858d.hs
index 116a50b75ca3e6dc44cf1031ae22c70d61576fbd..dedd71c7af5077bcf5c16fbffa24f15de001e3aa 100644
--- a/testsuite/tests/typecheck/should_fail/T9858c.hs
+++ b/testsuite/tests/typecheck/should_fail/T9858d.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE ImpredicativeTypes, FlexibleContexts #-}
 
-module T9858b where
+module T9858d where
 import Data.Typeable
 
 i :: (Typeable a, Typeable b) => Proxy (a b) -> TypeRep
diff --git a/testsuite/tests/typecheck/should_fail/T9858c.stderr b/testsuite/tests/typecheck/should_fail/T9858d.stderr
similarity index 94%
rename from testsuite/tests/typecheck/should_fail/T9858c.stderr
rename to testsuite/tests/typecheck/should_fail/T9858d.stderr
index c2d0f22f659e7d58bb3196d895f5596abd9c6251..9bc62f7a9a94939d9de9e56c158bef3452551734 100644
--- a/testsuite/tests/typecheck/should_fail/T9858c.stderr
+++ b/testsuite/tests/typecheck/should_fail/T9858d.stderr
@@ -1,5 +1,5 @@
 
-T9858c.hs:9:8: error:
+T9858d.hs:9:8: error:
     Couldn't match type ‘Eq Int => Int’ with ‘a0 b0’
     Expected type: Proxy (a0 b0)
       Actual type: Proxy (Eq Int => Int)
diff --git a/testsuite/tests/typecheck/should_fail/all.T b/testsuite/tests/typecheck/should_fail/all.T
index befe8e367dd233fb08c2da63b68035ba22c157c7..57569b9c11c2d2e97f85da44740bebfdb161f08c 100644
--- a/testsuite/tests/typecheck/should_fail/all.T
+++ b/testsuite/tests/typecheck/should_fail/all.T
@@ -358,4 +358,4 @@ test('T10194', normal, compile_fail, [''])
 test('T8030', normal, compile_fail, [''])
 test('T9858a', normal, compile_fail, [''])
 test('T9858b', normal, compile_fail, [''])
-test('T9858c', normal, compile_fail, [''])
+test('T9858d', normal, compile_fail, [''])