Quick Search:

Mode

Context

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

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.303
 
1.304
 
MAIN:ragge:20101226172907
 
pftn.c
_>32343234 
 32353235 /*
 32363236  * Prepare for return.
<> 3237+ * There may be implicit casts to other types.
32373238  */
 32383239 NODE *
 32393240 cxret(NODE *p, NODE *q)
 32403241 {
<>3241 -        /* XXX what if cast the other way? */
 3242 -        return mkcmplx(p, strmemb(q->n_ap)->stype);
  3242+//printf("cxret\n");
  3243+//fwalk(p, eprint, 0);
  3244+        if (ANYCX(q)) { /* Return complex type */
  3245+                p = mkcmplx(p, strmemb(q->n_ap)->stype);
  3246+        } else if (ISFTY(q->n_type) || ISITY(q->n_type)) { /* real or imag */
  3247+                p = structref(p, DOT, ISFTY(q->n_type) ? real : imag);
  3248+                if (p->n_type != q->n_type)
  3249+                        p = cast(p, q->n_type, 0);
  3250+        } else
  3251+                cerror("cxred failing type");
  3252+        return p;
<_32433253 }
 32443254 #endif
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-09-20 16:00 +0200