* gc++filt.m4: New file.

[deliverable/binutils-gdb.git] / gdb / language.h

diff --git a/gdb/language.h b/gdb/language.h
index 8bdc212a81df331fdb6a9d61204ccb5cbd38d351..aa0523b4899b51ecab8ef7ab7f1d43cbee1f2ac8 100644 (file)
--- a/gdb/language.h
+++ b/gdb/language.h
@@ -1,7 +1,7 @@
 /* Source-language-related definitions for GDB.
 
    Copyright (C) 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2000, 2003, 2004,
 /* Source-language-related definitions for GDB.
 
    Copyright (C) 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2000, 2003, 2004,

-   2007, 2008 Free Software Foundation, Inc.
+   2007, 2008, 2009, 2010 Free Software Foundation, Inc.

 
    Contributed by the Department of Computer Science at the State University
    of New York at Buffalo.
 
    Contributed by the Department of Computer Science at the State University
    of New York at Buffalo.


@@ -30,14 +30,7 @@ struct objfile;
 struct frame_info;
 struct expression;
 struct ui_file;
 struct frame_info;
 struct expression;
 struct ui_file;

-
-/* This used to be included to configure GDB for one or more specific
-   languages.  Now it is left out to configure for all of them.  FIXME.  */
-/* #include "lang_def.h" */
-#define        _LANG_c
-#define        _LANG_m2
-#define  _LANG_fortran
-#define  _LANG_pascal
+struct value_print_options;

 
 #define MAX_FORTRAN_DIMS  7    /* Maximum number of F77 array dims */
 
 
 #define MAX_FORTRAN_DIMS  7    /* Maximum number of F77 array dims */
 


@@ -113,6 +106,17 @@ extern enum case_sensitivity
     case_sensitive_on, case_sensitive_off
   }
 case_sensitivity;
     case_sensitive_on, case_sensitive_off
   }
 case_sensitivity;

+
+
+/* macro_expansion ==
+   macro_expansion_no:  No macro expansion is available
+   macro_expansion_c:   C-like macro expansion is available  */
+
+enum macro_expansion
+  {
+    macro_expansion_no, macro_expansion_c
+  };
+

 \f
 /* Per architecture (OS/ABI) language information.  */
 
 \f
 /* Per architecture (OS/ABI) language information.  */
 


@@ -125,6 +129,11 @@ struct language_arch_info
   struct type **primitive_type_vector;
   /* Type of elements of strings. */
   struct type *string_char_type;
   struct type **primitive_type_vector;
   /* Type of elements of strings. */
   struct type *string_char_type;

+
+  /* Symbol name of type to use as boolean type, if defined.  */
+  const char *bool_type_symbol;
+  /* Otherwise, this is the default boolean builtin type.  */
+  struct type *bool_type_default;

 };
 
 /* Structure tying together assorted information about a language.  */
 };
 
 /* Structure tying together assorted information about a language.  */


@@ -153,6 +162,9 @@ struct language_defn
     /* Multi-dimensional array ordering */
     enum array_ordering la_array_ordering;
 
     /* Multi-dimensional array ordering */
     enum array_ordering la_array_ordering;
 

+    /* Style of macro expansion, if any, supported by this language.  */
+    enum macro_expansion la_macro_expansion;
+

     /* Definitions related to expression printing, prefixifying, and
        dumping */
 
     /* Definitions related to expression printing, prefixifying, and
        dumping */
 


@@ -174,29 +186,60 @@ struct language_defn
 
     void (*la_post_parser) (struct expression ** expp, int void_context_p);
 
 
     void (*la_post_parser) (struct expression ** expp, int void_context_p);
 

-    void (*la_printchar) (int ch, struct ui_file * stream);
+    void (*la_printchar) (int ch, struct type *chtype, struct ui_file * stream);

 
 

-    void (*la_printstr) (struct ui_file * stream, const gdb_byte *string,
-                        unsigned int length, int width,
-                        int force_ellipses);
+    void (*la_printstr) (struct ui_file * stream, struct type *elttype,
+                        const gdb_byte *string, unsigned int length,
+                        const char *encoding, int force_ellipses,
+                        const struct value_print_options *);

 
 

-    void (*la_emitchar) (int ch, struct ui_file * stream, int quoter);
+    void (*la_emitchar) (int ch, struct type *chtype,
+                        struct ui_file * stream, int quoter);

 
     /* Print a type using syntax appropriate for this language. */
 
 
     /* Print a type using syntax appropriate for this language. */
 

-    void (*la_print_type) (struct type *, char *, struct ui_file *, int,
+    void (*la_print_type) (struct type *, const char *, struct ui_file *, int,

                           int);
 
                           int);
 

-    /* Print a value using syntax appropriate for this language. */
+    /* Print a typedef using syntax appropriate for this language.
+       TYPE is the underlying type.  NEW_SYMBOL is the symbol naming
+       the type.  STREAM is the output stream on which to print.  */
+
+    void (*la_print_typedef) (struct type *type, struct symbol *new_symbol,
+                             struct ui_file *stream);
+
+    /* Print a value using syntax appropriate for this language.
+       
+       TYPE is the type of the sub-object to be printed.
+
+       CONTENTS holds the bits of the value.  This holds the entire
+       enclosing object.
+
+       EMBEDDED_OFFSET is the offset into the outermost object of the
+       sub-object represented by TYPE.  This is the object which this
+       call should print.  Note that the enclosing type is not
+       available.
+
+       ADDRESS is the address in the inferior of the enclosing object.

 
 

-    int (*la_val_print) (struct type *, const gdb_byte *, int, CORE_ADDR,
-                        struct ui_file *, int, int, int,
-                        enum val_prettyprint);
+       STREAM is the stream on which the value is to be printed.
+
+       RECURSE is the recursion depth.  It is zero-based.
+
+       OPTIONS are the formatting options to be used when
+       printing.  */
+
+    int (*la_val_print) (struct type *type,
+                        const gdb_byte *contents,
+                        int embedded_offset, CORE_ADDR address,
+                        struct ui_file *stream, int recurse,
+                        const struct value *val,
+                        const struct value_print_options *options);

 
     /* Print a top-level value using syntax appropriate for this language. */
 
     int (*la_value_print) (struct value *, struct ui_file *,
 
     /* Print a top-level value using syntax appropriate for this language. */
 
     int (*la_value_print) (struct value *, struct ui_file *,

-                          int, enum val_prettyprint);
+                          const struct value_print_options *);

 
     /* PC is possibly an unknown languages trampoline.
        If that PC falls in a trampoline belonging to this language,
 
     /* PC is possibly an unknown languages trampoline.
        If that PC falls in a trampoline belonging to this language,


@@ -216,7 +259,6 @@ struct language_defn
        variables.  */
 
     struct symbol *(*la_lookup_symbol_nonlocal) (const char *,
        variables.  */
 
     struct symbol *(*la_lookup_symbol_nonlocal) (const char *,

-                                                const char *,

                                                 const struct block *,
                                                 const domain_enum);
 
                                                 const struct block *,
                                                 const domain_enum);
 


@@ -256,13 +298,25 @@ struct language_defn
     /* Print the index of an element of an array.  */
     void (*la_print_array_index) (struct value *index_value,
                                   struct ui_file *stream,
     /* Print the index of an element of an array.  */
     void (*la_print_array_index) (struct value *index_value,
                                   struct ui_file *stream,

-                                  int format,
-                                  enum val_prettyprint pretty);
+                                  const struct value_print_options *options);

 
     /* Return non-zero if TYPE should be passed (and returned) by
        reference at the language level.  */
     int (*la_pass_by_reference) (struct type *type);
 
 
     /* Return non-zero if TYPE should be passed (and returned) by
        reference at the language level.  */
     int (*la_pass_by_reference) (struct type *type);
 

+    /* Obtain a string from the inferior, storing it in a newly allocated
+       buffer in BUFFER, which should be freed by the caller.  If the
+       in- and out-parameter *LENGTH is specified at -1, the string is
+       read until a null character of the appropriate width is found -
+       otherwise the string is read to the length of characters specified.
+       On completion, *LENGTH will hold the size of the string in characters.
+       If a *LENGTH of -1 was specified it will count only actual
+       characters, excluding any eventual terminating null character.
+       Otherwise *LENGTH will include all characters - including any nulls.
+       CHARSET will hold the encoding used in the string.  */
+    void (*la_get_string) (struct value *value, gdb_byte **buffer, int *length,
+                          struct type **chartype, const char **charset);
+

     /* Add fields above this point, so the magic number is always last. */
     /* Magic number for compat checking */
 
     /* Add fields above this point, so the magic number is always last. */
     /* Magic number for compat checking */
 


@@ -306,6 +360,9 @@ extern enum language_mode
   }
 language_mode;
 
   }
 language_mode;
 

+struct type *language_bool_type (const struct language_defn *l,
+                                struct gdbarch *gdbarch);
+

 struct type *language_string_char_type (const struct language_defn *l,
                                        struct gdbarch *gdbarch);
 
 struct type *language_string_char_type (const struct language_defn *l,
                                        struct gdbarch *gdbarch);
 


@@ -325,9 +382,9 @@ struct type *language_lookup_primitive_type_by_name (const struct language_defn
 
 /* "cast" really means conversion */
 /* FIXME -- should be a setting in language_defn */
 
 /* "cast" really means conversion */
 /* FIXME -- should be a setting in language_defn */

-#define CAST_IS_CONVERSION (current_language->la_language == language_c  || \
-                           current_language->la_language == language_cplus || \
-                           current_language->la_language == language_objc)
+#define CAST_IS_CONVERSION(LANG) ((LANG)->la_language == language_c  || \
+                                 (LANG)->la_language == language_cplus || \
+                                 (LANG)->la_language == language_objc)

 
 extern void language_info (int);
 
 
 extern void language_info (int);
 


@@ -342,21 +399,27 @@ extern enum language set_language (enum language);
 #define LA_PRINT_TYPE(type,varstring,stream,show,level) \
   (current_language->la_print_type(type,varstring,stream,show,level))
 
 #define LA_PRINT_TYPE(type,varstring,stream,show,level) \
   (current_language->la_print_type(type,varstring,stream,show,level))
 

-#define LA_VAL_PRINT(type,valaddr,offset,addr,stream,fmt,deref,recurse,pretty) \
-  (current_language->la_val_print(type,valaddr,offset,addr,stream,fmt,deref, \
-                                 recurse,pretty))
-#define LA_VALUE_PRINT(val,stream,fmt,pretty) \
-  (current_language->la_value_print(val,stream,fmt,pretty))
+#define LA_PRINT_TYPEDEF(type,new_symbol,stream) \
+  (current_language->la_print_typedef(type,new_symbol,stream))
+
+#define LA_VAL_PRINT(type,valaddr,offset,addr,stream,val,recurse,options) \
+  (current_language->la_val_print(type,valaddr,offset,addr,stream, \
+                                 val,recurse,options))
+#define LA_VALUE_PRINT(val,stream,options) \
+  (current_language->la_value_print(val,stream,options))

 
 

-#define LA_PRINT_CHAR(ch, stream) \
-  (current_language->la_printchar(ch, stream))
-#define LA_PRINT_STRING(stream, string, length, width, force_ellipses) \
-  (current_language->la_printstr(stream, string, length, width, force_ellipses))
-#define LA_EMIT_CHAR(ch, stream, quoter) \
-  (current_language->la_emitchar(ch, stream, quoter))
+#define LA_PRINT_CHAR(ch, type, stream) \
+  (current_language->la_printchar(ch, type, stream))
+#define LA_PRINT_STRING(stream, elttype, string, length, encoding, force_ellipses,options) \
+  (current_language->la_printstr(stream, elttype, string, length, \
+                                encoding, force_ellipses,options))
+#define LA_EMIT_CHAR(ch, type, stream, quoter) \
+  (current_language->la_emitchar(ch, type, stream, quoter))
+#define LA_GET_STRING(value, buffer, length, chartype, encoding) \
+  (current_language->la_get_string(value, buffer, length, chartype, encoding))

 
 

-#define LA_PRINT_ARRAY_INDEX(index_value, stream, format, pretty) \
-  (current_language->la_print_array_index(index_value, stream, format, pretty))
+#define LA_PRINT_ARRAY_INDEX(index_value, stream, optins) \
+  (current_language->la_print_array_index(index_value, stream, options))

 
 /* Test a character to decide whether it can be printed in literal form
    or needs to be printed in another representation.  For example,
 
 /* Test a character to decide whether it can be printed in literal form
    or needs to be printed in another representation.  For example,


@@ -369,15 +432,6 @@ extern enum language set_language (enum language);
    && ((c) < 0x7F || (c) >= 0xA0)      \
    && (!sevenbit_strings || (c) < 0x80))
 
    && ((c) < 0x7F || (c) >= 0xA0)      \
    && (!sevenbit_strings || (c) < 0x80))
 

-#if 0
-/* FIXME: cagney/2000-03-04: This function does not appear to be used.
-   It can be deleted once 5.0 has been released. */
-/* Return a string that contains the hex digits of the number.  No preceeding
-   "0x" */
-
-extern char *longest_raw_hex_string (LONGEST);
-#endif
-

 /* Type predicates */
 
 extern int simple_type (struct type *);
 /* Type predicates */
 
 extern int simple_type (struct type *);


@@ -408,19 +462,14 @@ extern void binop_type_check (struct value *, struct value *, int);
 
 /* Error messages */
 
 
 /* Error messages */
 

-extern void type_error (const char *, ...) ATTR_FORMAT (printf, 1, 2);
+extern void type_error (const char *, ...) ATTRIBUTE_PRINTF (1, 2);

 
 

-extern void range_error (const char *, ...) ATTR_FORMAT (printf, 1, 2);
+extern void range_error (const char *, ...) ATTRIBUTE_PRINTF (1, 2);

 
 /* Data:  Does this value represent "truth" to the current language?  */
 
 extern int value_true (struct value *);
 
 
 /* Data:  Does this value represent "truth" to the current language?  */
 
 extern int value_true (struct value *);
 

-extern struct type *lang_bool_type (void);
-
-/* The type used for Boolean values in the current language. */
-#define LA_BOOL_TYPE lang_bool_type ()
-

 /* Misc:  The string representing a particular enum language.  */
 
 extern enum language language_enum (char *str);
 /* Misc:  The string representing a particular enum language.  */
 
 extern enum language language_enum (char *str);


@@ -453,8 +502,7 @@ extern char *default_word_break_characters (void);
 /* Print the index of an array element using the C99 syntax.  */
 extern void default_print_array_index (struct value *index_value,
                                        struct ui_file *stream,
 /* Print the index of an array element using the C99 syntax.  */
 extern void default_print_array_index (struct value *index_value,
                                        struct ui_file *stream,

-                                       int format,
-                                       enum val_prettyprint pretty);
+                                      const struct value_print_options *options);

 
 /* Return non-zero if TYPE should be passed (and returned) by
    reference at the language level.  */
 
 /* Return non-zero if TYPE should be passed (and returned) by
    reference at the language level.  */


@@ -465,4 +513,14 @@ int language_pass_by_reference (struct type *type);
    independent of this.  */
 int default_pass_by_reference (struct type *type);
 
    independent of this.  */
 int default_pass_by_reference (struct type *type);
 

+/* The default implementation of la_print_typedef.  */
+void default_print_typedef (struct type *type, struct symbol *new_symbol,
+                           struct ui_file *stream);
+
+void default_get_string (struct value *value, gdb_byte **buffer, int *length,
+                        struct type **char_type, const char **charset);
+
+void c_get_string (struct value *value, gdb_byte **buffer, int *length,
+                  struct type **char_type, const char **charset);
+

 #endif /* defined (LANGUAGE_H) */
 #endif /* defined (LANGUAGE_H) */