diff src/ov-usr-fcn.cc @ 7589:90fb25a5a3fa

minor cleanup in octave_user_function constructor
author John W. Eaton <jwe@octave.org>
date Thu, 13 Mar 2008 13:22:00 -0400
parents 6070c3bd69c4
children 5b4d278ec828
line wrap: on
line diff
--- a/src/ov-usr-fcn.cc	Thu Mar 13 13:19:40 2008 -0400
+++ b/src/ov-usr-fcn.cc	Thu Mar 13 13:22:00 2008 -0400
@@ -101,14 +101,12 @@
     lead_comm (), trail_comm (), file_name (),
     parent_name (), t_parsed (static_cast<time_t> (0)),
     t_checked (static_cast<time_t> (0)),
-    system_fcn_file (false), call_depth (0), num_named_args (0),
+    system_fcn_file (false), call_depth (0),
+    num_named_args (param_list ? param_list->length () : 0),
     nested_function (false), inline_function (false),
     class_constructor (false), class_method (false), xdispatch_class (),
     args_passed (), num_args_passed (0), local_scope (sid)
-{
-  if (param_list)
-    num_named_args = param_list->length ();
-}
+{ }
 
 octave_user_function::~octave_user_function (void)
 {