re PR objc/27240 (ICE with invalid fields)

	PR objc/27240
	* objc-act.c (objc_is_public): Return early on invalid type.

	* objc.dg/member-1.m: New test.

From-SVN: r113559

gcc/objc/ChangeLog

+2006-05-05  Volker Reichelt  <reichelt@igpm.rwth-aachen.de>
+
+	PR objc/27240
+	* objc-act.c (objc_is_public): Return early on invalid type.
+
 2006-03-02 Fariborz Jahanian <fjahanian@apple.com>
 
 	* objc-act.c (init_module_descriptor): Remove file name from

gcc/objc/objc-act.c

@@ -7168,6 +7168,9 @@ objc_is_public (tree expr, tree identifier)
     return 1;
 #endif
 
+  if (TREE_TYPE (expr) == error_mark_node)
+    return 1;
+
   basetype = TYPE_MAIN_VARIANT (TREE_TYPE (expr));
 
   if (basetype && TREE_CODE (basetype) == RECORD_TYPE)

gcc/testsuite/ChangeLog

+2006-05-05  Volker Reichelt  <reichelt@igpm.rwth-aachen.de>
+
+	PR objc/27240
+	* objc.dg/member-1.m: New test.
+
 2006-05-05  Steve Ellcey  <sje@cup.hp.com>
 
 	* gfortran.dg/large_real_kind_form_io_2.f90: Use nearest.

gcc/testsuite/objc.dg/member-1.m

+void foo()
+{
+  struct A a;  /* { dg-error "storage size" } */
+  a.i;
+}