summary refs log tree commit diff
path: root/gmon
diff options
context:
space:
mode:
Diffstat (limited to 'gmon')
-rw-r--r--gmon/Makefile2
-rw-r--r--gmon/gmon.c23
2 files changed, 2 insertions, 23 deletions
diff --git a/gmon/Makefile b/gmon/Makefile
index adf6c92c1b..eff18ee029 100644
--- a/gmon/Makefile
+++ b/gmon/Makefile
@@ -23,7 +23,7 @@ subdir	:= gmon
 
 headers	:= sys/gmon.h sys/gmon_out.h
 distribute := machine-gmon.h profil-counter.h
-routines := gmon mcount profil bb_init_func bb_exit_func
+routines := gmon mcount profil bb_init_func bb_exit_func prof-freq
 
 include ../Rules
 
diff --git a/gmon/gmon.c b/gmon/gmon.c
index a356c4cc47..a450d11365 100644
--- a/gmon/gmon.c
+++ b/gmon/gmon.c
@@ -58,27 +58,6 @@ static int	s_scale;
 #define ERR(s) write(2, s, sizeof(s) - 1)
 
 /*
- * Discover the tick frequency of the machine if something goes wrong,
- * we return 0, an impossible hertz.
- */
-static int
-DEFUN_VOID(hertz)
-{
-  struct itimerval tim;
-
-  tim.it_interval.tv_sec = 0;
-  tim.it_interval.tv_usec = 1;
-  tim.it_value.tv_sec = 0;
-  tim.it_value.tv_usec = 0;
-  setitimer(ITIMER_REAL, &tim, 0);
-  setitimer(ITIMER_REAL, 0, &tim);
-  if (tim.it_interval.tv_usec < 2)
-    return 0;
-  return (1000000 / tim.it_interval.tv_usec);
-}
-
-
-/*
  * Control profiling
  *	profiling is what mcount checks to see if
  *	all the data structures are ready.
@@ -183,7 +162,7 @@ DEFUN(write_hist, (fd), int fd)
   if (_gmonparam.kcountsize > 0)
     {
       size = _gmonparam.kcountsize / sizeof(HISTCOUNTER);
-      rate = hertz();
+      rate = __profile_frequency();
       bcopy(&_gmonparam.lowpc, &thdr.low_pc, sizeof(thdr.low_pc));
       bcopy(&_gmonparam.highpc, &thdr.high_pc, sizeof(thdr.high_pc));
       bcopy(&size, &thdr.hist_size, sizeof(thdr.hist_size));