Mercurial > octave

changeset 22045:d3c79eb1b483

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add regression test (bug #46330). * test/module.mk: Add new test file. * test/bug-46330.tst: Add test case from bug report.
author Kai T. Ohlhus <k.ohlhus@gmail.com>
date Wed, 06 Jul 2016 14:56:32 +0200
parents 571b42508e1e
children ff17e1c873b2
files test/bug-46330.tst test/module.mk
diffstat 2 files changed, 21 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/bug-46330.tst	Wed Jul 06 14:56:32 2016 +0200
@@ -0,0 +1,20 @@
+## bug #46330: segfault with matrices containing Inf & NaN
+
+%!warning
+%! a = [-0.46E-01,            0.10681415316, 0.0,   -0.17121680433;
+%!      -0.1675901504661613, -0.515,         1.0,    0.6420630320636088E-02;
+%!       0.1543104215347786, -0.547945,     -0.906, -0.1521689385990753E-02;
+%!       0.0,                 0.0,           1.0,    0.0];
+%!
+%! b = [0.1602300107479095,      0.2111848453E-02;
+%!      0.8196877780963616E-02, -0.3025E-01;
+%!      0.9173594317692437E-01, -0.75283075;
+%!      0.0,                     0.0];
+%!
+%! c = [1.0, 0.0, 0.0, 0.0;
+%!      0.0, 0.0, 0.0, 1.0];
+%!
+%! ## This statement caused an error in LAPACK and eventually caused
+%! ## a segmentation fault.
+%! ## Triggers "warning: matrix singular to machine precision"
+%! assert (c / (i * Inf * eye (4) - a) * b, zeros (2, 2))
--- a/test/module.mk	Wed Jul 06 14:49:00 2016 +0200
+++ b/test/module.mk	Wed Jul 06 14:56:32 2016 +0200
@@ -10,6 +10,7 @@
   test/bug-31371.tst \
   test/bug-38565.tst \
   test/bug-38576.tst \
+  test/bug-46330.tst \
   test/colormaps.tst \
   test/command.tst \
   test/complex.tst \