Mercurial > octave

comparison 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
comparison
equal deleted inserted replaced
31188:be5f23b39ee3 31190:9a0e3f0b3823
1669 iivals[1] = b; 1669 iivals[1] = b;
1670 } 1670 }
1671 else 1671 else
1672 { 1672 {
1673 // Intervals around singularities. 1673 // Intervals around singularities.
1674 sing = args(4).array_value ().fortran_vec (); 1674 NDArray arr = args(4).array_value ();
1675 sing = arr.fortran_vec ();
1675 iivals[0] = a; 1676 iivals[0] = a;
1676 std::copy_n (sing, nivals-1, iivals+1); 1677 std::copy_n (sing, nivals-1, iivals+1);
1677 iivals[nivals] = b; 1678 iivals[nivals] = b;
1678 } 1679 }
1679 1680