Mercurial > hg > octave-lyh

diff src/ov-base-scalar.h @ 5602:dfa2da0563e5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-01-31 03:43:40 by jwe]
author jwe
date Tue, 31 Jan 2006 03:43:41 +0000
parents 4c8a2e4e0717
children ce79d238f142
line wrap: on
line diff
--- a/src/ov-base-scalar.h
+++ b/src/ov-base-scalar.h
@@ -81,6 +81,8 @@
 
   dim_vector dims (void) const { static dim_vector dv (1, 1); return dv; }
 
+  octave_idx_type nnz (void) const { return (scalar != ST ()) ? 1 : 0; }
+
   octave_value permute (const Array<int>&, bool = false) const
     { return scalar; }