X-Git-Url: http://gitweb.michael.orlitzky.com/?p=octave.git;a=blobdiff_plain;f=tests%2Fconstruct_tests.m;fp=tests%2Fconstruct_tests.m;h=cb27d1aae2646c3bd261bc31a2513e3f62d92be3;hp=0000000000000000000000000000000000000000;hb=b619f0c2d08f80974d7a63b8d7fb742799949c4b;hpb=6bf809f3f4b7f59339ee2b945b8cd9f8aafb0bf9

diff --git a/tests/construct_tests.m b/tests/construct_tests.m
new file mode 100644
index 0000000..cb27d1a
--- /dev/null
+++ b/tests/construct_tests.m
@@ -0,0 +1,9 @@
+A = construct(3,4, @(i,j) i+j);
+
+expected = [ 2, 3, 4, 5;
+	     3, 4, 5, 6;
+	     4, 5, 6, 7];
+
+unit_test_equals("construct a_ij == i+j", ...
+		 expected, ...
+		 A);