From: Agnès Lièvre <agnes.lievre@education.gouv.fr>
Date: Fri, 31 Aug 2007 13:49:27 +0000 (+0000)
Subject: Modification of the way of exiting when the covariate is not binary in order to see... 
X-Git-Tag: imach-099s7~472
X-Git-Url: https://henry.ined.fr/git/?a=commitdiff_plain;h=0edca478f146d6bc4b566e3677df6df18cec2775;p=.git

Modification of the way of exiting when the covariate is not binary in order to see on the window the error message before exiting
---

diff --git a/src/imach.c b/src/imach.c
index 9e7cfe1..f79fd3d 100644
--- a/src/imach.c
+++ b/src/imach.c
@@ -1,6 +1,9 @@
 /* $Id$
   $State$
   $Log$
+  Revision 1.128  2006/06/30 13:02:05  brouard
+  (Module): Clarifications on computing e.j
+
   Revision 1.127  2006/04/28 18:11:50  brouard
   (Module): Yes the sum of survivors was wrong since
   imach-114 because nhstepm was no more computed in the age
@@ -4912,13 +4915,13 @@ run imach with mle=-1 to get a correct template of the parameter file.\n",numlin
  and V1=0 V2=1 for (3). V1=1 V2=1 should not exist and the corresponding\n \
  output of IMaCh is often meaningless.\n \
  Exiting.\n",lval,linei, i,line,j);
-	exit(1);
+	goto end;
       }
       covar[j][i]=(double)(lval);
       strcpy(line,stra);
-    } 
+    }  
     lstra=strlen(stra);
-    
+     
     if(lstra > 9){ /* More than 2**32 or max of what printf can write with %ld */
       stratrunc = &(stra[lstra-9]);
       num[i]=atol(stratrunc);