Quick Search:

Mode

Context

Displaying 3 lines of context. None | Less | More | Full

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.263
 
1.264
 
MAIN:ragge:20090520145309
 
pftn.c
_>31043104 static NODE *
 31053105 mkcmplx(NODE *p, TWORD dt)
 31063106 {
<>3107 -        NODE *q, *r, *i;
  3107+        NODE *q, *r, *i, *t;
31083108 
 31093109         if (!ANYCX(p)) {
 31103110                 /* Not complex, convert to complex on stack */
     
 !
31223122                 p = comop(p, q);
 31233123         } else if (p->n_sue->suem->stype != dt) {
 31243124                 q = cxstore(dt);
<>3125 -                /* XXX - left side side effects */
 3126 -                r = buildtree(ASSIGN, structref(ccopy(q), DOT, real),
 3127 -                    structref(ccopy(p), DOT, real));
 3128 -                r = comop(r, buildtree(ASSIGN, structref(ccopy(q), DOT, imag),
 3129 -                    structref(p, DOT, imag)));
 3130 -                p = comop(r, q);
  3125+                p = buildtree(ADDROF, p, NIL);
  3126+                t = tempnode(0, p->n_type, p->n_df, p->n_sue);
  3127+                p = buildtree(ASSIGN, ccopy(t), p);
  3128+                p = comop(p, buildtree(ASSIGN, structref(ccopy(q), DOT, real),
  3129+                    structref(ccopy(t), STREF, real)));
  3130+                p = comop(p, buildtree(ASSIGN, structref(ccopy(q), DOT, imag),
  3131+                    structref(t, STREF, imag)));
  3132+                p = comop(p, q);
<_31313133         }
 31323134         return p;
 31333135 }
FishEye: Open Source License registered to PCC.
Your maintenance has expired. You can renew your license at http://www.atlassian.com/fisheye/renew
Atlassian FishEye, CVS analysis. (Version:1.6.3 Build:build-336 2008-11-04) - Administration - Page generated 2014-10-30 19:19 +0100