From da5ebd8645b03da606577b8e38997511f4ee1af7 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Wed, 23 Dec 2015 10:37:18 +0100
Subject: [PATCH] frontend/evaluate.c, doop(), emphasise `v_type'
 initialisation

---
 src/frontend/evaluate.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/frontend/evaluate.c b/src/frontend/evaluate.c
index 0c678dfd7..161ae8ee3 100644
--- a/src/frontend/evaluate.c
+++ b/src/frontend/evaluate.c
@@ -321,10 +321,12 @@ doop(char what,
     res = alloc(struct dvec);
     ZERO(res, struct dvec);
     if (relflag || (isreal(v1) && isreal(v2) && (func != cx_comma))) {
+        res->v_type = SV_NOTYPE;
         res->v_flags = (v1->v_flags | v2->v_flags |
                         VF_REAL) & ~ VF_COMPLEX;
         res->v_realdata = (double *) data;
     } else {
+        res->v_type = SV_NOTYPE;
         res->v_flags = (v1->v_flags | v2->v_flags |
                         VF_COMPLEX) & ~ VF_REAL;
         res->v_compdata = (ngcomplex_t *) data;