Mercurial > octave

diff libinterp/corefcn/quadcc.cc @ 31190:9a0e3f0b3823

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Merge stable to default.
author Markus Mützel <markus.muetzel@gmx.de>
date Mon, 15 Aug 2022 12:44:17 +0200
parents 1fcfe9443917 820d2c802247
children e88a07dec498
line wrap: on
line diff
--- a/libinterp/corefcn/quadcc.cc	Mon Aug 15 13:49:54 2022 +0900
+++ b/libinterp/corefcn/quadcc.cc	Mon Aug 15 12:44:17 2022 +0200
@@ -1671,7 +1671,8 @@
   else
     {
       // Intervals around singularities.
-      sing = args(4).array_value ().fortran_vec ();
+      NDArray arr = args(4).array_value ();
+      sing = arr.fortran_vec ();
       iivals[0] = a;
       std::copy_n (sing, nivals-1, iivals+1);
       iivals[nivals] = b;