diff src/DLD-FUNCTIONS/cellfun.cc @ 6484:1ece41c144a6

[project @ 2007-04-04 03:22:16 by jwe]
author jwe
date Wed, 04 Apr 2007 03:22:17 +0000
parents 9b982dd07654
children 4fb053f24fd6
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/cellfun.cc	Wed Apr 04 02:58:48 2007 +0000
+++ b/src/DLD-FUNCTIONS/cellfun.cc	Wed Apr 04 03:22:17 2007 +0000
@@ -220,7 +220,7 @@
           if (d < 0)
 	    error ("cellfun: third argument must be a postive integer");
 
-	  if (!error_state)
+	  if (! error_state)
             {
               NDArray result (f_args.dims ());
               for (octave_idx_type count = 0; count < k ; count++)
@@ -274,10 +274,10 @@
 	{
 	  octave_value_list idx;
 	  octave_value_list inputlist;
-	  bool UniformOutput = true;
-	  bool haveErrorHandler = false;
+	  bool uniform_output = true;
+	  bool have_error_handler = false;
 	  std::string err_name;
-	  octave_function *ErrorHandler;
+	  octave_function *error_handler = 0;
 	  int offset = 1;
 	  int i = 1;
 	  OCTAVE_LOCAL_BUFFER (Cell, inputs, nargin);
@@ -297,13 +297,13 @@
 				  arg.begin (), tolower);
 
 		  if (arg == "uniformoutput")
-		    UniformOutput = args(i++).bool_value();
+		    uniform_output = args(i++).bool_value();
 		  else if (arg == "errorhandler")
 		    {
 		      if (args(i).is_function_handle () || 
 			  args(i).is_inline_function ())
 			{
-			  ErrorHandler = args(i).function_value ();
+			  error_handler = args(i).function_value ();
 
 			  if (error_state)
 			    goto cellfun_err;
@@ -314,15 +314,15 @@
 			  std::string fname = "function y = ";
 			  fname.append (fcn_name);
 			  fname.append ("(x) y = ");
-			  ErrorHandler = extract_function (args(i), "cellfun", 
-							   err_name, fname,
-							   "; endfunction");
+			  error_handler = extract_function (args(i), "cellfun", 
+							    err_name, fname,
+							    "; endfunction");
 			}
 
-		      if (!ErrorHandler)
+		      if (! error_handler)
 			goto cellfun_err;
 
-		      haveErrorHandler = true;
+		      have_error_handler = true;
 		      i++;
 		    }
 		  else
@@ -348,10 +348,10 @@
 
 	  inputlist.resize(nargin-offset);
 
-	  if (haveErrorHandler)
+	  if (have_error_handler)
 	    buffer_error_messages++;
 
-	  if (UniformOutput)
+	  if (uniform_output)
 	    {
 	      retval.resize(nargout);
 
@@ -362,7 +362,7 @@
 
 		  octave_value_list tmp = feval (func, inputlist, nargout);
 
-		  if (error_state && haveErrorHandler)
+		  if (error_state && have_error_handler)
 		    {
 		      octave_value_list errtmp = 
 			Flasterr (octave_value_list (), 2);
@@ -375,7 +375,7 @@
 		      errlist.prepend (msg);
 		      buffer_error_messages--;
 		      error_state = 0;
-		      tmp = feval (ErrorHandler, errlist, nargout);
+		      tmp = feval (error_handler, errlist, nargout);
 		      buffer_error_messages++;
 
 		      if (error_state)
@@ -441,7 +441,7 @@
 
 		  octave_value_list tmp = feval (func, inputlist, nargout);
 
-		  if (error_state && haveErrorHandler)
+		  if (error_state && have_error_handler)
 		    {
 		      octave_value_list errtmp = 
 			Flasterr (octave_value_list (), 2);
@@ -454,7 +454,7 @@
 		      errlist.prepend (msg);
 		      buffer_error_messages--;
 		      error_state = 0;
-		      tmp = feval (ErrorHandler, errlist, nargout);
+		      tmp = feval (error_handler, errlist, nargout);
 		      buffer_error_messages++;
 
 		      if (error_state)