# HG changeset patch
# User Rik <rik@octave.org>
# Date 1661721583 25200
# Node ID 1c40fc2344f4ec1537b79ce0a74d777cf4f12a39
# Parent  b0e90ca8e679c5a0c14b163af95772a554bc38a5
quad2d.m: Add BIST test to cset b0e90ca8e679 (bug #62972)

* quad2d.m: Add BIST test for bug #62972.

diff -r b0e90ca8e679 -r 1c40fc2344f4 scripts/general/quad2d.m
--- a/scripts/general/quad2d.m	Sun Aug 28 12:21:17 2022 -0400
+++ b/scripts/general/quad2d.m	Sun Aug 28 14:19:43 2022 -0700
@@ -438,6 +438,8 @@
 
 %!assert (quad2d (@plus, 1, 2, 3, 4), 5, 1e-10)
 
+%!assert <*62972> (quad2d (@(x,y) 1i*ones (size (x)), 0,1,0,1), 1i)
+
 ## Test input validation
 %!error <Invalid call> quad2d ()
 %!error <Invalid call> quad2d (@plus)