source: src/SynTree/TupleExpr.cc @ 4328016

ADTaaron-thesisarm-ehast-experimentalcleanup-dtorsdeferred_resndemanglerenumforall-pointer-decayjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprnew-envno_listpersistent-indexerpthread-emulationqualifiedEnumresolv-newwith_gc
Last change on this file since 4328016 was 23bb1b9, checked in by Rob Schluntz <rschlunt@…>, 8 years ago

refactor VarExprReplacer? and reuse it in TupleAssignExpr?

  • Property mode set to 100644
File size: 4.3 KB
Line 
1//
2// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo
3//
4// The contents of this file are covered under the licence agreement in the
5// file "LICENCE" distributed with Cforall.
6//
7// TupleExpr.cc --
8//
9// Author           : Richard C. Bilson
10// Created On       : Mon May 18 07:44:20 2015
11// Last Modified By : Peter A. Buhr
12// Last Modified On : Mon May 18 10:59:19 2015
13// Update Count     : 1
14//
15
16#include "Expression.h"
17#include "Common/utility.h"
18#include "Type.h"
19#include "Declaration.h"
20#include "Tuples/Tuples.h"
21#include "VarExprReplacer.h"
22
23TupleExpr::TupleExpr( const std::list< Expression * > & exprs, Expression *_aname ) : Expression( _aname ), exprs( exprs ) {
24        if ( ! exprs.empty() ) {
25                if ( std::all_of( exprs.begin(), exprs.end(), [](Expression * expr) { return expr->get_result(); } ) ) {
26                        set_result( Tuples::makeTupleType( exprs ) );
27                }
28        }
29}
30
31TupleExpr::TupleExpr( const TupleExpr &other ) : Expression( other ) {
32        cloneAll( other.exprs, exprs );
33}
34
35TupleExpr::~TupleExpr() {
36        deleteAll( exprs );
37}
38
39void TupleExpr::print( std::ostream &os, int indent ) const {
40        os << "Tuple:" << std::endl;
41        printAll( exprs, os, indent+2 );
42        Expression::print( os, indent );
43}
44
45TupleIndexExpr::TupleIndexExpr( Expression * tuple, unsigned int index ) : tuple( tuple ), index( index )  {
46        TupleType * type = safe_dynamic_cast< TupleType * >( tuple->get_result() );
47        assert( type->size() > index );
48        set_result( (*std::next( type->get_types().begin(), index ))->clone() );
49        get_result()->set_isLvalue( type->get_isLvalue() );
50}
51
52TupleIndexExpr::TupleIndexExpr( const TupleIndexExpr &other ) : Expression( other ), tuple( other.tuple->clone() ), index( other.index ) {
53}
54
55TupleIndexExpr::~TupleIndexExpr() {
56        delete tuple;
57}
58
59void TupleIndexExpr::print( std::ostream &os, int indent ) const {
60        os << "Tuple Index Expression, with tuple:" << std::endl;
61        os << std::string( indent+2, ' ' );
62        tuple->print( os, indent+2 );
63        os << std::string( indent+2, ' ' ) << "with index: " << index << std::endl;
64        Expression::print( os, indent );
65}
66
67MemberTupleExpr::MemberTupleExpr( Expression * member, Expression * aggregate, Expression * _aname ) : Expression( _aname ) {
68        set_result( maybeClone( member->get_result() ) ); // xxx - ???
69}
70
71MemberTupleExpr::MemberTupleExpr( const MemberTupleExpr &other ) : Expression( other ), member( other.member->clone() ), aggregate( other.aggregate->clone() ) {
72}
73
74MemberTupleExpr::~MemberTupleExpr() {
75        delete member;
76        delete aggregate;
77}
78
79void MemberTupleExpr::print( std::ostream &os, int indent ) const {
80        os << "Member Tuple Expression, with aggregate:" << std::endl;
81        os << std::string( indent+2, ' ' );
82        aggregate->print( os, indent+2 );
83        os << std::string( indent+2, ' ' ) << "with member: " << std::endl;
84        os << std::string( indent+2, ' ' );
85        member->print( os, indent+2 );
86        Expression::print( os, indent );
87}
88
89
90TupleAssignExpr::TupleAssignExpr( const std::list< Expression * > & assigns, const std::list< ObjectDecl * > & tempDecls, Expression * _aname ) : Expression( _aname ), assigns( assigns ), tempDecls( tempDecls ) {
91        set_result( Tuples::makeTupleType( assigns ) );
92}
93
94TupleAssignExpr::TupleAssignExpr( const TupleAssignExpr &other ) : Expression( other ) {
95        cloneAll( other.assigns, assigns );
96        cloneAll( other.tempDecls, tempDecls );
97
98        // clone needs to go into assigns and replace tempDecls
99        VarExprReplacer::DeclMap declMap;
100        std::list< ObjectDecl * >::const_iterator origit = other.tempDecls.begin();
101        for ( ObjectDecl * temp : tempDecls ) {
102                assert( origit != other.tempDecls.end() );
103                ObjectDecl * origTemp = *origit++;
104                assert( origTemp );
105                assert( temp->get_name() == origTemp->get_name() );
106                declMap[ origTemp ] = temp;
107        }
108        if ( ! declMap.empty() ) {
109                VarExprReplacer replacer( declMap );
110                for ( Expression * assn : assigns ) {
111                        assn->accept( replacer );
112                }
113        }
114}
115
116TupleAssignExpr::~TupleAssignExpr() {
117        deleteAll( assigns );
118        // deleteAll( tempDecls );
119}
120
121void TupleAssignExpr::print( std::ostream &os, int indent ) const {
122        os << "Tuple Assignment Expression, with temporaries:" << std::endl;
123        printAll( tempDecls, os, indent+4 );
124        os << std::string( indent+2, ' ' ) << "with assignments: " << std::endl;
125        printAll( assigns, os, indent+4 );
126        Expression::print( os, indent );
127}
128
129
130
131// Local Variables: //
132// tab-width: 4 //
133// mode: c++ //
134// compile-command: "make install" //
135// End: //
Note: See TracBrowser for help on using the repository browser.