Emit 8 NULs for target section name instead of dumping core when the target

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

diff --git a/gdb/language.h b/gdb/language.h
index 054c6cfba7dd87305f82964522b58d31364b0a8b..ba007786de26b4d05e219c19192860e5257e1836 100644 (file)
--- a/gdb/language.h
+++ b/gdb/language.h
@@ -35,7 +35,8 @@ struct expression;
 #define        _LANG_c
 #define        _LANG_m2
 #define        _LANG_chill
-#define _LANG_fortran
+#define  _LANG_fortran
+#define  _LANG_pascal
 
 #define MAX_FORTRAN_DIMS  7    /* Maximum number of F77 array dims */
 
@@ -80,6 +81,26 @@ extern enum type_check
     type_check_off, type_check_warn, type_check_on
   }
 type_check;
+
+/* case_mode ==
+   case_mode_auto:   case_sensitivity set upon selection of scope 
+   case_mode_manual: case_sensitivity set only by user.  */
+
+extern enum case_mode
+  {
+    case_mode_auto, case_mode_manual
+  }
+case_mode;
+
+/* case_sensitivity ==
+   case_sensitive_on:   Case sensitivity in name matching is used
+   case_sensitive_off:  Case sensitivity in name matching is not used  */
+
+extern enum case_sensitivity
+  {
+    case_sensitive_on, case_sensitive_off
+  }
+case_sensitivity;
 \f
 /* Information for doing language dependent formatting of printed values. */
 
@@ -139,17 +160,20 @@ struct language_defn
 
     enum type_check la_type_check;
 
+    /* Default case sensitivity */
+    enum case_sensitivity la_case_sensitivity;
+
     /* Parser function. */
 
-    int (*la_parser) PARAMS ((void));
+    int (*la_parser) (void);
 
     /* Parser error function */
 
-    void (*la_error) PARAMS ((char *));
+    void (*la_error) (char *);
 
     /* Evaluate an expression. */
-    struct value *(*evaluate_exp) PARAMS ((struct type *, struct expression *,
-                                          int *, enum noside));
+    struct value *(*evaluate_exp) (struct type *, struct expression *,
+                                  int *, enum noside);
 
     void (*la_printchar) (int ch, struct ui_file * stream);
 
@@ -159,7 +183,7 @@ struct language_defn
 
     void (*la_emitchar) (int ch, struct ui_file * stream, int quoter);
 
-    struct type *(*la_fund_type) PARAMS ((struct objfile *, int));
+    struct type *(*la_fund_type) (struct objfile *, int);
 
     /* Print a type using syntax appropriate for this language. */