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: //
|
---|