Mercurial > hg > octave-nkf
diff src/variables.cc @ 506:0f388340e607
[project @ 1994-07-09 06:10:34 by jwe]
author | jwe |
---|---|
date | Sat, 09 Jul 1994 06:10:34 +0000 |
parents | 101e1d4f2395 |
children | 7ea224e713cd |
line wrap: on
line diff
--- a/src/variables.cc +++ b/src/variables.cc @@ -677,13 +677,13 @@ takes_correct_nargs (tree_fvc *fcn, int expected_nargin, char *warn_for, int warn = 0) { - int nargs = fcn->max_expected_args () - 1; - int e_nargs = expected_nargin - 1; - if (nargs != e_nargs) + int nargin = fcn->max_expected_args () - 1; + int e_nargin = expected_nargin - 1; + if (nargin != e_nargin) { if (warn) error ("%s: expecting function to take %d argument%c", - warn_for, e_nargs, s_plural (e_nargs)); + warn_for, e_nargin, s_plural (e_nargin)); return 0; } return 1;