Mercurial > hg > octave-lyh
diff src/eig.cc @ 712:36ba0576bd1b
[project @ 1994-09-19 14:18:15 by jwe]
author | jwe |
---|---|
date | Mon, 19 Sep 1994 14:18:48 +0000 |
parents | 0a81458ef677 |
children | e81d3a66725e |
line wrap: on
line diff
--- a/src/eig.cc +++ b/src/eig.cc @@ -40,13 +40,15 @@ { Octave_object retval; - if (args.length () != 2 || nargout > 2) + int nargin = args.length (); + + if (nargin != 1 || nargout > 2) { print_usage ("eig"); return retval; } - tree_constant arg = args(1); + tree_constant arg = args(0); int nr = arg.rows (); int nc = arg.columns ();