changeset 20891:95c0d4c07c56

magic: add tests for magic(2) (bug #46672)
author Carnë Draug <carandraug@octave.org>
date Mon, 14 Dec 2015 14:01:36 +0000
parents a88142abca36
children c07bee629973
files scripts/special-matrix/magic.m
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/special-matrix/magic.m	Sun Dec 13 17:40:44 2015 -0500
+++ b/scripts/special-matrix/magic.m	Mon Dec 14 14:01:36 2015 +0000
@@ -85,6 +85,15 @@
 %!   assert (norm(diff([sum(diag(A)),sum(diag(flipud(A))),sum(A),sum(A')])),0);
 %! endfor
 
+## Not a magic square but we must return something (bug #46672)
+## While one day we may change the actual return of magic (2),
+## this properties still must be true.
+%!test
+%! m = magic (2);
+%! assert (size (m), [2 2])
+%! assert (unique (m), [1; 2; 3; 4])
+
+%!assert (magic (2), [4 3; 1 2])
 %!assert (isempty (magic (-1)))
 %!assert (isempty (magic (0)))
 %!assert (magic (1), 1)