# HG changeset patch
# User jwe
# Date 1173291284 0
# Node ID 3f3e86e9fb57eb2de4ce60d0bc9e4731ff1688e8
# Parent  334499d75c5c8dc8423777e4166e83b9aefad925
[project @ 2007-03-07 18:14:44 by jwe]

diff -r 334499d75c5c -r 3f3e86e9fb57 scripts/ChangeLog
--- a/scripts/ChangeLog	Wed Mar 07 18:11:29 2007 +0000
+++ b/scripts/ChangeLog	Wed Mar 07 18:14:44 2007 +0000
@@ -1,3 +1,7 @@
+2007-03-07  Muthiah Annamalai  <muthuspost@gmail.com>
+
+	* specfun/perms.m, specfun/factorial.m: Check args.
+
 2007-03-07  John W. Eaton  <jwe@octave.org>
 
 	* plot/mesh.m: Call newplot before doing anything.
diff -r 334499d75c5c -r 3f3e86e9fb57 scripts/specfun/factorial.m
--- a/scripts/specfun/factorial.m	Wed Mar 07 18:11:29 2007 +0000
+++ b/scripts/specfun/factorial.m	Wed Mar 07 18:14:44 2007 +0000
@@ -25,7 +25,9 @@
 ## @end deftypefn
 
 function x = factorial (n)
-  if (any (n(:) < 0))
+  if (nargin != 1)
+    print_usage ();
+  elseif (any (n(:) < 0))
     error ("factorial: n be be a scalar or array of positive integers");
   endif
   if (isscalar (n))
diff -r 334499d75c5c -r 3f3e86e9fb57 scripts/specfun/perms.m
--- a/scripts/specfun/perms.m	Wed Mar 07 18:11:29 2007 +0000
+++ b/scripts/specfun/perms.m	Wed Mar 07 18:14:44 2007 +0000
@@ -27,6 +27,9 @@
 ## @end deftypefn
 
 function A = perms (v)
+  if (nargin != 1)
+    print_usage ();
+  endif
   v = v(:);
   n = length (v);
   if (n == 1)