Mercurial > octave-nkf
comparison src/ov-usr-fcn.cc @ 3665:0689afb1d001
[project @ 2000-05-11 19:07:56 by jwe]
author | jwe |
---|---|
date | Thu, 11 May 2000 19:10:09 +0000 |
parents | 4290f11c8d3b |
children | 35daf9714b9a |
comparison
equal
deleted
inserted
replaced
3664:d178e2bbd873 | 3665:0689afb1d001 |
---|---|
74 octave_user_function::octave_user_function | 74 octave_user_function::octave_user_function |
75 (tree_parameter_list *pl, tree_parameter_list *rl, | 75 (tree_parameter_list *pl, tree_parameter_list *rl, |
76 tree_statement_list *cl, symbol_table *st) | 76 tree_statement_list *cl, symbol_table *st) |
77 : octave_function (std::string (), std::string ()), | 77 : octave_function (std::string (), std::string ()), |
78 param_list (pl), ret_list (rl), cmd_list (cl), | 78 param_list (pl), ret_list (rl), cmd_list (cl), |
79 sym_tab (st), file_name (), fcn_name (), | 79 sym_tab (st), lead_comm (), trail_comm (), |
80 file_name (), fcn_name (), | |
80 t_parsed (static_cast<time_t> (0)), | 81 t_parsed (static_cast<time_t> (0)), |
81 t_checked (static_cast<time_t> (0)), | 82 t_checked (static_cast<time_t> (0)), |
82 system_fcn_file (false), call_depth (0), | 83 system_fcn_file (false), call_depth (0), |
83 num_named_args (0), args_passed (), num_args_passed (0), | 84 num_named_args (0), args_passed (), num_args_passed (0), |
84 curr_va_arg_number (0), vr_list (0), symtab_entry (0), | 85 curr_va_arg_number (0), vr_list (0), symtab_entry (0), |
98 delete param_list; | 99 delete param_list; |
99 delete ret_list; | 100 delete ret_list; |
100 delete sym_tab; | 101 delete sym_tab; |
101 delete cmd_list; | 102 delete cmd_list; |
102 delete vr_list; | 103 delete vr_list; |
104 delete lead_comm; | |
105 delete trail_comm; | |
103 } | 106 } |
104 | 107 |
105 octave_user_function * | 108 octave_user_function * |
106 octave_user_function::define_ret_list (tree_parameter_list *t) | 109 octave_user_function::define_ret_list (tree_parameter_list *t) |
107 { | 110 { |