1  union real_extract
       2  {
       3    double  d;
       4    int i[sizeof (double ) / sizeof (int)];
       5  };
       6  
       7  typedef struct
       8  {
       9    int zzzz;
      10  } *rtx;
      11  
      12  rtx
      13  immed_real_const_1 (d)
      14       double  d;
      15  {
      16    union real_extract u;
      17    register rtx r;
      18  
      19    u.d = d;
      20    foo (&(r->zzzz), &u);
      21  }