Mercurial > hg > octave-nkf
diff src/ov-fcn-inline.cc @ 7394:872b263b7e62
[project @ 2008-01-17 10:16:15 by dbateman]
author | dbateman |
---|---|
date | Thu, 17 Jan 2008 10:16:15 +0000 |
parents | a1dbe9d80eee |
children | aaa808ed5d53 |
line wrap: on
line diff
--- a/src/ov-fcn-inline.cc +++ b/src/ov-fcn-inline.cc @@ -744,6 +744,13 @@ return retval; } +/* +%!shared fn +%! fn = inline ("x.^2 + 1","x"); +%!assert (feval (fn, 6), 37) +%!assert (fn (6), 37) +*/ + DEFUN (formula, args, , "-*- texinfo -*-\n\ @deftypefn {Built-in Function} {} formula (@var{fun})\n\