changeset 13855:5050e92dc25a

* narginchk.m: New tests.
author John W. Eaton <jwe@octave.org>
date Thu, 10 Nov 2011 02:50:51 -0500
parents a09958da79b8
children d490ca8ab1a5
files scripts/general/narginchk.m
diffstat 1 files changed, 13 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/narginchk.m	Thu Nov 10 02:45:40 2011 -0500
+++ b/scripts/general/narginchk.m	Thu Nov 10 02:50:51 2011 -0500
@@ -54,3 +54,16 @@
   endif
 
 endfunction
+
+%!function f (nargs, varargin)
+%! narginchk (nargs(1), nargs(2));
+%!endfunction
+
+%!error <too many input arguments> f([0,0])
+%!error <not enough input arguments> f([3, 3], 1)
+
+%!test
+%! f([1,1])
+
+%!test
+%! f([1,5], 2, 3, 4, 5)