# HG changeset patch
# User Jordi Gutiérrez Hermoso <jordigh@gmail.com>
# Date 1312565729 18000
# Node ID 838ada8779a533a26e6473fc37e158d319f91ce4
# Parent  1c71c9bf057001fb6792dbaa310777072c8d3689
Fix brain-o in sqrtm test

diff --git a/src/DLD-FUNCTIONS/sqrtm.cc b/src/DLD-FUNCTIONS/sqrtm.cc
--- a/src/DLD-FUNCTIONS/sqrtm.cc
+++ b/src/DLD-FUNCTIONS/sqrtm.cc
@@ -259,7 +259,9 @@
 
 ## The following two tests are from the reference in the docstring above.
 
-%!assert (any (isnan (sqrtm (x))(:) ))
+%!test
+%! x = [0 1; 0 0];
+%! assert (any (isnan (sqrtm (x))(:) ))
 
 %!test
 %! x = eye (4); x(2,2) = x(3,3) = 2^-26; x(1,4) = 1;