Tests: avoid messagebox() locks 56/18356/3
Clément DAVID [Fri, 8 Jul 2016 11:04:57 +0000 (13:04 +0200)]
Change-Id: I9322e867fc1ef8256734ee510492ca5af0918a27

scilab/modules/development_tools/macros/test_run.sci

index 8c7e623..1aea912 100644 (file)
@@ -736,7 +736,11 @@ function status = test_single(_module, _testPath, _testName)
     "       bugmes()" ;
     "   end" ;
     "   quit;" ;
-    "endfunction" ;
+    "endfunction"];
+    if ~interactive then
+        head($+1) = "function []=messagebox(msg, msg_title, info), disp(''messagebox: '' + msg);endfunction";
+    end
+    head = [ head ;
     "predef(''all'');";
     "tmpdirToPrint = msprintf(''TMPDIR1=''''%s'''';//\n'',TMPDIR);"
     ];