00001 /* 00002 The lestes compiler suite 00003 Copyright (C) 2002, 2003, 2004, 2005 Miroslav Tichy 00004 Copyright (C) 2002, 2003, 2004, 2005 Petr Zika 00005 Copyright (C) 2002, 2003, 2004, 2005 Vojtech Hala 00006 Copyright (C) 2002, 2003, 2004, 2005 Jiri Kosina 00007 Copyright (C) 2002, 2003, 2004, 2005 Pavel Sanda 00008 Copyright (C) 2002, 2003, 2004, 2005 Jan Zouhar 00009 Copyright (C) 2002, 2003, 2004, 2005 Rudolf Thomas 00010 00011 This program is free software; you can redistribute it and/or modify 00012 it under the terms of the GNU General Public License as published by 00013 the Free Software Foundation; version 2 of the License. 00014 00015 This program is distributed in the hope that it will be useful, 00016 but WITHOUT ANY WARRANTY; without even the implied warranty of 00017 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00018 GNU General Public License for more details. 00019 00020 See the full text of the GNU General Public License version 2, and 00021 the limitations in the file doc/LICENSE. 00022 00023 By accepting the license the licensee waives any and all claims 00024 against the copyright holder(s) related in whole or in part to the 00025 work, its use, and/or the inability to use it. 00026 00027 */ 00028 #include <lestes/lang/cplus/sem/ss_decl_name.g.hh> 00029 #include <lestes/lang/cplus/sem/ss_decl_name_matcher.g.hh> 00030 #include <lestes/lang/cplus/sem/ss_type.g.hh> 00031 00032 package(lestes); 00033 package(lang); 00034 package(cplus); 00035 package(sem); 00036 00037 bool ss_decl_name::matches( ptr<ss_decl_name> other ) 00038 { 00039 return ss_decl_name_matcher::match( this, other ); 00040 } 00041 00042 bool ss_ordinary_name::matches_same( ptr<ss_ordinary_name> o ) 00043 { 00044 // XXX: is this the corret comparison? 00045 return name_get() == o->name_get(); 00046 } 00047 00048 bool ss_conversion_name::matches_same( ptr<ss_conversion_name> o ) 00049 { 00050 // XXX: is this the corret comparison? 00051 return type_get() == o->type_get(); 00052 } 00053 00054 /*! 00055 * This method always returns true. It is used for all derived classes. For 00056 * their instances to match, it is sufficient for the actual type to match. 00057 * Therefore we can implement it here, in their base class. 00058 * 00059 * \return true 00060 */ 00061 bool ss_operator::matches_same( ptr<ss_operator> ) 00062 { 00063 return true; 00064 } 00065 00066 /*! 00067 * Dummy names never match, aways returns false. 00068 * 00069 * \return false 00070 */ 00071 bool ss_dummy_name::matches_same( ptr<ss_dummy_name> ) 00072 { 00073 return false; 00074 } 00075 00076 end_package(sem); 00077 end_package(cplus); 00078 end_package(lang); 00079 end_package(lestes);
1.5.1-20070107