gcc/testsuite/gdc.dg/builtins.d

   1 // { dg-do compile }
   2 // { dg-options "-fdump-tree-original" }
   3
   4 // { dg-final { scan-tree-dump " __builtin_sqrt " "original" } }
   5 extern(C) double sqrt(double);
   6 double test_sqrt(double a) { return sqrt(a); }
   7
   8 // { dg-final { scan-tree-dump-not " __builtin_tan " "original" } }
   9 pragma(mangle, "tan")
  10 extern(C) double libc_tan(double);
  11 double test_tan(double a) { return libc_tan(a); }
  12
  13 // { dg-final { scan-tree-dump " __builtin_malloc " "original" } }
  14 // { dg-final { scan-assembler "mangle_override" } }
  15 pragma(mangle, "mangle_override")
  16 extern(C) void *malloc(size_t);
  17 void* test_malloc(size_t a) { return malloc(a); }