aboutsummaryrefslogtreecommitdiff
path: root/gdb/f-typeprint.c
diff options
context:
space:
mode:
authorDavid Taylor <taylor@redhat.com>1998-12-31 21:58:30 +0000
committerDavid Taylor <taylor@redhat.com>1998-12-31 21:58:30 +0000
commit65b07ddca8832033e0e102c3a2a0d9f9f5922a9d (patch)
tree7fc8cee254f271f4cc57e64bcb23576fa121e706 /gdb/f-typeprint.c
parentc450a7fe3f5214f42118a04639074d0e3883582c (diff)
downloadfsf-binutils-gdb-65b07ddca8832033e0e102c3a2a0d9f9f5922a9d.zip
fsf-binutils-gdb-65b07ddca8832033e0e102c3a2a0d9f9f5922a9d.tar.gz
fsf-binutils-gdb-65b07ddca8832033e0e102c3a2a0d9f9f5922a9d.tar.bz2
all remaining *.c *.h files from hp merge.
Diffstat (limited to 'gdb/f-typeprint.c')
-rw-r--r--gdb/f-typeprint.c24
1 files changed, 13 insertions, 11 deletions
diff --git a/gdb/f-typeprint.c b/gdb/f-typeprint.c
index 4bca773..09bb3eb 100644
--- a/gdb/f-typeprint.c
+++ b/gdb/f-typeprint.c
@@ -40,17 +40,19 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
#include <errno.h>
#if 0 /* Currently unused */
-static void f_type_print_args PARAMS ((struct type *, FILE *));
+static void f_type_print_args PARAMS ((struct type *, GDB_FILE *));
#endif
-static void print_equivalent_f77_float_type PARAMS ((struct type *, FILE *));
+static void print_equivalent_f77_float_type PARAMS ((struct type *,
+ GDB_FILE *));
-static void f_type_print_varspec_suffix PARAMS ((struct type *, FILE *,
+static void f_type_print_varspec_suffix PARAMS ((struct type *, GDB_FILE *,
int, int, int));
-void f_type_print_varspec_prefix PARAMS ((struct type *, FILE *, int, int));
+void f_type_print_varspec_prefix PARAMS ((struct type *, GDB_FILE *,
+ int, int));
-void f_type_print_base PARAMS ((struct type *, FILE *, int, int));
+void f_type_print_base PARAMS ((struct type *, GDB_FILE *, int, int));
/* LEVEL is the depth to indent lines by. */
@@ -59,7 +61,7 @@ void
f_print_type (type, varstring, stream, show, level)
struct type *type;
char *varstring;
- FILE *stream;
+ GDB_FILE *stream;
int show;
int level;
{
@@ -102,7 +104,7 @@ f_print_type (type, varstring, stream, show, level)
void
f_type_print_varspec_prefix (type, stream, show, passed_a_ptr)
struct type *type;
- FILE *stream;
+ GDB_FILE *stream;
int show;
int passed_a_ptr;
{
@@ -160,7 +162,7 @@ f_type_print_varspec_prefix (type, stream, show, passed_a_ptr)
static void
f_type_print_args (type, stream)
struct type *type;
- FILE *stream;
+ GDB_FILE *stream;
{
int i;
struct type **args;
@@ -200,7 +202,7 @@ f_type_print_args (type, stream)
static void
f_type_print_varspec_suffix (type, stream, show, passed_a_ptr, demangled_args)
struct type *type;
- FILE *stream;
+ GDB_FILE *stream;
int show;
int passed_a_ptr;
int demangled_args;
@@ -312,7 +314,7 @@ f_type_print_varspec_suffix (type, stream, show, passed_a_ptr, demangled_args)
static void
print_equivalent_f77_float_type (type, stream)
struct type *type;
- FILE *stream;
+ GDB_FILE *stream;
{
/* Override type name "float" and make it the
appropriate real. XLC stupidly outputs -12 as a type
@@ -337,7 +339,7 @@ print_equivalent_f77_float_type (type, stream)
void
f_type_print_base (type, stream, show, level)
struct type *type;
- FILE *stream;
+ GDB_FILE *stream;
int show;
int level;
{