changeset 9709:374d67bbed1f octave-forge

ga: check nargout before nargin (style fix)
author slackydeb
date Thu, 15 Mar 2012 02:23:15 +0000
parents 62801498fae3
children 7df2e3ca6195
files main/ga/inst/rastriginsfcn.m
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/main/ga/inst/rastriginsfcn.m	Thu Mar 15 02:23:03 2012 +0000
+++ b/main/ga/inst/rastriginsfcn.m	Thu Mar 15 02:23:15 2012 +0000
@@ -1,4 +1,4 @@
-## Copyright (C) 2008, 2009, 2010 Luca Favatella <slackydeb@gmail.com>
+## Copyright (C) 2008, 2009, 2010, 2012 Luca Favatella <slackydeb@gmail.com>
 ##
 ## This program is free software; you can redistribute it and/or modify
 ## it under the terms of the GNU General Public License as published by
@@ -22,8 +22,8 @@
 ## Version: 2.0
 
 function retval = rastriginsfcn (x)
-  if ((nargin != 1) || (nargout != 1) ||
-      (columns (x) != 2))
+  if ((nargout != 1) ||
+      (nargin != 1) || (columns (x) != 2))
     print_usage ();
   else
     x1 = x(:, 1);