Summary: to save

diff --git a/src/imach.c b/src/imach.c
index 1d343385bbbf7fbd5c90e8fbb6f8509c6db56db8..e53edb294336ee36931d405bb06674002415bbc5 100644 (file)
--- a/src/imach.c
+++ b/src/imach.c
@@ -1,6 +1,9 @@
 /* $Id$
   $State$
   $Log$
+  Revision 1.262  2017/04/18 16:48:12  brouard
+  *** empty log message ***
+
   Revision 1.261  2017/04/05 10:14:09  brouard
   Summary: Bug in E_ as well as in T_ fixed nres-1 vs k1-1
 
@@ -10077,9 +10080,12 @@ int main(int argc, char *argv[])
       break;
   }
   if((num_filled=sscanf(line,"model=1+age%[^.\n]", model)) !=EOF){
-    if (num_filled == 0)
-            model[0]='\0';
-    else if (num_filled != 1){
+    if (num_filled == 0){
+      printf("ERROR %d: Model should be at minimum 'model=1+age.' WITHOUT space:'%s'\n",num_filled, line);
+      fprintf(ficlog,"ERROR %d: Model should be at minimum 'model=1+age.' WITHOUT space:'%s'\n",num_filled, line);
+      model[0]='\0';
+      goto end;
+    } else if (num_filled != 1){
       printf("ERROR %d: Model should be at minimum 'model=1+age.' %s\n",num_filled, line);
       fprintf(ficlog,"ERROR %d: Model should be at minimum 'model=1+age.' %s\n",num_filled, line);
       model[0]='\0';