comparison toolboxes/FullBNT-1.0.7/KPMtools/assert.m @ 0:e9a9cd732c1e tip

first hg version after svn

+function assert(pred, str)
+% ASSERT Raise an error if the predicate is not true.
+% assert(pred, string)
+
+if nargin<2, str = ''; end
+
+if ~pred
+  s = sprintf('assertion violated: %s', str);
+  error(s);
+end