From fd2329c7e993827eedb9f3bbe7e4aab022aba174 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Sat, 26 Dec 2015 18:59:27 +0100
Subject: [PATCH] frontend/device.c, com_alter_common(), #1/11 fix error return

---
 src/frontend/device.c | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/frontend/device.c b/src/frontend/device.c
index e42d0d4d5..b44df9416 100644
--- a/src/frontend/device.c
+++ b/src/frontend/device.c
@@ -1321,6 +1321,8 @@ com_alter_common(wordlist *wl, int do_model)
         xsbuf = rem_xsbuf = wl_flatten(words);
         /* fprintf(cp_err, "Chain    converted  %s \n", xsbuf); */
         dv = TMALLOC(struct dvec, 1);
+        if (!dv)
+            return;
         dv->v_name = copy("real vector");
         type &= IF_VARTYPES;
         if (type == IF_REALVEC) {
@@ -1337,9 +1339,6 @@ com_alter_common(wordlist *wl, int do_model)
         }
         dv->v_length = i;
 
-        if (!dv)
-            return;
-
         if (dv->v_length < 1) {
             fprintf(cp_err, "Error: cannot evaluate new parameter value.\n");
             return;