From 08b779aee25b06e11dd3e5144566c07bd38df5dd Mon Sep 17 00:00:00 2001
From: Simon Marchetto <simon.marchetto@scilab-enterprises.com>
Date: Wed, 4 Sep 2013 17:42:19 +0200
Subject: [PATCH] Scilab: return exit code 1 from Scilab when module build
 fails (for Travis test-suite status)

---
 Source/Modules/scilab.cxx | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/Source/Modules/scilab.cxx b/Source/Modules/scilab.cxx
index 9da7a9f42..20438eb30 100644
--- a/Source/Modules/scilab.cxx
+++ b/Source/Modules/scilab.cxx
@@ -210,12 +210,17 @@ public:
 
     /* Write all to the builder.sce file */
     Printf(builderCode, "];\n");
+    Printf(builderCode, "ret = 1;\n");
     Printf(builderCode, "if ~isempty(table) then\n");
     Printf(builderCode, "  ilib_build(ilib_name, table, files, libs, [], ldflags, cflags);\n");
+    Printf(builderCode, "  libfilename = 'lib' + ilib_name + getdynlibext();\n");
+    Printf(builderCode, "  if isfile(libfilename) & isfile('loader.sce') then\n");
+    Printf(builderCode, "    ret = 0;\n");
+    Printf(builderCode, "  end\n");
     Printf(builderCode, "end\n");
     Printf(builderCode, "cd(originaldir);\n");
 
-    Printf(builderCode, "exit");
+    Printf(builderCode, "exit(ret)");
     builderFile = NewFile(NewStringf("%sbuilder.sce", SWIG_output_directory()), "w", SWIG_output_files());
     Printv(builderFile, builderCode, NIL);
     Delete(builderFile);