diff src/data.cc @ 8458:d254a21e0120

reimplement full as method of octave_base_value
author Jaroslav Hajek <highegg@gmail.com>
date Mon, 12 Jan 2009 13:06:06 +0100
parents 3292bd1bbaa4
children d17874a6f161
line wrap: on
line diff
--- a/src/data.cc
+++ b/src/data.cc
@@ -4584,6 +4584,23 @@
   return retval;
 }
 
+DEFUN (full, args, ,
+    "-*- texinfo -*-\n\
+@deftypefn {Loadable Function} {@var{FM} =} full (@var{SM})\n\
+ returns a full storage matrix from a sparse, diagonal, permutation matrix or a range.\n\
+@seealso{sparse}\n\
+@end deftypefn")
+{
+  octave_value retval;
+
+  if (args.length () == 1)
+    retval = args(0).full_value ();
+  else
+    print_usage ();    
+
+  return retval;
+}
+
 // Compute various norms of the vector X.
 
 DEFUN (norm, args, ,