tree.def (FILE_TYPE): Removed.

gcc:
	* tree.def (FILE_TYPE): Removed.
	* typeclass.h (enum type_class): Removed file_type_class.
	* dwarf2out.c (is_base_type): Updated.
	(gen_type_die): Likewise.
	* dbxout.c (dbxout_type): Updated.
	* builtins.c (type_to_class): Updated.
	* tree.c (type_contains_placeholder_1): Updated.
	* config/sparc/sparc.c (sparc_type_code): Updated.
	* config/ia64/ia64.c (hfa_element_mode): Updated.
	* expr.c (count_type_elements): Updated.
	* stor-layout.c (layout_type): Updated.
	* tree-inline.c (remap_type): Updated.
	* tree-pretty-print.c (dump_generic_node): Updated.
gcc/java:
	* decl.c (gnat_substitute_in_type): Don't handle FILE_TYPE.

From-SVN: r97282

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 384e48e8cdc0ef0ac44ea867c916ef0f42122fa2..2adae1617e3e601c0831d994ef5a2345fd868864 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,19 @@
+2005-03-30  Tom Tromey  <tromey@redhat.com>
+
+       * tree.def (FILE_TYPE): Removed.
+       * typeclass.h (enum type_class): Removed file_type_class.
+       * dwarf2out.c (is_base_type): Updated.
+       (gen_type_die): Likewise.
+       * dbxout.c (dbxout_type): Updated.
+       * builtins.c (type_to_class): Updated.
+       * tree.c (type_contains_placeholder_1): Updated.
+       * config/sparc/sparc.c (sparc_type_code): Updated.
+       * config/ia64/ia64.c (hfa_element_mode): Updated.
+       * expr.c (count_type_elements): Updated.
+       * stor-layout.c (layout_type): Updated.
+       * tree-inline.c (remap_type): Updated.
+       * tree-pretty-print.c (dump_generic_node): Updated.
+
 2005-03-30 Fariborz Jahanian <fjahanian@apple.com>
 
        * builtins.c (expand_builtin_powi): Fix mode of

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index b36fc5b601069e7d1bd9b92ca9b257ab49ae2176..035d8313366a9a7a511b8f07eb884f673b416981 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2005-03-30  Tom Tromey  <tromey@redhat.com>
+
+       * decl.c (gnat_substitute_in_type): Don't handle FILE_TYPE.
+
 2005-03-30  Aaron W. LaFramboise  <aaronavay62@aaronwl.com>
 
        * adaint.c (_gnat_set_close_on_exec): Mark parameters unused.

diff --git a/gcc/ada/decl.c b/gcc/ada/decl.c
index 9d2e8fe871de8a75f4dd0100847698b991009f14..5f53e19e797fa4202c79c9b8dea3bf0c9c35af30 100644 (file)
--- a/gcc/ada/decl.c
+++ b/gcc/ada/decl.c
@@ -6402,7 +6402,6 @@ gnat_substitute_in_type (tree t, tree f, tree r)
 
     case OFFSET_TYPE:
     case METHOD_TYPE:
-    case FILE_TYPE:
     case FUNCTION_TYPE:
     case LANG_TYPE:
       /* Don't know how to do these yet.  */

diff --git a/gcc/builtins.c b/gcc/builtins.c
index fb044de52ac9be952ce564abc2953bb7c3c1e7c6..56bdc873df345f3a967e6866505b4ef5e97a355c 100644 (file)
--- a/gcc/builtins.c
+++ b/gcc/builtins.c
@@ -1478,7 +1478,6 @@ type_to_class (tree type)
     case QUAL_UNION_TYPE:  return union_type_class;
     case ARRAY_TYPE:      return (TYPE_STRING_FLAG (type)
                                   ? string_type_class : array_type_class);
-    case FILE_TYPE:       return file_type_class;
     case LANG_TYPE:       return lang_type_class;
     default:              return no_type_class;
     }

diff --git a/gcc/config/ia64/ia64.c b/gcc/config/ia64/ia64.c
index e18b348659d1484ca756014d5df520efa8b41fbd..3d15f4036327801472ad3d50a5f57cbc15e7d0a8 100644 (file)
--- a/gcc/config/ia64/ia64.c
+++ b/gcc/config/ia64/ia64.c
@@ -3348,7 +3348,7 @@ hfa_element_mode (tree type, bool nested)
     case VOID_TYPE:    case INTEGER_TYPE:      case ENUMERAL_TYPE:
     case BOOLEAN_TYPE: case CHAR_TYPE:         case POINTER_TYPE:
     case OFFSET_TYPE:  case REFERENCE_TYPE:    case METHOD_TYPE:
-    case FILE_TYPE:    case LANG_TYPE:         case FUNCTION_TYPE:
+    case LANG_TYPE:            case FUNCTION_TYPE:
       return VOIDmode;
 
       /* Fortran complex types are supposed to be HFAs, so we need to handle

diff --git a/gcc/config/sparc/sparc.c b/gcc/config/sparc/sparc.c
index 3827d7b1cf8762e5cfb3648eaca522ca73396111..6823915097a5e7dda7e4b07e06f6f222b1d608ea 100644 (file)
--- a/gcc/config/sparc/sparc.c
+++ b/gcc/config/sparc/sparc.c
@@ -7727,7 +7727,6 @@ sparc_type_code (register tree type)
        case VECTOR_TYPE:
        case CHAR_TYPE:         /* GNU Pascal CHAR type.  Not used in C.  */
        case BOOLEAN_TYPE:      /* GNU Fortran BOOLEAN type.  */
-       case FILE_TYPE:         /* GNU Pascal FILE type.  */
        case LANG_TYPE:         /* ? */
          return qualifiers;
   

diff --git a/gcc/dbxout.c b/gcc/dbxout.c
index 271cc1984031da5f901b3df4d8f25dfab84171e0..92538b8ce1079ac8be5d8d1186fb13fa15a2be12 100644 (file)
--- a/gcc/dbxout.c
+++ b/gcc/dbxout.c
@@ -1932,11 +1932,6 @@ dbxout_type (tree type, int full)
        stabstr_S ("eFalse:0,True:1,;");
       break;
 
-    case FILE_TYPE:
-      stabstr_C ('d');
-      dbxout_type (TREE_TYPE (type), 0);
-      break;
-
     case COMPLEX_TYPE:
       /* Differs from the REAL_TYPE by its new data type number.
         R3 is NF_COMPLEX.  We don't try to use any of the other NF_*

diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c
index 24e573b2ea4cd3885eed324b324b25ce4d9c83d3..63356629e070df8ff3dbf7d6e23334b763a446de 100644 (file)
--- a/gcc/dwarf2out.c
+++ b/gcc/dwarf2out.c
@@ -8016,7 +8016,6 @@ is_base_type (tree type)
     case METHOD_TYPE:
     case POINTER_TYPE:
     case REFERENCE_TYPE:
-    case FILE_TYPE:
     case OFFSET_TYPE:
     case LANG_TYPE:
     case VECTOR_TYPE:
@@ -12110,12 +12109,6 @@ gen_type_die (tree type, dw_die_ref context_die)
       gen_ptr_to_mbr_type_die (type, context_die);
       break;
 
-    case FILE_TYPE:
-      gen_type_die (TREE_TYPE (type), context_die);
-      /* No way to represent these in Dwarf yet!  */
-      gcc_unreachable ();
-      break;
-
     case FUNCTION_TYPE:
       /* Force out return type (in case it wasn't forced out already).  */
       gen_type_die (TREE_TYPE (type), context_die);

diff --git a/gcc/expr.c b/gcc/expr.c
index 9e08315531f0fd17e25aeb26977a86bf2c6db656..c2a6e7db9a79db47726a1c0da0d99a469cd28a9a 100644 (file)
--- a/gcc/expr.c
+++ b/gcc/expr.c
@@ -4522,7 +4522,6 @@ count_type_elements (tree type)
 
     case VOID_TYPE:
     case METHOD_TYPE:
-    case FILE_TYPE:
     case FUNCTION_TYPE:
     case LANG_TYPE:
     default:

diff --git a/gcc/stor-layout.c b/gcc/stor-layout.c
index 2814622cd63e7754d45eb25afb07ca80e7cffdb5..25420e0d5ed5b0e8658757c30f61d9155415476f 100644 (file)
--- a/gcc/stor-layout.c
+++ b/gcc/stor-layout.c
@@ -1759,14 +1759,6 @@ layout_type (tree type)
       }
       break;
 
-    case FILE_TYPE:
-      /* The size may vary in different languages, so the language front end
-        should fill in the size.  */
-      TYPE_ALIGN (type) = BIGGEST_ALIGNMENT;
-      TYPE_USER_ALIGN (type) = 0;
-      TYPE_MODE  (type) = BLKmode;
-      break;
-
     default:
       gcc_unreachable ();
     }

diff --git a/gcc/tree-inline.c b/gcc/tree-inline.c
index 0b38f08724c667ae3456ef7b13ef6e4315a4dc12..88bef203862a6a3c8ba63ee89166b6f8e6e567ce 100644 (file)
--- a/gcc/tree-inline.c
+++ b/gcc/tree-inline.c
@@ -321,7 +321,6 @@ remap_type (tree type, inline_data *id)
       walk_tree (&TYPE_FIELDS (new), copy_body_r, id, NULL);
       break;
 
-    case FILE_TYPE:
     case OFFSET_TYPE:
     default:
       /* Shouldn't have been thought variable sized.  */

diff --git a/gcc/tree-pretty-print.c b/gcc/tree-pretty-print.c
index 6c1eed84dcc8af41c19c642aa4f337776c63834d..743e1592e4de08c0dd42e227b414f0920fec86d7 100644 (file)
--- a/gcc/tree-pretty-print.c
+++ b/gcc/tree-pretty-print.c
@@ -1,5 +1,5 @@
 /* Pretty formatting of GENERIC trees in C syntax.
-   Copyright (C) 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+   Copyright (C) 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
    Adapted from c-pretty-print.c by Diego Novillo <dnovillo@redhat.com>
 
 This file is part of GCC.
@@ -441,10 +441,6 @@ dump_generic_node (pretty_printer *buffer, tree node, int spc, int flags,
       pp_string (buffer, "::");
       break;
 
-    case FILE_TYPE:
-      NIY;
-      break;
-
     case ARRAY_TYPE:
       {
        tree tmp;

diff --git a/gcc/tree.c b/gcc/tree.c
index de1ffb21d66ddcdcff90d221a6be1736cefdff7b..a4969a0ae519f5cf2cf91cd6ad7fc21860379e54 100644 (file)
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -1908,7 +1908,6 @@ type_contains_placeholder_1 (tree type)
     case OFFSET_TYPE:
     case REFERENCE_TYPE:
     case METHOD_TYPE:
-    case FILE_TYPE:
     case FUNCTION_TYPE:
     case VECTOR_TYPE:
       return false;

diff --git a/gcc/tree.def b/gcc/tree.def
index bcb38849857e9f4d4af26336543b3ffb6ea1aaf6..08e28068167a79084683f7a1f9fd7a0a701c859f 100644 (file)
--- a/gcc/tree.def
+++ b/gcc/tree.def
@@ -254,9 +254,6 @@ DEFTREECODE (FUNCTION_TYPE, "function_type", tcc_type, 0)
    includes the hidden argument for "self".  */
 DEFTREECODE (METHOD_TYPE, "method_type", tcc_type, 0)
 
-/* Used for Pascal; details not determined right now.  */
-DEFTREECODE (FILE_TYPE, "file_type", tcc_type, 0)
-
 /* This is a language-specific kind of type.
    Its meaning is defined by the language front end.
    layout_type does not know how to lay this out,

diff --git a/gcc/typeclass.h b/gcc/typeclass.h
index 5f36214257504bbdac0a13fdaa1d58bb3216bba5..a4e15703b77f462114ecc12396096615d7bc1158 100644 (file)
--- a/gcc/typeclass.h
+++ b/gcc/typeclass.h
@@ -1,5 +1,5 @@
 /* Type class enum
-   Copyright (C) 2004 Free Software Foundation, Inc.
+   Copyright (C) 2004, 2005 Free Software Foundation, Inc.
 
 This file is part of GCC.
 
@@ -39,7 +39,7 @@ enum type_class
   real_type_class, complex_type_class,
   function_type_class, method_type_class,
   record_type_class, union_type_class,
-  array_type_class, string_type_class, file_type_class,
+  array_type_class, string_type_class,
   lang_type_class
 };