940718-1.c   [plain text]

extern double log (double) __attribute__ ((const));

f (double x)
{
  for (;;)
    exp(log(x));
}