# HG changeset patch
# User Jaroslav Hajek <address@hidden>
# Date 1209019872 -7200
# Node ID 1dace3828e5e75afa3ae94f950ccae179f478710
# Parent  6f2b2cc4b957669d4f7b80622cc600b5cd10a361
fix max_recursion_limit exceeded at startup with Intel C++

diff --git a/src/ChangeLog b/src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2008-04-24  Jaroslav Hajek <address@hidden>
+
+	* ov-usr-fcn.h (octave_user_script::octave_user_script): 
+	initialize call_depth.
+
 2008-04-23  John W. Eaton  <address@hidden>
 
 	* DLD-FUNCTIONS/__qp__.cc (qp): Avoid bounds error when removing
diff --git a/src/ov-usr-fcn.h b/src/ov-usr-fcn.h
--- a/src/ov-usr-fcn.h
+++ b/src/ov-usr-fcn.h
@@ -79,16 +79,18 @@
 public:
 
   octave_user_script (void)
-    : octave_user_code (), cmd_list (0), file_name () { }
+    : octave_user_code (), cmd_list (0), file_name () , call_depth (0) { }
 
   octave_user_script (const std::string& fnm, const std::string& nm,
 		      tree_statement_list *cmds,
 		      const std::string& ds = std::string ())
-    : octave_user_code (nm, ds), cmd_list (cmds), file_name (fnm) { }
+    : octave_user_code (nm, ds), cmd_list (cmds), file_name (fnm), 
+      call_depth (0) { }
 
   octave_user_script (const std::string& fnm, const std::string& nm,
 		      const std::string& ds = std::string ())
-    : octave_user_code (nm, ds), cmd_list (0), file_name (fnm) { }
+    : octave_user_code (nm, ds), cmd_list (0), file_name (fnm), 
+      call_depth (0) { }
 
   ~octave_user_script (void);