No BSD License  

Highlights from
MATUnit

from MATUnit by Timothy Wall
xUnit unit test framework for MATLAB

fail(msg, stack)
function fail(msg, stack)
% Raise a failure with the given message and context
if nargin == 1
    stack = printstack;
end
msg=sprintf('%s\n%s', msg, stack);
lastwarn(msg);
error(sprintf('FAIL: %s', msg));

Contact us at files@mathworks.com