From 86d7963f32a0ea747049593eafb09324b8c2ce56 Mon Sep 17 00:00:00 2001
From: dwarning <dwarning>
Date: Mon, 17 Feb 2020 09:20:09 +0100
Subject: [PATCH] more meaningful warning if vector can't interpolate

---
 src/frontend/interp.c | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/src/frontend/interp.c b/src/frontend/interp.c
index dada350b4..82bb2dd32 100644
--- a/src/frontend/interp.c
+++ b/src/frontend/interp.c
@@ -21,12 +21,17 @@ lincopy(struct dvec *ov, double *newscale, int newlen, struct dvec *oldscale)
     double *nd;
 
     if (!isreal(ov)) {
-        fprintf(cp_err, "Warning: %s is not real\n", ov->v_name);
+        fprintf(cp_err, "Warning: vector %s is not real - no interpolation\n", ov->v_name);
+        return;
+    }
+
+    if (ov->v_length == 1) {
+        fprintf(cp_err, "Warning: %s is not a vector - no interpolation\n", ov->v_name);
         return;
     }
 
     if (ov->v_length < oldscale->v_length) {
-        fprintf(cp_err, "Warning: %s is too short\n", ov->v_name);
+        fprintf(cp_err, "Warning: vector %s is too short - no interpolation\n", ov->v_name);
         return;
     }