Mercurial > octave

diff liboctave/array/fCMatrix.cc @ 29931:7faff48840eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
prefer data over fortran_vec for read-only access to data See also the discussion here: https://octave.discourse.group/t/rename-uses-of-fortran-vec-to-data-for-clarity/1439 * Array.h (const T * Array<T>::fortran_vec (void) const): Deprecate. Change all uses to call data instead.
author John W. Eaton <jwe@octave.org>
date Fri, 30 Jul 2021 11:46:05 -0400
parents 3cb8519fed0f
children 1e277c6b6626
line wrap: on
line diff
--- a/liboctave/array/fCMatrix.cc	Fri Jul 30 17:34:10 2021 +0200
+++ b/liboctave/array/fCMatrix.cc	Fri Jul 30 11:46:05 2021 -0400
@@ -1352,7 +1352,7 @@
       // Only calculate the condition number for LU/Cholesky
       if (typ == MatrixType::Upper)
         {
-          const FloatComplex *tmp_data = fortran_vec ();
+          const FloatComplex *tmp_data = data ();
           F77_INT info = 0;
           char norm = '1';
           char uplo = 'U';
@@ -1380,7 +1380,7 @@
           ("permuted triangular matrix not implemented");
       else if (typ == MatrixType::Lower)
         {
-          const FloatComplex *tmp_data = fortran_vec ();
+          const FloatComplex *tmp_data = data ();
           F77_INT info = 0;
           char norm = '1';
           char uplo = 'L';
@@ -1532,7 +1532,7 @@
               ("permuted triangular matrix not implemented");
           else
             {
-              const FloatComplex *tmp_data = fortran_vec ();
+              const FloatComplex *tmp_data = data ();
 
               retval = b;
               FloatComplex *result = retval.fortran_vec ();
@@ -1634,7 +1634,7 @@
               ("permuted triangular matrix not implemented");
           else
             {
-              const FloatComplex *tmp_data = fortran_vec ();
+              const FloatComplex *tmp_data = data ();
 
               retval = b;
               FloatComplex *result = retval.fortran_vec ();