add test for #2410

testsuite/tests/ghc-regress/profiling/should_compile/2410.hs

+{-# OPTIONS_GHC -fno-warn-missing-methods #-}
+module C where
+
+ data RealFloat a => Complex a = !a :+ !a
+     deriving (Eq, Show)
+
+ instance  (RealFloat a) => Num (Complex a)  where
+     {-# SPECIALISE instance Num (Complex Float) #-}
+     {-# SPECIALISE instance Num (Complex Double) #-}
+     (x :+ y) + (x' :+ y')   =  (x + x') :+ (y + y')

testsuite/tests/ghc-regress/profiling/should_compile/all.T

@@ -4,3 +4,5 @@
 test('prof001', compose(only_ways(['normal']), req_profiling), compile_and_run, ['-prof -caf-all'])
 test('prof002', compose(only_ways(['normal']), req_profiling), compile_and_run, ['-prof -caf-all'])
 
+test('2410', compose(only_ways(['normal']), req_profiling), compile, ['-O2 -prof -caf-all'])
+