* f-lang.c (_initialize_f_language): Do not initialize or

	swap builtin_type_string.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index ddbad9630f514e3e10f96f3e4b5b899bbdd0625a..1cedf60083c55832a823850ce5b381b3d69b9a82 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2007-06-16  Ulrich Weigand  <uweigand@de.ibm.com>
+
+       * f-lang.c (_initialize_f_language): Do not initialize or
+       swap builtin_type_string.
+
 2007-06-16  Ulrich Weigand  <uweigand@de.ibm.com>
 
        * std-regs.c (builtin_type_frame_reg, build_builtin_type_frame_reg,

diff --git a/gdb/f-lang.c b/gdb/f-lang.c
index 9f6d0ecce984ced0ae3dd9cc2f8c476c782855a0..353466c44be95112f91c3646bb75da3b5ceb7e56 100644 (file)
--- a/gdb/f-lang.c
+++ b/gdb/f-lang.c
@@ -621,14 +621,8 @@ _initialize_f_language (void)
   DEPRECATED_REGISTER_GDBARCH_SWAP (builtin_type_f_complex_s16); 
   DEPRECATED_REGISTER_GDBARCH_SWAP (builtin_type_f_complex_s32); 
   DEPRECATED_REGISTER_GDBARCH_SWAP (builtin_type_f_void); 
-  DEPRECATED_REGISTER_GDBARCH_SWAP (builtin_type_string); 
   deprecated_register_gdbarch_swap (NULL, 0, build_fortran_types);
 
-  builtin_type_string =
-    init_type (TYPE_CODE_STRING, TARGET_CHAR_BIT / TARGET_CHAR_BIT,
-              0,
-              "character string", (struct objfile *) NULL);
-
   add_language (&f_language_defn);
 }