Minor dwarf2out.c fix

[Richard Kenner]

Sun Dec 31 19:20:51 2000  Richard Kenner  <kenner@vlsi1.ultra.nyu.edu>

	* dwarf2out.c (loc_descriptor_from_tree, case WITH_RECORD_EXPR): New.
	(loc_descriptor_from_tree, case SAVE_EXPR): New.

*** dwarf2out.c	2000/12/22 17:55:09	1.227
--- dwarf2out.c	2000/12/31 23:32:41
*************** loc_descriptor_from_tree (loc, addressp)
*** 7794,7797 ****
--- 7794,7804 ----
        break;
  
+     case WITH_RECORD_EXPR:
+       /* This case involves extracting fields from an object to determine the
+ 	 position of other fields.  We don't try to encode this here.  The
+ 	 only user of this is Ada, which encodes the needed information using
+ 	 the names of types.  */
+       return ret;
+ 
      case VAR_DECL:
      case PARM_DECL:
*************** loc_descriptor_from_tree (loc, addressp)
*** 7829,7832 ****
--- 7836,7840 ----
      case CONVERT_EXPR:
      case NON_LVALUE_EXPR:
+     case SAVE_EXPR:
        return loc_descriptor_from_tree (TREE_OPERAND (loc, 0), addressp);