diff options
author | David Taylor <taylor@redhat.com> | 1998-12-31 21:58:30 +0000 |
---|---|---|
committer | David Taylor <taylor@redhat.com> | 1998-12-31 21:58:30 +0000 |
commit | 65b07ddca8832033e0e102c3a2a0d9f9f5922a9d (patch) | |
tree | 7fc8cee254f271f4cc57e64bcb23576fa121e706 /gdb/gdbtk.c | |
parent | c450a7fe3f5214f42118a04639074d0e3883582c (diff) | |
download | binutils-gdb-65b07ddca8832033e0e102c3a2a0d9f9f5922a9d.tar.gz |
all remaining *.c *.h files from hp merge.
Diffstat (limited to 'gdb/gdbtk.c')
-rw-r--r-- | gdb/gdbtk.c | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/gdb/gdbtk.c b/gdb/gdbtk.c index 1ebf9029c3d..a15eccb1489 100644 --- a/gdb/gdbtk.c +++ b/gdb/gdbtk.c @@ -99,7 +99,7 @@ int gdbtk_test PARAMS ((char *)); * way errors will go to stdout. */ -extern void gdbtk_fputs PARAMS ((const char *, FILE *)); +extern void gdbtk_fputs PARAMS ((const char *, GDB_FILE *)); /* Handle for TCL interpreter */ Tcl_Interp *gdbtk_interp = NULL; @@ -569,14 +569,17 @@ gdbtk_find_main"; fputs_unfiltered_hook = NULL; /* Force errors to stdout/stderr */ if (getenv("GDBTK_LIBRARY")) { - fprintf_unfiltered (stderr, "Unable to find main.tcl in %s\n",getenv("GDBTK_LIBRARY")); - fprintf_unfiltered (stderr, + fprintf_unfiltered (gdb_stderr, "Unable to find main.tcl in %s\n", + getenv("GDBTK_LIBRARY")); + fprintf_unfiltered (gdb_stderr, "Please set GDBTK_LIBRARY to a path that includes the GDB tcl files.\n"); } else { - fprintf_unfiltered (stderr, "Unable to find main.tcl in %s\n", GDBTK_LIBRARY); - fprintf_unfiltered (stderr, "You might want to set GDBTK_LIBRARY\n"); + fprintf_unfiltered (gdb_stderr, + "Unable to find main.tcl in %s\n", GDBTK_LIBRARY); + fprintf_unfiltered (gdb_stderr, + "You might want to set GDBTK_LIBRARY\n"); } error(""); } |