From 0edca478f146d6bc4b566e3677df6df18cec2775 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Agn=C3=A8s=20Li=C3=A8vre?= <agnes.lievre@education.gouv.fr>
Date: Fri, 31 Aug 2007 13:49:27 +0000
Subject: [PATCH] Modification of the way of exiting when the covariate is not
 binary in order to see on the window the error message before exiting

---
 src/imach.c | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

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);
-- 
2.43.0