From e7a19882233e458806c7fe404fbf89d832c39deb Mon Sep 17 00:00:00 2001
From: Michel Juillard <michel.juillard@mjui.fr>
Date: Sun, 17 Jul 2016 14:40:15 +0200
Subject: [PATCH] throwing exception if dgges reports an error

---
 dynare++/kord/first_order.cweb | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/dynare++/kord/first_order.cweb b/dynare++/kord/first_order.cweb
index 6e40ab43f..e3b9153ec 100644
--- a/dynare++/kord/first_order.cweb
+++ b/dynare++/kord/first_order.cweb
@@ -198,6 +198,10 @@ the same. The difference is only numerical error.
 				 matD.getData().base(), &n, &sdim2, alphar.base(), alphai.base(),
 				 beta.base(), vsl.getData().base(), &n, vsr.getData().base(), &n,
 				 work.base(), &lwork, bwork, &info);
+        if(info){
+            throw KordException(__FILE__,__LINE__,
+                                "DGGES returns an error in FirstOrder::solve");
+        }
 	sdim = sdim2;
 	bk_cond = (sdim == ypart.nys());
 	delete[] bwork;