1  /* { dg-do compile } */
       2  /* { dg-options "-O2 -fdump-tree-tailc-details" } */
       3  /* PR tree-opt/37024 */
       4  
       5  double doubleValue();
       6  
       7  long
       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