gdb/
[binutils-gdb.git] / gdb / f-lang.h
index b98c556ddcdedc57c02f18e954ce267aa1142ab2..f5bb82d7ed8114d08872be9429d8edf81df9b0e1 100644 (file)
@@ -25,11 +25,12 @@ extern int f_parse (void);
 
 extern void f_error (char *);  /* Defined in f-exp.y */
 
-extern void f_print_type (struct type *, char *, struct ui_file *, int,
+extern void f_print_type (struct type *, const char *, struct ui_file *, int,
                          int);
 
 extern int f_val_print (struct type *, const gdb_byte *, int, CORE_ADDR,
                        struct ui_file *, int,
+                       const struct value *,
                        const struct value_print_options *);
 
 /* Language-specific data structures */
@@ -113,6 +114,7 @@ struct builtin_f_type
   struct type *builtin_logical;
   struct type *builtin_logical_s1;
   struct type *builtin_logical_s2;
+  struct type *builtin_logical_s8;
   struct type *builtin_real;
   struct type *builtin_real_s8;
   struct type *builtin_real_s16;