Mercurial > hg > octave-nkf
diff src/ov-usr-fcn.cc @ 7731:2d2a969c731c
fix max_recursion_limit exceeded at startup with Intel C++
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Thu, 24 Apr 2008 03:21:57 -0400 |
| parents | 87eda1f8faaa |
| children | a059b5679fbb |
line wrap: on
line diff
--- a/src/ov-usr-fcn.cc +++ b/src/ov-usr-fcn.cc @@ -59,6 +59,32 @@ "user-defined script", "user-defined script"); +octave_user_script::octave_user_script (void) + : octave_user_code (), cmd_list (0), file_name (), + t_parsed (static_cast<time_t> (0)), + t_checked (static_cast<time_t> (0)), + call_depth (0) +{ } + +octave_user_script::octave_user_script (const std::string& fnm, + const std::string& nm, + tree_statement_list *cmds, + const std::string& ds) + : octave_user_code (nm, ds), cmd_list (cmds), file_name (fnm), + t_parsed (static_cast<time_t> (0)), + t_checked (static_cast<time_t> (0)), + call_depth (0) +{ } + +octave_user_script::octave_user_script (const std::string& fnm, + const std::string& nm, + const std::string& ds) + : octave_user_code (nm, ds), cmd_list (0), file_name (fnm), + t_parsed (static_cast<time_t> (0)), + t_checked (static_cast<time_t> (0)), + call_depth (0) +{ } + octave_user_script::~octave_user_script (void) { delete cmd_list;