From 4c80a1ab7d31c56dc460441e4c1ac3a05e26326f Mon Sep 17 00:00:00 2001 From: Holger Vogt Date: Mon, 13 Apr 2020 10:24:03 +0200 Subject: [PATCH] fix a bug, use ciprefix instaed of cieq, cieq led to always FALSE if statement --- src/frontend/inpcom.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/src/frontend/inpcom.c b/src/frontend/inpcom.c index b5479cbc0..347e31da4 100644 --- a/src/frontend/inpcom.c +++ b/src/frontend/inpcom.c @@ -1134,8 +1134,8 @@ struct inp_read_t inp_read( FILE *fp, int call_depth, const char *dir_name, ; } - /* add Inp_Path to sourcepath variable */ - if (cieq(buffer, "set") || cieq(buffer, "setcs")) { + /* add Inp_Path to buffer while keeping the sourcepath variable contents */ + if (ciprefix("set", buffer)) { char *p = strstr(buffer, "sourcepath"); if (p) { p = strchr(buffer, ')'); @@ -1149,6 +1149,9 @@ struct inp_read_t inp_read( FILE *fp, int call_depth, const char *dir_name, for (s = buffer; *s && (*s != '\n'); s++) ; } + else { + fprintf(stderr, "Warning: no closing parens found in 'set sourcepath' statement\n"); + } } }