scilab: can specifiy error message in swigtesterror()

This commit is contained in:
Simon Marchetto 2014-03-03 17:32:34 +01:00
commit 2bb5e7ee92

View file

@ -34,10 +34,11 @@ catch
end end
// Error management function // Error management function
function swigtesterror() function swigtesterror(msg)
[lines, names] = where(); [lines, names] = where();
if size(lines, '*') > 1 if size(lines, '*') > 1
mfprintf(0, "*** TEST FAILED (at line %d) ***\n", lines(2)); mfprintf(0, "*** TEST FAILED (at line %d) ***\n", lines(2));
if argn(2) >= 1 then disp(msg); end
else else
mfprintf(0, "*** TEST FAILED ***\n"); mfprintf(0, "*** TEST FAILED ***\n");
end; end;