Mercurial > hg > octave-lyh
view examples/celldemo.cc @ 17479:fc4df284efc8
assert.m: Replace repmat call with const*ones(...) for ~23% speed-up
* scripts/testfun/assert.m: Replace construction of vector mtol from repmat to
tol*ones(...).
author | Rik <rik@octave.org> |
---|---|
date | Mon, 23 Sep 2013 14:00:58 -0700 |
parents | be41c30bcb44 |
children |
line wrap: on
line source
#include <octave/oct.h> #include <octave/Cell.h> DEFUN_DLD (celldemo, args, , "Cell Demo") { octave_value_list retval; int nargin = args.length (); if (nargin != 1) print_usage (); else { Cell c = args(0).cell_value (); if (! error_state) for (octave_idx_type i = 0; i < c.numel (); i++) { retval(i) = c(i); // using operator syntax //retval(i) = c.elem (i); // using method syntax } } return retval; }