source: src/SynTree/TupleExpr.cc @ 849720f

ADTarm-ehast-experimentalenumforall-pointer-decayjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprpthread-emulationqualifiedEnum
Last change on this file since 849720f was 849720f, checked in by Andrew Beach <ajbeach@…>, 5 years ago

lvalue should now always come directly from the expression.

  • Property mode set to 100644
File size: 4.5 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 : Andrew Beach
12// Last Modified On : Wed Aug 14 14:34:00 2019
13// Update Count     : 5
14//
15
16#include <cassert>              // for assert, strict_dynamic_cast, assertf
17#include <iterator>             // for next
18#include <list>                 // for list, _List_iterator
19#include <ostream>              // for ostream, operator<<, basic_ostream, endl
20#include <string>               // for operator<<, string, char_traits
21
22#include "Common/utility.h"     // for cloneAll, deleteAll, printAll, toString
23#include "Declaration.h"        // for ObjectDecl
24#include "Expression.h"         // for Expression, TupleExpr, TupleIndexExpr
25#include "SynTree/Label.h"      // for Label
26#include "SynTree/Statement.h"  // for CompoundStmt, DeclStmt, ExprStmt, Sta...
27#include "Tuples/Tuples.h"      // for makeTupleType
28#include "Type.h"               // for TupleType, Type
29
30UntypedTupleExpr::UntypedTupleExpr( const std::list< Expression * > & exprs ) : Expression(), exprs( exprs ) {
31}
32
33UntypedTupleExpr::UntypedTupleExpr( const UntypedTupleExpr &other ) : Expression( other ) {
34        cloneAll( other.exprs, exprs );
35}
36
37UntypedTupleExpr::~UntypedTupleExpr() {
38        deleteAll( exprs );
39}
40
41void UntypedTupleExpr::print( std::ostream &os, Indenter indent ) const {
42        os << "Untyped Tuple:" << std::endl;
43        printAll( exprs, os, indent+1 );
44        Expression::print( os, indent );
45}
46
47TupleExpr::TupleExpr( const std::list< Expression * > & exprs ) : Expression(), exprs( exprs ) {
48        set_result( Tuples::makeTupleType( exprs ) );
49}
50
51TupleExpr::TupleExpr( const TupleExpr &other ) : Expression( other ) {
52        cloneAll( other.exprs, exprs );
53}
54
55TupleExpr::~TupleExpr() {
56        deleteAll( exprs );
57}
58
59bool TupleExpr::get_lvalue() const {
60        return false;
61}
62
63void TupleExpr::print( std::ostream &os, Indenter indent ) const {
64        os << "Tuple:" << std::endl;
65        printAll( exprs, os, indent+1 );
66        Expression::print( os, indent );
67}
68
69TupleIndexExpr::TupleIndexExpr( Expression * tuple, unsigned int index ) : tuple( tuple ), index( index )  {
70        TupleType * type = strict_dynamic_cast< TupleType * >( tuple->get_result() );
71        assertf( type->size() > index, "TupleIndexExpr index out of bounds: tuple size %d, requested index %d in expr %s", type->size(), index, toString( tuple ).c_str() );
72        set_result( (*std::next( type->get_types().begin(), index ))->clone() );
73        // like MemberExpr, TupleIndexExpr is always an lvalue
74        get_result()->set_lvalue( true );
75}
76
77TupleIndexExpr::TupleIndexExpr( const TupleIndexExpr &other ) : Expression( other ), tuple( other.tuple->clone() ), index( other.index ) {
78}
79
80TupleIndexExpr::~TupleIndexExpr() {
81        delete tuple;
82}
83
84bool TupleIndexExpr::get_lvalue() const {
85        return tuple->get_lvalue();
86}
87
88void TupleIndexExpr::print( std::ostream &os, Indenter indent ) const {
89        os << "Tuple Index Expression, with tuple:" << std::endl;
90        os << indent+1;
91        tuple->print( os, indent+1 );
92        os << indent+1 << "with index: " << index << std::endl;
93        Expression::print( os, indent );
94}
95
96TupleAssignExpr::TupleAssignExpr( const std::list< Expression * > & assigns, const std::list< ObjectDecl * > & tempDecls ) : Expression() {
97        // convert internally into a StmtExpr which contains the declarations and produces the tuple of the assignments
98        set_result( Tuples::makeTupleType( assigns ) );
99        CompoundStmt * compoundStmt = new CompoundStmt();
100        std::list< Statement * > & stmts = compoundStmt->get_kids();
101        for ( ObjectDecl * obj : tempDecls ) {
102                stmts.push_back( new DeclStmt( obj ) );
103        }
104        TupleExpr * tupleExpr = new TupleExpr( assigns );
105        assert( tupleExpr->get_result() );
106        stmts.push_back( new ExprStmt( tupleExpr ) );
107        stmtExpr = new StmtExpr( compoundStmt );
108}
109
110TupleAssignExpr::TupleAssignExpr( const TupleAssignExpr &other ) : Expression( other ) {
111        assert( other.stmtExpr );
112        stmtExpr = other.stmtExpr->clone();
113}
114
115TupleAssignExpr::TupleAssignExpr( 
116        StmtExpr * s )
117: Expression(), stmtExpr(s) {
118}
119
120
121TupleAssignExpr::~TupleAssignExpr() {
122        delete stmtExpr;
123}
124
125void TupleAssignExpr::print( std::ostream &os, Indenter indent ) const {
126        os << "Tuple Assignment Expression, with stmt expr:" << std::endl;
127        os << indent+1;
128        stmtExpr->print( os, indent+1 );
129        Expression::print( os, indent );
130}
131
132
133
134// Local Variables: //
135// tab-width: 4 //
136// mode: c++ //
137// compile-command: "make install" //
138// End: //
Note: See TracBrowser for help on using the repository browser.