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 | // CommaExpr.cc -- |
---|
8 | // |
---|
9 | // Author : Richard C. Bilson |
---|
10 | // Created On : Mon May 18 07:44:20 2015 |
---|
11 | // Last Modified By : Rob Schluntz |
---|
12 | // Last Modified On : Mon May 02 15:19:44 2016 |
---|
13 | // Update Count : 1 |
---|
14 | // |
---|
15 | |
---|
16 | #include <ostream> // for ostream, endl, operator<<, basic_ostream |
---|
17 | #include <string> // for operator<<, string |
---|
18 | |
---|
19 | #include "Common/utility.h" // for maybeClone |
---|
20 | #include "Expression.h" // for CommaExpr, Expression |
---|
21 | #include "Type.h" // for Type |
---|
22 | |
---|
23 | CommaExpr::CommaExpr( Expression *arg1, Expression *arg2, Expression *_aname ) |
---|
24 | : Expression( _aname ), arg1( arg1 ), arg2( arg2 ) { |
---|
25 | // xxx - result of a comma expression is never an lvalue, so should set lvalue |
---|
26 | // to false on all result types. Actually doing this causes some strange things |
---|
27 | // to happen in later passes (particularly, Specialize, Lvalue, and Box). This needs to be looked into. |
---|
28 | set_result( maybeClone( arg2->get_result() ) ); |
---|
29 | // get_type->set_isLvalue( false ); |
---|
30 | } |
---|
31 | |
---|
32 | CommaExpr::CommaExpr( const CommaExpr &other ) |
---|
33 | : Expression( other ), arg1( maybeClone( other.arg1 ) ), arg2( maybeClone( other.arg2 ) ) { |
---|
34 | } |
---|
35 | |
---|
36 | CommaExpr::~CommaExpr() { |
---|
37 | delete arg1; |
---|
38 | delete arg2; |
---|
39 | } |
---|
40 | |
---|
41 | void CommaExpr::print( std::ostream &os, Indenter indent ) const { |
---|
42 | os << "Comma Expression:" << std::endl; |
---|
43 | os << (indent+1); |
---|
44 | arg1->print( os, indent+1 ); |
---|
45 | os << std::endl; |
---|
46 | os << (indent+1); |
---|
47 | arg2->print( os, indent+1 ); |
---|
48 | Expression::print( os, indent ); |
---|
49 | } |
---|
50 | |
---|
51 | // Local Variables: // |
---|
52 | // tab-width: 4 // |
---|
53 | // mode: c++ // |
---|
54 | // compile-command: "make install" // |
---|
55 | // End: // |
---|