From: toon <toon@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Fri, 10 Nov 2000 20:36:15 +0000 (+0000)
Subject: 2000-11-10  Toon Moene  <toon@moene.indiv.nluug.nl>
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=52fb0555454c204010cd632cadbe374ef247b366;p=thirdparty%2Fgcc.git

2000-11-10  Toon Moene  <toon@moene.indiv.nluug.nl>

	* com.c (ffecom_stabilize_aggregate_) case RTL_EXPR:
	Abort.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@37376 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index a53723ea2695..cb0b9d093339 100644
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,3 +1,8 @@
+2000-11-10  Toon Moene  <toon@moene.indiv.nluug.nl>
+
+	* com.c (ffecom_stabilize_aggregate_) case RTL_EXPR:
+	Abort.
+
 2000-11-10  Zack Weinberg  <zack@wolery.stanford.edu>
 
 	* Make-lang.in (f/fini.o, f/proj-h.o): Remove pointless sed
diff --git a/gcc/f/com.c b/gcc/f/com.c
index d158feda32b1..458acd05424e 100644
--- a/gcc/f/com.c
+++ b/gcc/f/com.c
@@ -1082,11 +1082,7 @@ ffecom_stabilize_aggregate_ (tree ref)
       break;
 
     case RTL_EXPR:
-      result = build1 (INDIRECT_REF, TREE_TYPE (ref),
-		       save_expr (build1 (ADDR_EXPR,
-					  build_pointer_type (TREE_TYPE (ref)),
-					  ref)));
-      break;
+      abort ();
 
 
     default: