Support tcl procedure calls in run_dump_test xfail
[external/binutils.git] / ld / testsuite / ld-elf / pr23162b.c
1 static char *_edata_p;
2 static char *_end_p;
3 static char *__bss_start_p;
4 extern char *_end;
5 extern char *_edata;
6 extern char *__bss_start;
7
8 void
9 bar (void)
10 {
11   _edata_p = (char*) &_edata;
12   _end_p = (char*) &_end;
13   __bss_start_p = (char*) &__bss_start;
14 }
15
16 void
17 _start ()
18 {
19   bar ();
20 }