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 | |
---|
19 | TupleExpr::TupleExpr( Expression *_aname ) : Expression( _aname ) { |
---|
20 | } |
---|
21 | |
---|
22 | TupleExpr::TupleExpr( const TupleExpr &other ) : Expression( other ) { |
---|
23 | cloneAll( other.exprs, exprs ); |
---|
24 | } |
---|
25 | |
---|
26 | TupleExpr::~TupleExpr() { |
---|
27 | deleteAll( exprs ); |
---|
28 | } |
---|
29 | |
---|
30 | void TupleExpr::print( std::ostream &os, int indent ) const { |
---|
31 | os << std::string( indent, ' ' ) << "Tuple:" << std::endl; |
---|
32 | printAll( exprs, os, indent+2 ); |
---|
33 | Expression::print( os, indent ); |
---|
34 | } |
---|
35 | |
---|
36 | SolvedTupleExpr::SolvedTupleExpr( std::list<Expression *> &_exprs, Expression *_aname ) : Expression( _aname ) { |
---|
37 | std::copy(_exprs.begin(), _exprs.end(), back_inserter(exprs)); |
---|
38 | } |
---|
39 | |
---|
40 | SolvedTupleExpr::SolvedTupleExpr( const SolvedTupleExpr &other ) : Expression( other ) { |
---|
41 | cloneAll( other.exprs, exprs ); |
---|
42 | } |
---|
43 | |
---|
44 | void SolvedTupleExpr::print( std::ostream &os, int indent ) const { |
---|
45 | os << std::string( indent, ' ' ) << "Solved Tuple:" << std::endl; |
---|
46 | printAll( exprs, os, indent+2 ); |
---|
47 | Expression::print( os, indent ); |
---|
48 | } |
---|
49 | |
---|
50 | // Local Variables: // |
---|
51 | // tab-width: 4 // |
---|
52 | // mode: c++ // |
---|
53 | // compile-command: "make install" // |
---|
54 | // End: // |
---|