Browse Source

frontend/vectors.c, vec_mkfamily(), #4/6 drop `j', reuse `i'

pre-master-46
rlar 10 years ago
parent
commit
f86d5c60e4
  1. 8
      src/frontend/vectors.c

8
src/frontend/vectors.c

@ -1103,7 +1103,7 @@ vec_transpose(struct dvec *v)
struct dvec * struct dvec *
vec_mkfamily(struct dvec *v) vec_mkfamily(struct dvec *v)
{ {
int size, numvecs, i, j, count[MAXDIMS];
int size, numvecs, i, count[MAXDIMS];
struct dvec *vecs, *d, **t; struct dvec *vecs, *d, **t;
char buf2[BSIZE_SP]; char buf2[BSIZE_SP];
@ -1122,7 +1122,7 @@ vec_mkfamily(struct dvec *v)
*t = d; *t = d;
t = &(d->v_link2); t = &(d->v_link2);
} }
for (d = vecs, j = 0; d; j++, d = d->v_link2) {
for (d = vecs, i = 0; d; i++, d = d->v_link2) {
indexstring(count, v->v_numdims - 1, buf2); indexstring(count, v->v_numdims - 1, buf2);
d->v_name = tprintf("%s%s", v->v_name, buf2); d->v_name = tprintf("%s%s", v->v_name, buf2);
d->v_type = v->v_type; d->v_type = v->v_type;
@ -1141,10 +1141,10 @@ vec_mkfamily(struct dvec *v)
if (isreal(v)) { if (isreal(v)) {
d->v_realdata = TMALLOC(double, size); d->v_realdata = TMALLOC(double, size);
bcopy(v->v_realdata + size*j, d->v_realdata, (size_t) size * sizeof(double));
bcopy(v->v_realdata + size*i, d->v_realdata, (size_t) size * sizeof(double));
} else { } else {
d->v_compdata = TMALLOC(ngcomplex_t, size); d->v_compdata = TMALLOC(ngcomplex_t, size);
bcopy(v->v_compdata + size*j, d->v_compdata, (size_t) size * sizeof(ngcomplex_t));
bcopy(v->v_compdata + size*i, d->v_compdata, (size_t) size * sizeof(ngcomplex_t));
} }
/* Add one to the counter. */ /* Add one to the counter. */
(void) incindex(count, v->v_numdims - 1, v->v_dims, v->v_numdims); (void) incindex(count, v->v_numdims - 1, v->v_dims, v->v_numdims);

Loading…
Cancel
Save