aboutsummaryrefslogtreecommitdiff
path: root/csu/gmon-start.c
diff options
context:
space:
mode:
authorRoland McGrath <roland@gnu.org>1996-01-17 02:29:57 +0000
committerRoland McGrath <roland@gnu.org>1996-01-17 02:29:57 +0000
commit5f3d5c2bbb4757e9cc5b30bc66b1d7555739bc4a (patch)
tree57d9fa3f28869526d8a1482982bc01cefdacbcb6 /csu/gmon-start.c
parentd99d7e264430e26e9070b4908a6e81103aa92747 (diff)
downloadglibc-5f3d5c2bbb4757e9cc5b30bc66b1d7555739bc4a.zip
glibc-5f3d5c2bbb4757e9cc5b30bc66b1d7555739bc4a.tar.gz
glibc-5f3d5c2bbb4757e9cc5b30bc66b1d7555739bc4a.tar.bz2
* csu/initfini.c (_init): Call __gmon_start__ if defined (weak ref).
* csu/gmon-start.c (__gmon_start__): Renamed from gmon_start, made global. [! HAVE_INITFINI]: Only make it a constructor in this case.
Diffstat (limited to 'csu/gmon-start.c')
-rw-r--r--csu/gmon-start.c16
1 files changed, 12 insertions, 4 deletions
diff --git a/csu/gmon-start.c b/csu/gmon-start.c
index c9d51b1..2ebbbf1 100644
--- a/csu/gmon-start.c
+++ b/csu/gmon-start.c
@@ -1,5 +1,5 @@
/* Code to enable profiling at program startup.
-Copyright (C) 1995 Free Software Foundation, Inc.
+Copyright (C) 1995, 1996 Free Software Foundation, Inc.
This file is part of the GNU C Library.
The GNU C Library is free software; you can redistribute it and/or
@@ -30,12 +30,20 @@ extern void _start (), etext ();
extern void monstartup (u_long, u_long);
extern void _mcleanup (void);
+#ifndef HAVE_INITFINI
/* This function gets called at startup by the normal constructor
mechanism. We link this file together with start.o to produce gcrt1.o,
so this constructor will be first in the list. */
-static void gmon_start (void) __attribute__ ((constructor));
-static void
-gmon_start (void)
+
+void __gmon_start__ (void) __attribute__ ((constructor));
+#else
+/* In ELF and COFF, we cannot use the normal constructor mechanism to call
+ __gmon_start__ because gcrt1.o appears before crtbegin.o in the link.
+ Instead crti.o calls it specially (see initfini.c). */
+#endif
+
+void
+__gmon_start__ (void)
{
/* Start keeping profiling records. */
monstartup ((u_long) &_start, (u_long) &etext);