This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
[RFA] printf (stderr,... ->fprintf_unfiltered (gdb_stderr,... in f-lang.c
- From: Pierre Muller <muller at cerbere dot u-strasbg dot fr>
- To: gdb-patches at sources dot redhat dot com
- Date: Wed, 24 Apr 2002 15:10:14 +0200
- Subject: [RFA] printf (stderr,... ->fprintf_unfiltered (gdb_stderr,... in f-lang.c
This is one of the files that I listed in
http://sources.redhat.com/ml/gdb/2002-02/msg00212.html
as still having direct uses of stderr.
There is not fortran maintainer :(
I will try to send other RFA soon.
ChangeLog entry:
2002-04-24 Pierre Muller <ics.u-strasbg.fr>
* f-lang.c (get_bf_for_fcn): Replace fprintf (stderr,...
with fprintf_unfiltered (gdb_stderr,....
Index: f-lang.c
===================================================================
RCS file: /cvs/src/src/gdb/f-lang.c,v
retrieving revision 1.9
diff -u -p -r1.9 f-lang.c
--- f-lang.c 13 Feb 2002 18:49:30 -0000 1.9
+++ f-lang.c 24 Apr 2002 12:41:17 -0000
@@ -904,7 +904,7 @@ get_bf_for_fcn (long the_function)
if (current_head_bf_list->symnum_fcn == the_function)
{
if (global_remote_debug)
- fprintf (stderr, "*");
+ fprintf_unfiltered (gdb_stderr, "*");
tmp = current_head_bf_list;
current_head_bf_list = current_head_bf_list->next;
@@ -916,7 +916,7 @@ get_bf_for_fcn (long the_function)
the ugly linear scan */
if (global_remote_debug)
- fprintf (stderr, "\ndefaulting to linear scan\n");
+ fprintf_unfiltered (gdb_stderr, "\ndefaulting to linear scan\n");
nprobes = 0;
tmp = saved_bf_list;
@@ -926,7 +926,7 @@ get_bf_for_fcn (long the_function)
if (tmp->symnum_fcn == the_function)
{
if (global_remote_debug)
- fprintf (stderr, "Found in %d probes\n", nprobes);
+ fprintf_unfiltered (gdb_stderr, "Found in %d probes\n", nprobes);
current_head_bf_list = tmp->next;
return (tmp->symnum_bf);
}
Pierre Muller
Institut Charles Sadron
6,rue Boussingault
F 67083 STRASBOURG CEDEX (France)
mailto:muller@ics.u-strasbg.fr
Phone : (33)-3-88-41-40-07 Fax : (33)-3-88-41-40-99