summaryrefslogtreecommitdiffstats
path: root/scilab/modules/symbolic/sci_gateway
diff options
context:
space:
mode:
authorAllan Cornet <allan.cornet@scilab.org>2006-12-11 10:47:35 +0000
committerAllan Cornet <allan.cornet@scilab.org>2006-12-11 10:47:35 +0000
commitfb3088a570ca2ba97a3951a50207c5f07e732363 (patch)
tree00ea7572240acaf510c8964a42988156f8ffa74c /scilab/modules/symbolic/sci_gateway
parent7ca8c4437ecb27fea59231e45f0358bb9e9a197b (diff)
downloadscilab-fb3088a570ca2ba97a3951a50207c5f07e732363.zip
scilab-fb3088a570ca2ba97a3951a50207c5f07e732363.tar.gz
Add ExceptionMessage.* message for scilab exception in this file (windows)
Diffstat (limited to 'scilab/modules/symbolic/sci_gateway')
-rw-r--r--scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c7
1 files changed, 2 insertions, 5 deletions
diff --git a/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c b/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c
index 5ae40db..0291c79 100644
--- a/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c
+++ b/scilab/modules/symbolic/sci_gateway/c/gw_symbolic.c
@@ -5,8 +5,7 @@
5/*-----------------------------------------------------------------------------------*/ 5/*-----------------------------------------------------------------------------------*/
6#if _MSC_VER 6#if _MSC_VER
7#include <Windows.h> 7#include <Windows.h>
8#include "MALLOC.h" 8#include "ExceptionMessage.h"
9extern char *GetExceptionString(DWORD ExceptionCode);
10#endif 9#endif
11/*-----------------------------------------------------------------------------------*/ 10/*-----------------------------------------------------------------------------------*/
12 11
@@ -40,9 +39,7 @@ int C2F(gw_symbolic)()
40 } 39 }
41 _except (EXCEPTION_EXECUTE_HANDLER) 40 _except (EXCEPTION_EXECUTE_HANDLER)
42 { 41 {
43 char *ExceptionString=GetExceptionString(GetExceptionCode()); 42 ExceptionMessage(GetExceptionCode(),Tab[Fin-1].name);
44 sciprint("Warning !!!\nScilab has found a critical error (%s)\nwith \"%s\" function.\nScilab may become unstable.\n",ExceptionString,Tab[Fin-1].name);
45 if (ExceptionString) {FREE(ExceptionString);ExceptionString=NULL;}
46 } 43 }
47 #else 44 #else
48 (*(Tab[Fin-1].f)) (Tab[Fin-1].name,strlen(Tab[Fin-1].name)); 45 (*(Tab[Fin-1].f)) (Tab[Fin-1].name,strlen(Tab[Fin-1].name));