1 /* { dg-do compile } */
2 /* { dg-options "-O2 -fdump-tree-tailc-details" } */
3 /* PR tree-opt/37024 */
4 
5 double doubleValue();
6 
7 long
longValue()8 longValue ()
9 {
10  return (long) doubleValue ();
11 }
12 
13 /* We should not tail call doubleValue in longValue as the mode changes. */
14 /* { dg-final { scan-tree-dump-times "Found tail call" 0 "tailc"} } */
15 
16