changeset 19291:27c3012475b2

(main) [__FreeBSD__ && PROFILING]: Add code for profiling.
author Richard M. Stallman <rms@gnu.org>
date Mon, 11 Aug 1997 01:38:02 +0000
parents 7fb99affa49a
children 06e026c6ba9e
files src/emacs.c
diffstat 1 files changed, 18 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/emacs.c	Mon Aug 11 01:18:29 1997 +0000
+++ b/src/emacs.c	Mon Aug 11 01:38:02 1997 +0000
@@ -1095,6 +1095,24 @@
 #endif
     }
 
+  /* Gerd Moellmann <gerd@acm.org> says this makes profiling work on
+     FreeBSD.  It might work on some other systems too.
+     Give it a try and tell me if it works on your system.  */
+#ifdef __FreeBSD__
+#ifdef PROFILING
+  if (initialized)
+    {
+      extern void _mcleanup ();       
+      extern char etext;
+      extern void clear_glyph_matrix ();
+      atexit (_mcleanup);
+      monstartup (clear_glyph_matrix, &etext);
+    }
+  else
+    moncontrol (0);
+#endif
+#endif
+
   initialized = 1;
 
 #ifdef LOCALTIME_CACHE