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 /*! \file 00029 \brief CV qualifiers remover. 00030 00031 Visitor removing CV qualifiers from SS types. 00032 */ 00033 00034 #include <lestes/common.hh> 00035 #include <lestes/lang/cplus/sem/ss_type.g.hh> 00036 #include <lestes/lang/cplus/sem/ss_type2cv_unqualified.g.hh> 00037 00038 package(lestes); 00039 package(lang); 00040 package(cplus); 00041 package(sem); 00042 00043 /*! 00044 Performs the default operation, that is identity. 00045 \pre type != NULL 00046 \param type The type to unqualify. 00047 */ 00048 void ss_type2cv_unqualified::default_action(ptr<ss_type> type) 00049 { 00050 lassert(type); 00051 unqualified = type; 00052 } 00053 00054 /*! 00055 Visits object of type ss_const. 00056 Removes the const qualifier from the type. 00057 \pre type != NULL 00058 \param type The type to unqualify. 00059 */ 00060 void ss_type2cv_unqualified::visit_ss_const(ptr<ss_const> type) 00061 { 00062 lassert(type); 00063 unqualified = type->what_get(); 00064 } 00065 00066 /*! 00067 Visits object of type ss_volatile. 00068 Removes the volatile qualifier from the type. 00069 \pre type != NULL 00070 \param type The type to unqualify. 00071 */ 00072 void ss_type2cv_unqualified::visit_ss_volatile(ptr<ss_volatile> type) 00073 { 00074 lassert(type); 00075 unqualified = type->what_get(); 00076 } 00077 00078 /*! 00079 Visits object of type ss_const_volatile. 00080 Removes the const and volatile qualifier from the type. 00081 \pre type != NULL 00082 \param type The type to unqualify. 00083 */ 00084 void ss_type2cv_unqualified::visit_ss_const_volatile(ptr<ss_const_volatile> type) 00085 { 00086 lassert(type); 00087 unqualified = type->what_get(); 00088 } 00089 00090 end_package(sem); 00091 end_package(cplus); 00092 end_package(lestes); 00093 end_package(lang); 00094
1.5.1-20070107