From: N. Brouard <brouard@ined.fr>
Date: Thu, 11 Feb 2021 19:50:15 +0000 (+0000)
Subject: *  (Module): imach.c Someone entered 'results:' instead of 'result:'. Now it is an... 
X-Git-Tag: imach-099s7~157
X-Git-Url: https://henry.ined.fr/git/?a=commitdiff_plain;h=5bffc7cd238f728fb541b3e3eaedab986da0e222;p=.git

*  (Module): imach.c Someone entered 'results:' instead of 'result:'. Now it is an error which is printed.
---

diff --git a/src/imach.c b/src/imach.c
index 89ca339..fd029ce 100644
--- a/src/imach.c
+++ b/src/imach.c
@@ -1,6 +1,10 @@
 /* $Id$
   $State$
   $Log$
+  Revision 1.302  2020/02/22 21:00:05  brouard
+  *  (Module): imach.c Update mle=-3 (for computing Life expectancy
+  and life table from the data without any state)
+
   Revision 1.301  2019/06/04 13:51:20  brouard
   Summary: Error in 'r'parameter file backcast yearsbproj instead of yearsfproj
 
@@ -12490,11 +12494,14 @@ Please run with mle=-1 to get a correct covariance matrix.\n",ageminpar,agemaxpa
 	  fprintf(ficres,"result: %s\n",resultline);
 	  fprintf(ficlog,"result: %s\n",resultline);
 	  break;
-	case 14: 
-	  if(ncovmodel >2 && nresult==0 ){
+	case 14:
+	  printf("Error: Unknown command '%s'\n",line);
+	  fprintf(ficlog,"Error: Unknown command '%s'\n",line);
+	  if(ncovmodel >=2 && nresult==0 ){
 	    printf("ERROR: no result lines! It should be at minimum 'result: V2=0 V1=1 or result:.' %s\n",line);
-	    goto end;
+	    fprintf(ficlog,"ERROR: no result lines! It should be at minimum 'result: V2=0 V1=1 or result:.' %s\n",line);
 	  }
+	  goto end;
 	  break;
 	default:
 	  nresult=1;