# HG changeset patch # User Jaroslav Hajek # Date 1251382103 -7200 # Node ID 3d0d2bda3a0fccfe99d04b64e7488daa6d81a56f # Parent 8bf27324a9d0b8eabb101a5bef6cc2c60c24ef12 fix previous change, avoid duplicate loads of methods in descendant classes diff -r 8bf27324a9d0 -r 3d0d2bda3a0f src/ChangeLog --- a/src/ChangeLog Thu Aug 27 13:46:34 2009 +0200 +++ b/src/ChangeLog Thu Aug 27 16:08:23 2009 +0200 @@ -1,6 +1,19 @@ 2009-08-27 Jaroslav Hajek - * src/ov-class.cc (get_current_method_class): Simplify. + * ov-class.cc (get_current_method_class): Simplify. + (octave_class::in_class_method): Don't rely on multiple copies of + methods. Don't declare as const. + (octave_class::octave_class (const Octave_map&, const std::string&, + const octave_value_list&)): + Call symbol_table::add_to_parent_map instead. + * ov-class.h (octave_class::in_class_method): Don't declare as const. + * symtab.h (symbol_table::parent_map): New field. + (symbol_table::add_to_parent_map): New method. + (symbol_table::load_class_method): Search also parent classes. + * load-path.h (load_path::parent_map, load_path::add_to_parent_map, + load_path::do_add_to_parent_map): Remove. + * load-path.cc (load_path::do_find_method): Don't search parent + classes. 2009-08-27 Jaroslav Hajek diff -r 8bf27324a9d0 -r 3d0d2bda3a0f src/load-path.cc --- a/src/load-path.cc Thu Aug 27 13:46:34 2009 +0200 +++ b/src/load-path.cc Thu Aug 27 16:08:23 2009 +0200 @@ -512,7 +512,6 @@ fcn_map.clear (); private_fcn_map.clear (); method_map.clear (); - parent_map.clear (); do_append (".", false); } @@ -1017,29 +1016,7 @@ const_fcn_map_iterator p = m.find (meth); - if (p == m.end ()) - { - // Look in parent classes. - - const_parent_map_iterator r = parent_map.find (class_name); - - if (r != parent_map.end ()) - { - const std::list& plist = r->second; - std::list::const_iterator it = plist.begin (); - - while (it != plist.end ()) - { - retval = do_find_method (*it, meth, dir_name, type); - - if (retval != "") - break; - - it++; - } - } - } - else + if (p != m.end ()) { const file_info_list_type& file_info_list = p->second; @@ -1598,13 +1575,6 @@ } void -load_path::do_add_to_parent_map (const std::string& classname, - const std::list& parent_list) const -{ - parent_map[classname] = parent_list; -} - -void load_path::add_to_fcn_map (const dir_info& di, bool at_end) const { std::string dir_name = di.dir_name; diff -r 8bf27324a9d0 -r 3d0d2bda3a0f src/load-path.h --- a/src/load-path.h Thu Aug 27 13:46:34 2009 +0200 +++ b/src/load-path.h Thu Aug 27 16:08:23 2009 +0200 @@ -38,7 +38,7 @@ protected: load_path (void) - : dir_info_list (), fcn_map (), method_map (), parent_map () { } + : dir_info_list (), fcn_map (), method_map () { } public: @@ -236,13 +236,6 @@ return instance_ok () ? instance->do_system_path () : std::string (); } - static void add_to_parent_map (const std::string& classname, - const std::list& parent_list) - { - if (instance_ok ()) - instance->do_add_to_parent_map (classname, parent_list); - } - private: static const int M_FILE = 1; @@ -402,12 +395,6 @@ typedef method_map_type::const_iterator const_method_map_iterator; typedef method_map_type::iterator method_map_iterator; - // > - typedef std::map > parent_map_type; - - typedef parent_map_type::const_iterator const_parent_map_iterator; - typedef parent_map_type::iterator parent_map_iterator; - mutable dir_info_list_type dir_info_list; mutable fcn_map_type fcn_map; @@ -416,8 +403,6 @@ mutable method_map_type method_map; - mutable parent_map_type parent_map; - static load_path *instance; static hook_fcn_ptr add_hook; @@ -518,9 +503,6 @@ std::string do_get_command_line_path (void) const { return command_line_path; } - void do_add_to_parent_map (const std::string& classname, - const std::list& parent_list) const; - void add_to_fcn_map (const dir_info& di, bool at_end) const; void add_to_private_fcn_map (const dir_info& di) const; diff -r 8bf27324a9d0 -r 3d0d2bda3a0f src/ov-class.cc --- a/src/ov-class.cc Thu Aug 27 13:46:34 2009 +0200 +++ b/src/ov-class.cc Thu Aug 27 16:08:23 2009 +0200 @@ -94,7 +94,7 @@ } if (! error_state) - load_path::add_to_parent_map (id, parent_list); + symbol_table::add_to_parent_map (id, parent_list); } octave_base_value * @@ -123,7 +123,8 @@ octave_function *fcn = octave_call_stack::current (); - retval = fcn->dispatch_class (); + if (fcn->is_class_method () || fcn->is_class_constructor ()) + retval = fcn->dispatch_class (); return retval; } @@ -1574,7 +1575,7 @@ } bool -octave_class::in_class_method (void) const +octave_class::in_class_method (void) { octave_function *fcn = octave_call_stack::current (); @@ -1582,7 +1583,7 @@ && (fcn->is_class_method () || fcn->is_class_constructor () || fcn->is_private_function_of_class (class_name ())) - && fcn->dispatch_class () == class_name ()); + && find_parent_class (fcn->dispatch_class ())); } octave_class::exemplar_info::exemplar_info (const octave_value& obj) diff -r 8bf27324a9d0 -r 3d0d2bda3a0f src/ov-class.h --- a/src/ov-class.h Thu Aug 27 13:46:34 2009 +0200 +++ b/src/ov-class.h Thu Aug 27 16:08:23 2009 +0200 @@ -196,7 +196,7 @@ std::string c_name; std::list parent_list; - bool in_class_method (void) const; + bool in_class_method (void); int obsolete_copies; diff -r 8bf27324a9d0 -r 3d0d2bda3a0f src/symtab.cc --- a/src/symtab.cc Thu Aug 27 13:46:34 2009 +0200 +++ b/src/symtab.cc Thu Aug 27 16:08:23 2009 +0200 @@ -57,6 +57,8 @@ std::map > symbol_table::class_precedence_table; +std::map > symbol_table::parent_map; + const symbol_table::scope_id symbol_table::xglobal_scope = 0; const symbol_table::scope_id symbol_table::xtop_scope = 1; @@ -376,6 +378,32 @@ class_methods[dispatch_type] = retval; } } + + if (retval.is_undefined ()) + { + // Search parent classes + + const_parent_map_iterator r = parent_map.find (dispatch_type); + + if (r != parent_map.end ()) + { + const std::list& plist = r->second; + std::list::const_iterator it = plist.begin (); + + while (it != plist.end ()) + { + retval = find_method (*it); + + if (retval.is_defined ()) + { + class_methods[dispatch_type] = retval; + break; + } + + it++; + } + } + } } return retval; diff -r 8bf27324a9d0 -r 3d0d2bda3a0f src/symtab.h --- a/src/symtab.h Thu Aug 27 13:46:34 2009 +0200 +++ b/src/symtab.h Thu Aug 27 16:08:23 2009 +0200 @@ -1787,6 +1787,12 @@ static void stash_dir_name_for_subfunctions (scope_id scope, const std::string& dir_name); + static void add_to_parent_map (const std::string& classname, + const std::list& parent_list) + { + parent_map[classname] = parent_list; + } + private: typedef std::map::const_iterator table_const_iterator; @@ -1834,6 +1840,12 @@ typedef std::map >::const_iterator class_precedence_table_const_iterator; typedef std::map >::iterator class_precedence_table_iterator; + // Map from class names to parent class names. + static std::map > parent_map; + + typedef std::map >::const_iterator const_parent_map_iterator; + typedef std::map >::iterator parent_map_iterator; + static const scope_id xglobal_scope; static const scope_id xtop_scope;