fix an ancient bug, garbage and segfaults when plotting multidimensional complex data

ChangeLog

@@ -1,3 +1,8 @@
+2010-07-31  Robert Larice
+ * src/frontend/vectors.c :
+    fix an ancient typo, responsible for segfault or garbage
+      when plotting multidimensional complex vectors
+
 2010-07-30  Robert Larice
  * src/frontend/evaluate.c :
     fix an ancient typo, responsible for segfault or garbage

src/frontend/vectors.c

@@ -1010,7 +1010,7 @@ vec_mkfamily(struct dvec *v)
                     (char *) d->v_realdata, totalsize);
         } else {
 	    totalsize = sizeof (complex) * size;
-            d->v_realdata = (double *) tmalloc(totalsize);
+            d->v_compdata = (complex *) tmalloc(totalsize);
             bcopy((char *) v->v_compdata + totalsize * j,
                     (char *) d->v_compdata, totalsize);
         }