ss_ss2pi_base.g.cc

Go to the documentation of this file.

// This file is automatically generated, do not edit.

#include <lestes/lang/cplus/sem/ss_declaration.g.hh>
#include <lestes/lang/cplus/sem/ss_type.g.hh>
#include <lestes/lang/cplus/sem/ss_misc.g.hh>
#include <lestes/lang/cplus/sem/ss_literal_info.g.hh>
#include <lestes/backend_v2/intercode/pi.g.hh>
#include <lestes/backend_v2/intercode/pi_mem_factory.g.hh>
#include <lestes/md/literals/literal_info_base.g.hh>

#include <lestes/std/list.hh>
#include <lestes/std/pair.hh>
#include <lestes/std/reflect.hh>

#include <lestes/lang/cplus/sem/ss_ss2pi_base.g.hh>

package(lestes);
package(lang);
package(cplus);
package(sem);


// ------------- Class ss_stmt2pi follows. -------------

/*!
   \returns The value of ss_stmt2pi::current_function.
   \author lsg
 */
ptr< ss_function_declaration > ss_stmt2pi::current_function_get() const
{
        return current_function;
}

/*!
   \param[in] x The new value to set ss_stmt2pi::current_function to.
   \author lsg
 */
void ss_stmt2pi::current_function_set(const ptr< ss_function_declaration > & x)
{
        ss_stmt2pi::current_function = x;
}

/*!
   \returns The value of ss_stmt2pi::local_variable_map.
   \author lsg
 */
ptr< variable_map_type > ss_stmt2pi::local_variable_map_get() const
{
        return local_variable_map;
}

/*!
   \param[in] x The new value to set ss_stmt2pi::local_variable_map to.
   \author lsg
 */
void ss_stmt2pi::local_variable_map_set(const ptr< variable_map_type > & x)
{
        ss_stmt2pi::local_variable_map = x;
}

/*!
   \returns The value of ss_stmt2pi::namespace_variable_map.
   \author lsg
 */
ptr< variable_map_type > ss_stmt2pi::namespace_variable_map_get() const
{
        return namespace_variable_map;
}

/*!
   \param[in] x The new value to set ss_stmt2pi::namespace_variable_map to.
   \author lsg
 */
void ss_stmt2pi::namespace_variable_map_set(const ptr< variable_map_type > & x)
{
        ss_stmt2pi::namespace_variable_map = x;
}

/*!
   This factory method for class ss_stmt2pi takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_stmt2pi > ss_stmt2pi::create(ptr< ss_function_declaration > a__ss_stmt2pi__current_function,
                ptr< variable_map_type > a__ss_stmt2pi__local_variable_map,
                ptr< variable_map_type > a__ss_stmt2pi__namespace_variable_map)
{
        return ptr< ss_stmt2pi > ( new ss_stmt2pi(a__ss_stmt2pi__current_function,
                a__ss_stmt2pi__local_variable_map,
                a__ss_stmt2pi__namespace_variable_map) );
}

/*!
   Generated constructor for class ss_stmt2pi.
   \author lsg
 */
ss_stmt2pi::ss_stmt2pi (ptr< ss_function_declaration > a__ss_stmt2pi__current_function,
                ptr< variable_map_type > a__ss_stmt2pi__local_variable_map,
                ptr< variable_map_type > a__ss_stmt2pi__namespace_variable_map)
        : ss_statement_visitor(), current_function(a__ss_stmt2pi__current_function), local_variable_map(a__ss_stmt2pi__local_variable_map), namespace_variable_map(checked(a__ss_stmt2pi__namespace_variable_map))
{}

ptr< object::reflection_list > ss_stmt2pi::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "current_function", "ss_function_declaration" ) );
                mdl->push_back( md::create( "local_variable_map", "variable_map_type" ) );
                mdl->push_back( md::create( "namespace_variable_map", "variable_map_type" ) );
                reflection = reflection_list::create( ss_statement_visitor::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_stmt2pi", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_stmt2pi::field_values_get() const
{
        ptr < field_list_list > result = ss_statement_visitor::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->current_function );
        result->push_back( value_list::create() );
        result->back()->push_back( this->local_variable_map );
        result->push_back( value_list::create() );
        result->back()->push_back( this->namespace_variable_map );
        return result;
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_stmt2pi::gc_mark()
{
        ss_statement_visitor::gc_mark();
}

// End of class ss_stmt2pi.

// ------------- Class ss_decl2pi follows. -------------

/*!
   \returns The value of ss_decl2pi::caller.
   \author lsg
 */
ptr< ss_stmt2pi > ss_decl2pi::caller_get() const
{
        return caller;
}

/*!
   \param[in] x The new value to set ss_decl2pi::caller to.
   \author lsg
 */
void ss_decl2pi::caller_set(const ptr< ss_stmt2pi > & x)
{
        ss_decl2pi::caller = x;
}

/*!
   \returns The value of ss_decl2pi::statement.
   \author lsg
 */
ptr< ss_decl_stmt > ss_decl2pi::statement_get() const
{
        return statement;
}

/*!
   \param[in] x The new value to set ss_decl2pi::statement to.
   \author lsg
 */
void ss_decl2pi::statement_set(const ptr< ss_decl_stmt > & x)
{
        ss_decl2pi::statement = x;
}

/*!
   This factory method for class ss_decl2pi takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_decl2pi > ss_decl2pi::create(ptr< ss_stmt2pi > a__ss_decl2pi__caller,
                ptr< ss_decl_stmt > a__ss_decl2pi__statement)
{
        return ptr< ss_decl2pi > ( new ss_decl2pi(a__ss_decl2pi__caller,
                a__ss_decl2pi__statement) );
}

/*!
   Generated constructor for class ss_decl2pi.
   \author lsg
 */
ss_decl2pi::ss_decl2pi (ptr< ss_stmt2pi > a__ss_decl2pi__caller,
                ptr< ss_decl_stmt > a__ss_decl2pi__statement)
        : ss_decl2pi_default(), caller(checked(a__ss_decl2pi__caller)), statement(checked(a__ss_decl2pi__statement))
{}

ptr< object::reflection_list > ss_decl2pi::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "caller", "ss_stmt2pi" ) );
                mdl->push_back( md::create( "statement", "ss_decl_stmt" ) );
                reflection = reflection_list::create( ss_decl2pi_default::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_decl2pi", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_decl2pi::field_values_get() const
{
        ptr < field_list_list > result = ss_decl2pi_default::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->caller );
        result->push_back( value_list::create() );
        result->back()->push_back( this->statement );
        return result;
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_decl2pi::gc_mark()
{
        ss_decl2pi_default::gc_mark();
}

// End of class ss_decl2pi.

// ------------- Class ss_decl2mem follows. -------------

/*!
   \returns The value of ss_decl2mem::caller.
   \author lsg
 */
ptr< ss_stmt2pi > ss_decl2mem::caller_get() const
{
        return caller;
}

/*!
   \param[in] x The new value to set ss_decl2mem::caller to.
   \author lsg
 */
void ss_decl2mem::caller_set(const ptr< ss_stmt2pi > & x)
{
        ss_decl2mem::caller = x;
}

/*!
   \returns The value of ss_decl2mem::result.
   \author lsg
 */
ptr< ::lestes::backend_v2::intercode::pi_mem_factory > ss_decl2mem::result_get() const
{
        return result;
}

/*!
   \param[in] x The new value to set ss_decl2mem::result to.
   \author lsg
 */
void ss_decl2mem::result_set(const ptr< ::lestes::backend_v2::intercode::pi_mem_factory > & x)
{
        ss_decl2mem::result = x;
}

/*!
   This factory method for class ss_decl2mem takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_decl2mem > ss_decl2mem::create(ptr< ss_stmt2pi > a__ss_decl2mem__caller,
                ptr< ::lestes::backend_v2::intercode::pi_mem_factory > a__ss_decl2mem__result)
{
        return ptr< ss_decl2mem > ( new ss_decl2mem(a__ss_decl2mem__caller,
                a__ss_decl2mem__result) );
}

/*!
   This factory method for class ss_decl2mem uses initializers.
   \author lsg
 */
ptr< ss_decl2mem > ss_decl2mem::create(ptr< ss_stmt2pi > a__ss_decl2mem__caller)
{
        return ptr< ss_decl2mem > ( new ss_decl2mem(a__ss_decl2mem__caller, NULL) );
}

/*!
   Generated constructor for class ss_decl2mem.
   \author lsg
 */
ss_decl2mem::ss_decl2mem (ptr< ss_stmt2pi > a__ss_decl2mem__caller,
                ptr< ::lestes::backend_v2::intercode::pi_mem_factory > a__ss_decl2mem__result)
        : ss_decl2pi_default(), caller(checked(a__ss_decl2mem__caller)), result(a__ss_decl2mem__result)
{}

ptr< object::reflection_list > ss_decl2mem::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "caller", "ss_stmt2pi" ) );
                mdl->push_back( md::create( "result", "pi_mem_factory" ) );
                reflection = reflection_list::create( ss_decl2pi_default::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_decl2mem", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_decl2mem::field_values_get() const
{
        ptr < field_list_list > result = ss_decl2pi_default::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->caller );
        result->push_back( value_list::create() );
        result->back()->push_back( this->result );
        return result;
}

ptr< ::lestes::backend_v2::intercode::pi_mem_factory > ss_decl2mem::get_real_decl_mem( const ptr< ::lestes::lang::cplus::sem::ss_declaration > & o )
{
        lassert2( o, "Cannot visit NULL object." );
        o->accept_ss_declaration_visitor( ptr< ss_declaration_visitor >(this) );
        return result_get();
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_decl2mem::gc_mark()
{
        ss_decl2pi_default::gc_mark();
}

// End of class ss_decl2mem.

// ------------- Class ss_type2destructor follows. -------------

/*!
   \returns The value of ss_type2destructor::destructor.
   \author lsg
 */
ptr< ss_function_declaration > ss_type2destructor::destructor_get() const
{
        return destructor;
}

/*!
   \param[in] x The new value to set ss_type2destructor::destructor to.
   \author lsg
 */
void ss_type2destructor::destructor_set(const ptr< ss_function_declaration > & x)
{
        ss_type2destructor::destructor = x;
}

/*!
   This factory method for class ss_type2destructor takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_type2destructor > ss_type2destructor::create(ptr< ss_function_declaration > a__ss_type2destructor__destructor)
{
        return ptr< ss_type2destructor > ( new ss_type2destructor(a__ss_type2destructor__destructor) );
}

/*!
   This factory method for class ss_type2destructor uses initializers.
   \author lsg
 */
ptr< ss_type2destructor > ss_type2destructor::create()
{
        return ptr< ss_type2destructor > ( new ss_type2destructor(NULL) );
}

/*!
   Generated constructor for class ss_type2destructor.
   \author lsg
 */
ss_type2destructor::ss_type2destructor (ptr< ss_function_declaration > a__ss_type2destructor__destructor)
        : ss_type2destructor_base(), destructor(a__ss_type2destructor__destructor)
{}

ptr< object::reflection_list > ss_type2destructor::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "destructor", "ss_function_declaration" ) );
                reflection = reflection_list::create( ss_type2destructor_base::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_type2destructor", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_type2destructor::field_values_get() const
{
        ptr < field_list_list > result = ss_type2destructor_base::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->destructor );
        return result;
}

ptr< ss_function_declaration > ss_type2destructor::find_destructor( const ptr< ::lestes::lang::cplus::sem::ss_type > & o )
{
        lassert2( o, "Cannot visit NULL object." );
        o->accept_ss_type_visitor( ptr< ss_type_visitor >(this) );
        return destructor_get();
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_type2destructor::gc_mark()
{
        ss_type2destructor_base::gc_mark();
}

// End of class ss_type2destructor.

// ------------- Class ss_expr2destination follows. -------------

/*!
   \returns The value of ss_expr2destination::destination.
   \author lsg
 */
ptr< ss_expression > ss_expr2destination::destination_get() const
{
        return destination;
}

/*!
   \param[in] x The new value to set ss_expr2destination::destination to.
   \author lsg
 */
void ss_expr2destination::destination_set(const ptr< ss_expression > & x)
{
        ss_expr2destination::destination = x;
}

/*!
   This factory method for class ss_expr2destination takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_expr2destination > ss_expr2destination::create(ptr< ss_expression > a__ss_expr2destination__destination)
{
        return ptr< ss_expr2destination > ( new ss_expr2destination(a__ss_expr2destination__destination) );
}

/*!
   This factory method for class ss_expr2destination uses initializers.
   \author lsg
 */
ptr< ss_expr2destination > ss_expr2destination::create()
{
        return ptr< ss_expr2destination > ( new ss_expr2destination(NULL) );
}

/*!
   Generated constructor for class ss_expr2destination.
   \author lsg
 */
ss_expr2destination::ss_expr2destination (ptr< ss_expression > a__ss_expr2destination__destination)
        : ss_expr2destination_base(), destination(a__ss_expr2destination__destination)
{}

ptr< object::reflection_list > ss_expr2destination::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "destination", "ss_expression" ) );
                reflection = reflection_list::create( ss_expr2destination_base::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_expr2destination", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_expr2destination::field_values_get() const
{
        ptr < field_list_list > result = ss_expr2destination_base::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->destination );
        return result;
}

ptr< ss_expression > ss_expr2destination::get_destination( const ptr< ::lestes::lang::cplus::sem::ss_expression > & o )
{
        lassert2( o, "Cannot visit NULL object." );
        o->accept_ss_expression_visitor( ptr< ss_expression_visitor >(this) );
        return destination_get();
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_expr2destination::gc_mark()
{
        ss_expr2destination_base::gc_mark();
}

// End of class ss_expr2destination.

// ------------- Class ss_expr2pi follows. -------------

/*!
   \returns The value of ss_expr2pi::caller.
   \author lsg
 */
ptr< ss_stmt2pi > ss_expr2pi::caller_get() const
{
        return caller;
}

/*!
   \param[in] x The new value to set ss_expr2pi::caller to.
   \author lsg
 */
void ss_expr2pi::caller_set(const ptr< ss_stmt2pi > & x)
{
        ss_expr2pi::caller = x;
}

/*!
   \returns The value of ss_expr2pi::result.
   \author lsg
 */
ptr< ::lestes::backend_v2::intercode::pi_operand > ss_expr2pi::result_get() const
{
        return result;
}

/*!
   \param[in] x The new value to set ss_expr2pi::result to.
   \author lsg
 */
void ss_expr2pi::result_set(const ptr< ::lestes::backend_v2::intercode::pi_operand > & x)
{
        ss_expr2pi::result = x;
}

/*!
   \returns The value of ss_expr2pi::psp.
   \author lsg
 */
ptr< ss_sp > ss_expr2pi::psp_get() const
{
        return psp;
}

/*!
   \param[in] x The new value to set ss_expr2pi::psp to.
   \author lsg
 */
void ss_expr2pi::psp_set(const ptr< ss_sp > & x)
{
        ss_expr2pi::psp = x;
}

/*!
   \returns The value of ss_expr2pi::temporaries.
   \author lsg
 */
ptr< ss_destructor_table > ss_expr2pi::temporaries_get() const
{
        return temporaries;
}

/*!
   \param[in] x The new value to set ss_expr2pi::temporaries to.
   \author lsg
 */
void ss_expr2pi::temporaries_set(const ptr< ss_destructor_table > & x)
{
        ss_expr2pi::temporaries = x;
}

/*!
   \returns The value of ss_expr2pi::expr2operand_map.
   \author lsg
 */
ptr< expression_results_map_type > ss_expr2pi::expr2operand_map_get() const
{
        return expr2operand_map;
}

/*!
   \param[in] x The new value to set ss_expr2pi::expr2operand_map to.
   \author lsg
 */
void ss_expr2pi::expr2operand_map_set(const ptr< expression_results_map_type > & x)
{
        ss_expr2pi::expr2operand_map = x;
}

/*!
   \returns The value of ss_expr2pi::returned_pointer.
   \author lsg
 */
bool ss_expr2pi::returned_pointer_get() const
{
        return returned_pointer;
}

/*!
   \param[in] x The new value to set ss_expr2pi::returned_pointer to.
   \author lsg
 */
void ss_expr2pi::returned_pointer_set(bool x)
{
        ss_expr2pi::returned_pointer = x;
}

/*!
   This factory method for class ss_expr2pi takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_expr2pi > ss_expr2pi::create(ptr< ss_stmt2pi > a__ss_expr2pi__caller,
                ptr< ::lestes::backend_v2::intercode::pi_operand > a__ss_expr2pi__result,
                ptr< ss_sp > a__ss_expr2pi__psp,
                ptr< ss_destructor_table > a__ss_expr2pi__temporaries,
                ptr< expression_results_map_type > a__ss_expr2pi__expr2operand_map,
                bool a__ss_expr2pi__returned_pointer)
{
        return ptr< ss_expr2pi > ( new ss_expr2pi(a__ss_expr2pi__caller,
                a__ss_expr2pi__result,
                a__ss_expr2pi__psp,
                a__ss_expr2pi__temporaries,
                a__ss_expr2pi__expr2operand_map,
                a__ss_expr2pi__returned_pointer) );
}

/*!
   This factory method for class ss_expr2pi uses initializers.
   \author lsg
 */
ptr< ss_expr2pi > ss_expr2pi::create(ptr< ss_stmt2pi > a__ss_expr2pi__caller,
                ptr< ss_sp > a__ss_expr2pi__psp,
                ptr< ss_destructor_table > a__ss_expr2pi__temporaries,
                ptr< expression_results_map_type > a__ss_expr2pi__expr2operand_map)
{
        return ptr< ss_expr2pi > ( new ss_expr2pi(a__ss_expr2pi__caller, NULL, a__ss_expr2pi__psp, a__ss_expr2pi__temporaries, a__ss_expr2pi__expr2operand_map, false) );
}

/*!
   Generated constructor for class ss_expr2pi.
   \author lsg
 */
ss_expr2pi::ss_expr2pi (ptr< ss_stmt2pi > a__ss_expr2pi__caller,
                ptr< ::lestes::backend_v2::intercode::pi_operand > a__ss_expr2pi__result,
                ptr< ss_sp > a__ss_expr2pi__psp,
                ptr< ss_destructor_table > a__ss_expr2pi__temporaries,
                ptr< expression_results_map_type > a__ss_expr2pi__expr2operand_map,
                bool a__ss_expr2pi__returned_pointer)
        : ss_expression_visitor(), caller(checked(a__ss_expr2pi__caller)), result(a__ss_expr2pi__result), psp(checked(a__ss_expr2pi__psp)), temporaries(checked(a__ss_expr2pi__temporaries)), expr2operand_map(checked(a__ss_expr2pi__expr2operand_map)), returned_pointer(a__ss_expr2pi__returned_pointer)
{}

ptr< object::reflection_list > ss_expr2pi::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "caller", "ss_stmt2pi" ) );
                mdl->push_back( md::create( "result", "pi_operand" ) );
                mdl->push_back( md::create( "psp", "ss_sp" ) );
                mdl->push_back( md::create( "temporaries", "ss_destructor_table" ) );
                mdl->push_back( md::create( "expr2operand_map", "expression_results_map_type" ) );
                mdl->push_back( md::create( "returned_pointer", "bool" ) );
                reflection = reflection_list::create( ss_expression_visitor::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_expr2pi", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_expr2pi::field_values_get() const
{
        ptr < field_list_list > result = ss_expression_visitor::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->caller );
        result->push_back( value_list::create() );
        result->back()->push_back( this->result );
        result->push_back( value_list::create() );
        result->back()->push_back( this->psp );
        result->push_back( value_list::create() );
        result->back()->push_back( this->temporaries );
        result->push_back( value_list::create() );
        result->back()->push_back( this->expr2operand_map );
        result->push_back( value_list::create() );
        result->back()->push_back( objectize< bool > ::create( this->returned_pointer ) );
        return result;
}

ptr< ::lestes::backend_v2::intercode::pi_operand > ss_expr2pi::returns( const ptr< ::lestes::lang::cplus::sem::ss_expression > & o )
{
        lassert2( o, "Cannot visit NULL object." );
        o->accept_ss_expression_visitor( ptr< ss_expression_visitor >(this) );
        return result_get();
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_expr2pi::gc_mark()
{
        ss_expression_visitor::gc_mark();
}

// End of class ss_expr2pi.

// ------------- Class ss_destructor_table follows. -------------

/*!
   \returns The value of ss_destructor_table::compound_stmt.
   \author lsg
 */
ptr< ss_compound_stmt > ss_destructor_table::compound_stmt_get() const
{
        return compound_stmt;
}

/*!
   \param[in] x The new value to set ss_destructor_table::compound_stmt to.
   \author lsg
 */
void ss_destructor_table::compound_stmt_set(const ptr< ss_compound_stmt > & x)
{
        ss_destructor_table::compound_stmt = x;
}

/*!
   \returns The value of ss_destructor_table::destructors.
   \author lsg
 */
ptr< ::lestes::std::list< srp< destructor_entry_type > > > ss_destructor_table::destructors_get() const
{
        return destructors;
}

/*!
   \param[in] x The new value to set ss_destructor_table::destructors to.
   \author lsg
 */
void ss_destructor_table::destructors_set(const ptr< ::lestes::std::list< srp< destructor_entry_type > > > & x)
{
        ss_destructor_table::destructors = x;
}

/*!
   This factory method for class ss_destructor_table takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_destructor_table > ss_destructor_table::create(ptr< ss_compound_stmt > a__ss_destructor_table__compound_stmt,
                ptr< ::lestes::std::list< srp< destructor_entry_type > > > a__ss_destructor_table__destructors)
{
        return ptr< ss_destructor_table > ( new ss_destructor_table(a__ss_destructor_table__compound_stmt,
                a__ss_destructor_table__destructors) );
}

/*!
   This factory method for class ss_destructor_table uses initializers.
   \author lsg
 */
ptr< ss_destructor_table > ss_destructor_table::create(ptr< ss_compound_stmt > a__ss_destructor_table__compound_stmt)
{
        return ptr< ss_destructor_table > ( new ss_destructor_table(a__ss_destructor_table__compound_stmt, ::lestes::std::list< srp< destructor_entry_type > > ::create()) );
}

/*!
   Generated constructor for class ss_destructor_table.
   \author lsg
 */
ss_destructor_table::ss_destructor_table (ptr< ss_compound_stmt > a__ss_destructor_table__compound_stmt,
                ptr< ::lestes::std::list< srp< destructor_entry_type > > > a__ss_destructor_table__destructors)
        : object(), compound_stmt(a__ss_destructor_table__compound_stmt), destructors(checked(a__ss_destructor_table__destructors))
{}

ptr< object::reflection_list > ss_destructor_table::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "compound_stmt", "ss_compound_stmt" ) );
                mdl->push_back( md::create( "destructors", "list&lt; srp&lt; destructor_entry_type &gt; &gt;" ) );
                reflection = reflection_list::create( ::lestes::std::object::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_destructor_table", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_destructor_table::field_values_get() const
{
        ptr < field_list_list > result = ::lestes::std::object::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->compound_stmt );
        result->push_back( value_list::create() );
        result->back()->push_back( this->destructors );
        return result;
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_destructor_table::gc_mark()
{
	::lestes::std::object::gc_mark();
}

// End of class ss_destructor_table.

// ------------- Class ss_destructor_tables follows. -------------

/*!
   \returns The value of ss_destructor_tables::singleton_instance.
   \author lsg
 */
ptr< ss_destructor_tables > ss_destructor_tables::singleton_instance_get()
{
        return singleton_instance;
}

/*!
   \param[in] x The new value to set ss_destructor_tables::singleton_instance to.
   \author lsg
 */
void ss_destructor_tables::singleton_instance_set(const ptr< ss_destructor_tables > & x)
{
        ss_destructor_tables::singleton_instance = x;
}

/*!
   Generated constructor for class ss_destructor_tables.
   \author lsg
 */
ss_destructor_tables::ss_destructor_tables ()
        : object()
{}

ptr< object::reflection_list > ss_destructor_tables::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "singleton_instance", "ss_destructor_tables" ) );
                reflection = reflection_list::create( ::lestes::std::object::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_destructor_tables", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_destructor_tables::field_values_get() const
{
        ptr < field_list_list > result = ::lestes::std::object::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->singleton_instance );
        return result;
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_destructor_tables::gc_mark()
{
	::lestes::std::object::gc_mark();
}

// End of class ss_destructor_tables.

// ------------- Class ss_destructor_tables_stack follows. -------------

/*!
   \returns The value of ss_destructor_tables_stack::current.
   \author lsg
 */
ptr< ss_destructor_table > ss_destructor_tables_stack::current_get()
{
        return current;
}

/*!
   \param[in] x The new value to set ss_destructor_tables_stack::current to.
   \author lsg
 */
void ss_destructor_tables_stack::current_set(const ptr< ss_destructor_table > & x)
{
        ss_destructor_tables_stack::current = x;
}

/*!
   \returns The value of ss_destructor_tables_stack::tables.
   \author lsg
 */
ptr< ::lestes::std::list< srp< ss_destructor_table > > > ss_destructor_tables_stack::tables_get()
{
        return tables;
}

/*!
   \param[in] x The new value to set ss_destructor_tables_stack::tables to.
   \author lsg
 */
void ss_destructor_tables_stack::tables_set(const ptr< ::lestes::std::list< srp< ss_destructor_table > > > & x)
{
        ss_destructor_tables_stack::tables = x;
}

/*!
   This factory method for class ss_destructor_tables_stack takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_destructor_tables_stack > ss_destructor_tables_stack::create()
{
        return ptr< ss_destructor_tables_stack > ( new ss_destructor_tables_stack() );
}

/*!
   Generated constructor for class ss_destructor_tables_stack.
   \author lsg
 */
ss_destructor_tables_stack::ss_destructor_tables_stack ()
        : ss_destructor_tables()
{}

ptr< object::reflection_list > ss_destructor_tables_stack::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "current", "ss_destructor_table" ) );
                mdl->push_back( md::create( "tables", "list&lt; srp&lt; ss_destructor_table &gt; &gt;" ) );
                reflection = reflection_list::create( ss_destructor_tables::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_destructor_tables_stack", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_destructor_tables_stack::field_values_get() const
{
        ptr < field_list_list > result = ss_destructor_tables::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->current );
        result->push_back( value_list::create() );
        result->back()->push_back( this->tables );
        return result;
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_destructor_tables_stack::gc_mark()
{
        ss_destructor_tables::gc_mark();
}

// End of class ss_destructor_tables_stack.

// ------------- Class ss_linfo2pi_linfo follows. -------------

/*!
   \returns The value of ss_linfo2pi_linfo::pinfo.
   \author lsg
 */
ptr< ::lestes::md::literals::literal_info_base > ss_linfo2pi_linfo::pinfo_get() const
{
        return pinfo;
}

/*!
   \param[in] x The new value to set ss_linfo2pi_linfo::pinfo to.
   \author lsg
 */
void ss_linfo2pi_linfo::pinfo_set(const ptr< ::lestes::md::literals::literal_info_base > & x)
{
        ss_linfo2pi_linfo::pinfo = x;
}

/*!
   This factory method for class ss_linfo2pi_linfo takes values of all fields as arguments.
   \author lsg
 */
ptr< ss_linfo2pi_linfo > ss_linfo2pi_linfo::create(ptr< ::lestes::md::literals::literal_info_base > a__ss_linfo2pi_linfo__pinfo)
{
        return ptr< ss_linfo2pi_linfo > ( new ss_linfo2pi_linfo(a__ss_linfo2pi_linfo__pinfo) );
}

/*!
   This factory method for class ss_linfo2pi_linfo uses initializers.
   \author lsg
 */
ptr< ss_linfo2pi_linfo > ss_linfo2pi_linfo::create()
{
        return ptr< ss_linfo2pi_linfo > ( new ss_linfo2pi_linfo(NULL) );
}

/*!
   Generated constructor for class ss_linfo2pi_linfo.
   \author lsg
 */
ss_linfo2pi_linfo::ss_linfo2pi_linfo (ptr< ::lestes::md::literals::literal_info_base > a__ss_linfo2pi_linfo__pinfo)
        : ss_literal_info_visitor(), pinfo(a__ss_linfo2pi_linfo__pinfo)
{}

ptr< object::reflection_list > ss_linfo2pi_linfo::reflection_get() const
{
        if (!reflection) {
                typedef class_reflection::field_metadata md;
                typedef class_reflection::field_metadata_list mdlist;
                ptr<mdlist> mdl = mdlist::create();
                mdl->push_back( md::create( "pinfo", "literal_info_base" ) );
                reflection = reflection_list::create( ss_literal_info_visitor::reflection_get() );
                reflection->push_back( class_reflection::create( "ss_linfo2pi_linfo", mdl ) );
        }
        return reflection;
}

ptr< object::field_list_list > ss_linfo2pi_linfo::field_values_get() const
{
        ptr < field_list_list > result = ss_literal_info_visitor::field_values_get();
        result->push_back( value_list::create() );
        result->back()->push_back( this->pinfo );
        return result;
}

ptr< ::lestes::md::literals::literal_info_base > ss_linfo2pi_linfo::get_pinfo( const ptr< ::lestes::lang::cplus::sem::ss_literal_info > & o )
{
        lassert2( o, "Cannot visit NULL object." );
        o->accept_ss_literal_info_visitor( ptr< ss_literal_info_visitor >(this) );
        return pinfo_get();
}


/*!
   Marking routine is used for garbage collection.
   \author lsg
 */
void ss_linfo2pi_linfo::gc_mark()
{
        ss_literal_info_visitor::gc_mark();
}

// End of class ss_linfo2pi_linfo.


// static data members follow 
ptr<object::reflection_list> ss_stmt2pi::reflection = reflection;
ptr<object::reflection_list> ss_decl2pi::reflection = reflection;
ptr<object::reflection_list> ss_decl2mem::reflection = reflection;
ptr<object::reflection_list> ss_type2destructor::reflection = reflection;
ptr<object::reflection_list> ss_expr2destination::reflection = reflection;
ptr<object::reflection_list> ss_expr2pi::reflection = reflection;
ptr<object::reflection_list> ss_destructor_table::reflection = reflection;
ptr< ss_destructor_tables > ss_destructor_tables::singleton_instance = NULL;
ptr<object::reflection_list> ss_destructor_tables::reflection = reflection;
ptr< ss_destructor_table > ss_destructor_tables_stack::current = NULL;
ptr< ::lestes::std::list< srp< ss_destructor_table > > > ss_destructor_tables_stack::tables = ::lestes::std::list< srp< ss_destructor_table > > ::create();
ptr<object::reflection_list> ss_destructor_tables_stack::reflection = reflection;
ptr<object::reflection_list> ss_linfo2pi_linfo::reflection = reflection;

end_package(sem);
end_package(cplus);
end_package(lang);
end_package(lestes);

---