f7dfce4
diff -rup c/sysdeps/ieee754/dbl-64/slowexp.c d/sysdeps/ieee754/dbl-64/slowexp.c
f7dfce4
--- c/sysdeps/ieee754/dbl-64/slowexp.c	2012-05-20 19:47:38.000000000 -0600
f7dfce4
+++ d/sysdeps/ieee754/dbl-64/slowexp.c	2012-05-21 10:02:51.693957300 -0600
f7dfce4
@@ -30,6 +30,8 @@
4ad9348
 #include "mpa.h"
f7dfce4
 #include <math_private.h>
4ad9348
 
4ad9348
+#include <stap-probe.h>
4ad9348
+
4ad9348
 #ifndef SECTION
4ad9348
 # define SECTION
4ad9348
 #endif
f7dfce4
@@ -60,12 +62,21 @@ __slowexp(double x) {
4ad9348
   __sub(&mpy,&mpcor,&mpz,p);
4ad9348
   __mp_dbl(&mpw, &w, p);
4ad9348
   __mp_dbl(&mpz, &z, p);
4ad9348
-  if (w == z) return w;
4ad9348
+  if (w == z) {
4ad9348
+    /* Track how often we get to the slow exp code plus
4ad9348
+       its input/output values.  */
4ad9348
+    LIBC_PROBE (slowexp_p6, 2, &x, &w);
4ad9348
+    return w;
4ad9348
+  }
4ad9348
   else  {                   /* if calculating is not exactly   */
4ad9348
     p = 32;
4ad9348
     __dbl_mp(x,&mpx,p);
4ad9348
     __mpexp(&mpx, &mpy, p);
4ad9348
     __mp_dbl(&mpy, &res, p);
4ad9348
+ 
4ad9348
+    /* Track how often we get to the uber-slow exp code plus
4ad9348
+       its input/output values.  */
4ad9348
+    LIBC_PROBE (slowexp_p32, 2, &x, &res;;
4ad9348
     return res;
4ad9348
   }
4ad9348
 }
f7dfce4
diff -rup c/sysdeps/ieee754/dbl-64/slowpow.c d/sysdeps/ieee754/dbl-64/slowpow.c
f7dfce4
--- c/sysdeps/ieee754/dbl-64/slowpow.c	2012-05-20 19:47:38.000000000 -0600
f7dfce4
+++ d/sysdeps/ieee754/dbl-64/slowpow.c	2012-05-21 10:02:51.694957291 -0600
f7dfce4
@@ -34,6 +34,8 @@
4ad9348
 #include "mpa.h"
f7dfce4
 #include <math_private.h>
4ad9348
 
4ad9348
+#include <stap-probe.h>
4ad9348
+
4ad9348
 #ifndef SECTION
4ad9348
 # define SECTION
4ad9348
 #endif
f7dfce4
@@ -65,7 +67,12 @@ __slowpow(double x, double y, double z)
4ad9348
   __mp_dbl(&mpr, &res, p);
4ad9348
   __sub(&mpp,&eps,&mpr1,p);   /*  pp -eps =r1 */
4ad9348
   __mp_dbl(&mpr1, &res1, p);  /*  converting into double precision */
4ad9348
-  if (res == res1) return res;
4ad9348
+  if (res == res1) {
4ad9348
+    /* Track how often we get to the slow pow code plus
4ad9348
+       its input/output values.  */
4ad9348
+    LIBC_PROBE (slowpow_p6, 4, &x, &y, &z, &res;;
4ad9348
+    return res;
4ad9348
+  }
4ad9348
 
4ad9348
   p = 32;     /* if we get here result wasn't calculated exactly, continue */
4ad9348
   __dbl_mp(x,&mpx,p);                          /* for more exact calculation */
f7dfce4
@@ -75,5 +82,10 @@ __slowpow(double x, double y, double z)
4ad9348
   __mul(&mpy,&mpz,&mpw,p);  /* y*z =w    */
4ad9348
   __mpexp(&mpw, &mpp, p);   /* e^w=pp    */
4ad9348
   __mp_dbl(&mpp, &res, p);  /* converting into double precision */
4ad9348
+
4ad9348
+  /* Track how often we get to the uber-slow pow code plus
4ad9348
+     its input/output values.  */
4ad9348
+    LIBC_PROBE (slowpow_p32, 4, &x, &y, &z, &res;;
4ad9348
+
4ad9348
   return res;
4ad9348
 }