[PATCH][tuples] Fix uninit-13.c fail

[Richard Guenther]

Trivial oversight in comples lowering.

I'll commit after bootstrapping and testing.

Richard.

2008-07-17  Richard Guenther  <rguenther@suse.de>

	* tree-complex.c (init_dont_simulate_again): Handle
	{REAL,IMAG}PART_EXPR correctly.

Index: gcc/tree-complex.c
===================================================================
*** gcc/tree-complex.c.orig	2008-07-17 13:09:08.000000000 +0200
--- gcc/tree-complex.c	2008-07-17 13:12:43.000000000 +0200
*************** init_dont_simulate_again (void)
*** 220,226 ****
  
  	    case GIMPLE_ASSIGN:
  	      sim_again_p = is_complex_reg (gimple_assign_lhs (stmt));
! 	      op0 = gimple_assign_rhs1 (stmt);
  	      if (gimple_num_ops (stmt) > 2)
  		op1 = gimple_assign_rhs2 (stmt);
  	      break;
--- 220,229 ----
  
  	    case GIMPLE_ASSIGN:
  	      sim_again_p = is_complex_reg (gimple_assign_lhs (stmt));
! 	      if (TREE_CODE_CLASS (gimple_expr_code (stmt)) == tcc_reference)
! 		op0 = TREE_OPERAND (gimple_assign_rhs1 (stmt), 0);
! 	      else
! 		op0 = gimple_assign_rhs1 (stmt);
  	      if (gimple_num_ops (stmt) > 2)
  		op1 = gimple_assign_rhs2 (stmt);
  	      break;