*** empty log message ***
authorthomas <thomas>
Fri, 6 Sep 1996 00:06:25 +0000 (00:06 +0000)
committerthomas <thomas>
Fri, 6 Sep 1996 00:06:25 +0000 (00:06 +0000)
Rules
gmon/Makefile
gmon/gmon.c
hurd/hurdinit.c
mach/Machrules

diff --git a/Rules b/Rules
index 507ec45..8984967 100644 (file)
--- a/Rules
+++ b/Rules
@@ -136,7 +136,8 @@ subdir_dist: dist
 
 # Convenient target to update all the generated source files.
 .PHONY: generated
-generated: $(addprefix $(common-objpfx),$(common-generated))
+generated: $(addprefix $(common-objpfx),$(common-generated)) \
+       $(addprefix $(objpfx),$(generated))
 
 ifndef libc.so-version
 # Undefine this because it can't work when we libc.so is unversioned.
index adf6c92..eff18ee 100644 (file)
@@ -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
 
index a356c4c..a450d11 100644 (file)
@@ -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));
index 7d946b8..df10b5d 100644 (file)
@@ -165,6 +165,7 @@ _hurd_setproc (process_t procserver)
 {
   error_t err;
   mach_port_t oldmsg;
+  extern char **__libc_argv;
 
   /* Give the proc server our message port.  */
   if (err = __proc_setmsgport (procserver, _hurd_msgport, &oldmsg))
@@ -175,8 +176,8 @@ _hurd_setproc (process_t procserver)
 
   /* Tell the proc server where our args and environment are.  */
   if (err = __proc_set_arg_locations (procserver,
-                                     /* We don't know the ARGV location.  */
-                                     (vm_address_t) 0,
+                                     _hide_arguments ? 0 :
+                                     (vm_address_t) __libc_argv,
                                      _hide_environment ? 0 :
                                      (vm_address_t) __environ))
     return err;
index 2cb3158..47b74aa 100644 (file)
@@ -149,14 +149,14 @@ $(objpfx)%.uh:; $(mig.uh)
 define mig.uh
 $(make-target-directory)
 $(include-%.defs) | \
-$(MIG) - /dev/null $(MIGFLAGS) $(user-MIGFLAGS) $(MIGFLAGS-$*) \
+$(MIG) - /dev/null $(MIGFLAGS) $(MIGFLAGS-$*) \
        -header $@ -server /dev/null -user /dev/null
 endef
 $(objpfx)%.__h:; $(mig.__h)
 define mig.__h
 $(make-target-directory)
 $(include-%.defs) | \
-$(MIG) - /dev/null $(MIGFLAGS) $(user-MIGFLAGS) $(MIGFLAGS-$*) -prefix __ \
+$(MIG) - /dev/null $(MIGFLAGS) $(MIGFLAGS-$*) -prefix __ \
        -header $@ -server /dev/null -user /dev/null
 endef