Mercurial > hg > octave-nkf

diff src/ov-re-sparse.cc @ 5781:faafc2d98b8d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-05-02 19:40:19 by jwe]
author jwe
date Tue, 02 May 2006 19:40:21 +0000
parents ace8d8d26933
children 22e23bee74c8
line wrap: on
line diff
--- a/src/ov-re-sparse.cc
+++ b/src/ov-re-sparse.cc
@@ -98,9 +98,8 @@
 
   if (numel () > 0)
     {
-      // FIXME -- is warn_fortran_indexing the right variable here?
-      if (Vwarn_fortran_indexing)
-	gripe_implicit_conversion ("real sparse matrix", "real scalar");
+      gripe_implicit_conversion ("Octave:array-as-scalar",
+				 "real sparse matrix", "real scalar");
 
       retval = matrix (0, 0);
     }
@@ -120,9 +119,8 @@
   // FIXME -- maybe this should be a function, valid_as_scalar()
   if (rows () > 0 && columns () > 0)
     {
-      // FIXME -- is warn_fortran_indexing the right variable here?
-      if (Vwarn_fortran_indexing)
-	gripe_implicit_conversion ("real sparse matrix", "complex scalar");
+      gripe_implicit_conversion ("Octave:array-as-scalar",
+				 "real sparse matrix", "complex scalar");
 
       retval = matrix (0, 0);
     }