source: src/SynTree/Expression.cc @ b26144d

arm-ehjacob/cs343-translationnew-ast-unique-expr
Last change on this file since b26144d was b26144d, checked in by Fangren Yu <f37yu@…>, 15 months ago

do not print resolved type in tests

  • Property mode set to 100644
File size: 26.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// Expression.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 : Wed Dec 11 07:55:15 2019
13// Update Count     : 70
14//
15
16#include "SynTree/Expression.h"
17
18#include <cassert>                   // for assert, assertf
19#include <iostream>                  // for ostream, operator<<, basic_ostream
20#include <list>                      // for list, _List_iterator, list<>::co...
21#include <set>                       // for set
22
23#include "Common/utility.h"          // for maybeClone, cloneAll, deleteAll
24#include "Expression.h"              // for Expression, ImplicitCopyCtorExpr
25#include "InitTweak/InitTweak.h"     // for getCallArg, getPointerBase
26#include "Initializer.h"             // for Designation, Initializer
27#include "Statement.h"               // for CompoundStmt, ExprStmt, Statement
28#include "SynTree/BaseSyntaxNode.h"  // for BaseSyntaxNode
29#include "SynTree/Constant.h"        // for Constant
30#include "Type.h"                    // for Type, BasicType, Type::Qualifiers
31#include "TypeSubstitution.h"        // for TypeSubstitution
32#include "CompilationState.h"        // for deterministic_output
33
34#include "GenPoly/Lvalue.h"
35
36void printInferParams( const InferredParams & inferParams, std::ostream & os, Indenter indent, int level ) {
37        if ( ! inferParams.empty() ) {
38                os << indent << "with inferred parameters " << level << ":" << std::endl;
39                for ( InferredParams::const_iterator i = inferParams.begin(); i != inferParams.end(); ++i ) {
40                        os << indent+1;
41                        assert(i->second.declptr);
42                        i->second.declptr->printShort( os, indent+1 );
43                        os << std::endl;
44                        printInferParams( i->second.expr->inferParams, os, indent+1, level+1 );
45                } // for
46        } // if
47}
48
49Expression::Expression() : result( 0 ), env( 0 ) {}
50
51Expression::Expression( const Expression & other ) : BaseSyntaxNode( other ), result( maybeClone( other.result ) ), env( maybeClone( other.env ) ), extension( other.extension ), inferParams( other.inferParams ), resnSlots( other.resnSlots ) {}
52
53void Expression::spliceInferParams( Expression * other ) {
54        if ( ! other ) return;
55        for ( auto p : other->inferParams ) {
56                inferParams[p.first] = std::move( p.second );
57        }
58        resnSlots.insert( resnSlots.end(), other->resnSlots.begin(), other->resnSlots.end() );
59}
60
61Expression::~Expression() {
62        delete env;
63        delete result;
64}
65
66bool Expression::get_lvalue() const {
67        return false;
68}
69
70void Expression::print( std::ostream & os, Indenter indent ) const {
71        printInferParams( inferParams, os, indent+1, 0 );
72
73        if ( result ) {
74                if (!deterministic_output) {
75                        os << std::endl << indent << "with resolved type:" << std::endl;
76                        os << (indent+1);
77                        result->print( os, indent+1 );
78                }
79        }
80
81        if ( env ) {
82                os << std::endl << indent << "... with environment:" << std::endl;
83                env->print( os, indent+1 );
84        } // if
85
86        if ( extension ) {
87                os << std::endl << indent << "... with extension:";
88        } // if
89}
90
91ConstantExpr::ConstantExpr( Constant _c ) : Expression(), constant( _c ) {
92        set_result( constant.get_type()->clone() );
93}
94
95ConstantExpr::ConstantExpr( const ConstantExpr & other) : Expression( other ), constant( other.constant ) {
96}
97
98ConstantExpr::~ConstantExpr() {}
99
100void ConstantExpr::print( std::ostream & os, Indenter indent ) const {
101        os << "constant expression " ;
102        constant.print( os );
103        Expression::print( os, indent );
104}
105
106long long int ConstantExpr::intValue() const {
107        if ( BasicType * basicType = dynamic_cast< BasicType * >( result ) ) {
108                if ( basicType->isInteger() ) {
109                        return get_constant()->get_ival();
110                }
111        } else if ( dynamic_cast< OneType * >( result ) ) {
112                return 1;
113        } else if ( dynamic_cast< ZeroType * >( result ) ) {
114                return 0;
115        }
116        SemanticError( this, "Constant expression of non-integral type " );
117}
118
119VariableExpr::VariableExpr() : Expression(), var( nullptr ) {}
120
121VariableExpr::VariableExpr( DeclarationWithType *_var ) : Expression(), var( _var ) {
122        assert( var );
123        assert( var->get_type() );
124        Type * type = var->get_type()->clone();
125
126        // xxx - doesn't quite work yet - get different alternatives with the same cost
127
128        // // enumerators are not lvalues
129        // if ( EnumInstType * inst = dynamic_cast< EnumInstType * >( var->get_type() ) ) {
130        //      assert( inst->baseEnum );
131        //      EnumDecl * decl = inst->baseEnum;
132        //      long long int value;
133        //      if ( decl->valueOf( var, value ) ) {
134        //              type->set_lvalue( false ); // Would have to move to get_lvalue.
135        //      }
136        // }
137
138        set_result( type );
139}
140
141VariableExpr::VariableExpr( const VariableExpr & other ) : Expression( other ), var( other.var ) {
142}
143
144VariableExpr::~VariableExpr() {
145        // don't delete the declaration, since it points somewhere else in the tree
146}
147
148bool VariableExpr::get_lvalue() const {
149        // It isn't always an lvalue, but it is never an rvalue.
150        return true;
151}
152
153VariableExpr * VariableExpr::functionPointer( FunctionDecl * func ) {
154        VariableExpr * funcExpr = new VariableExpr( func );
155        funcExpr->set_result( new PointerType( Type::Qualifiers(), funcExpr->get_result() ) );
156        return funcExpr;
157}
158
159void VariableExpr::print( std::ostream & os, Indenter indent ) const {
160        os << "Variable Expression: ";
161        var->printShort(os, indent);
162        Expression::print( os, indent );
163}
164
165SizeofExpr::SizeofExpr( Expression * expr_ ) :
166                Expression(), expr(expr_), type(0), isType(false) {
167        set_result( new BasicType( Type::Qualifiers(), BasicType::LongUnsignedInt ) );
168}
169
170SizeofExpr::SizeofExpr( Type * type_ ) :
171                Expression(), expr(0), type(type_), isType(true) {
172        set_result( new BasicType( Type::Qualifiers(), BasicType::LongUnsignedInt ) );
173}
174
175SizeofExpr::SizeofExpr( const SizeofExpr & other ) :
176        Expression( other ), expr( maybeClone( other.expr ) ), type( maybeClone( other.type ) ), isType( other.isType ) {
177}
178
179SizeofExpr::~SizeofExpr() {
180        delete expr;
181        delete type;
182}
183
184void SizeofExpr::print( std::ostream & os, Indenter indent) const {
185        os << "Sizeof Expression on: ";
186        if (isType) type->print(os, indent+1);
187        else expr->print(os, indent+1);
188        Expression::print( os, indent );
189}
190
191AlignofExpr::AlignofExpr( Expression * expr_ ) :
192                Expression(), expr(expr_), type(0), isType(false) {
193        set_result( new BasicType( Type::Qualifiers(), BasicType::LongUnsignedInt ) );
194}
195
196AlignofExpr::AlignofExpr( Type * type_ ) :
197                Expression(), expr(0), type(type_), isType(true) {
198        set_result( new BasicType( Type::Qualifiers(), BasicType::LongUnsignedInt ) );
199}
200
201AlignofExpr::AlignofExpr( const AlignofExpr & other ) :
202        Expression( other ), expr( maybeClone( other.expr ) ), type( maybeClone( other.type ) ), isType( other.isType ) {
203}
204
205AlignofExpr::~AlignofExpr() {
206        delete expr;
207        delete type;
208}
209
210void AlignofExpr::print( std::ostream & os, Indenter indent) const {
211        os << "Alignof Expression on: ";
212        if (isType) type->print(os, indent+1);
213        else expr->print(os, indent+1);
214        Expression::print( os, indent );
215}
216
217UntypedOffsetofExpr::UntypedOffsetofExpr( Type * type, const std::string & member ) :
218                Expression(), type(type), member(member) {
219        assert( type );
220        set_result( new BasicType( Type::Qualifiers(), BasicType::LongUnsignedInt ) );
221}
222
223UntypedOffsetofExpr::UntypedOffsetofExpr( const UntypedOffsetofExpr & other ) :
224        Expression( other ), type( maybeClone( other.type ) ), member( other.member ) {}
225
226UntypedOffsetofExpr::~UntypedOffsetofExpr() {
227        delete type;
228}
229
230void UntypedOffsetofExpr::print( std::ostream & os, Indenter indent) const {
231        os << "Untyped Offsetof Expression on member " << member << " of ";
232        type->print(os, indent+1);
233        Expression::print( os, indent );
234}
235
236OffsetofExpr::OffsetofExpr( Type * type, DeclarationWithType * member ) :
237                Expression(), type(type), member(member) {
238        assert( member );
239        assert( type );
240        set_result( new BasicType( Type::Qualifiers(), BasicType::LongUnsignedInt ) );
241}
242
243OffsetofExpr::OffsetofExpr( const OffsetofExpr & other ) :
244        Expression( other ), type( maybeClone( other.type ) ), member( other.member ) {}
245
246OffsetofExpr::~OffsetofExpr() {
247        delete type;
248}
249
250void OffsetofExpr::print( std::ostream & os, Indenter indent) const {
251        os << "Offsetof Expression on member " << member->name << " of ";
252        type->print(os, indent+1);
253        Expression::print( os, indent );
254}
255
256OffsetPackExpr::OffsetPackExpr( StructInstType * type ) : Expression(), type( type ) {
257        assert( type );
258        set_result( new ArrayType( Type::Qualifiers(), new BasicType( Type::Qualifiers(), BasicType::LongUnsignedInt ), 0, false, false ) );
259}
260
261OffsetPackExpr::OffsetPackExpr( const OffsetPackExpr & other ) : Expression( other ), type( maybeClone( other.type ) ) {}
262
263OffsetPackExpr::~OffsetPackExpr() { delete type; }
264
265void OffsetPackExpr::print( std::ostream & os, Indenter indent ) const {
266        os << "Offset pack expression on ";
267        type->print(os, indent+1);
268        Expression::print( os, indent );
269}
270
271CastExpr::CastExpr( Expression * arg, Type * toType, bool isGenerated ) : arg(arg), isGenerated( isGenerated ) {
272        set_result(toType);
273}
274
275CastExpr::CastExpr( Expression * arg, bool isGenerated ) : arg(arg), isGenerated( isGenerated ) {
276        set_result( new VoidType( Type::Qualifiers() ) );
277}
278
279CastExpr::CastExpr( const CastExpr & other ) : Expression( other ), arg( maybeClone( other.arg ) ), isGenerated( other.isGenerated ) {
280}
281
282CastExpr::~CastExpr() {
283        delete arg;
284}
285
286bool CastExpr::get_lvalue() const {
287        // This is actually wrong by C, but it works with our current set-up.
288        return arg->get_lvalue();
289}
290
291void CastExpr::print( std::ostream & os, Indenter indent ) const {
292        os << (isGenerated ? "Generated " : "Explicit ") << "Cast of:" << std::endl << indent+1;
293        arg->print(os, indent+1);
294        os << std::endl << indent << "... to:";
295        if ( result->isVoid() ) {
296                os << " nothing";
297        } else {
298                os << std::endl << indent+1;
299                result->print( os, indent+1 );
300        } // if
301        Expression::print( os, indent );
302}
303
304KeywordCastExpr::KeywordCastExpr( Expression * arg, AggregateDecl::Aggregate target ) : Expression(), arg(arg), target( target ) {
305}
306
307KeywordCastExpr::KeywordCastExpr( const KeywordCastExpr & other ) : Expression( other ), arg( maybeClone( other.arg ) ), target( other.target ) {
308}
309
310KeywordCastExpr::~KeywordCastExpr() {
311        delete arg;
312}
313
314const char * KeywordCastExpr::targetString() const {
315        return AggregateDecl::aggrString( target );
316}
317
318void KeywordCastExpr::print( std::ostream & os, Indenter indent ) const {
319        os << "Keyword Cast of:" << std::endl << indent+1;
320        arg->print(os, indent+1);
321        os << std::endl << indent << "... to: ";
322        os << targetString();
323        Expression::print( os, indent );
324}
325
326VirtualCastExpr::VirtualCastExpr( Expression * arg_, Type * toType ) : Expression(), arg(arg_) {
327        set_result(toType);
328}
329
330VirtualCastExpr::VirtualCastExpr( const VirtualCastExpr & other ) : Expression( other ), arg( maybeClone( other.arg ) ) {
331}
332
333VirtualCastExpr::~VirtualCastExpr() {
334        delete arg;
335}
336
337void VirtualCastExpr::print( std::ostream & os, Indenter indent ) const {
338        os << "Virtual Cast of:" << std::endl << indent+1;
339        arg->print(os, indent+1);
340        os << std::endl << indent << "... to:";
341        if ( ! result ) {
342                os << " unknown";
343        } else {
344                os << std::endl << indent+1;
345                result->print( os, indent+1 );
346        } // if
347        Expression::print( os, indent );
348}
349
350UntypedMemberExpr::UntypedMemberExpr( Expression * member, Expression * aggregate ) :
351                Expression(), member(member), aggregate(aggregate) {
352        assert( aggregate );
353}
354
355UntypedMemberExpr::UntypedMemberExpr( const UntypedMemberExpr & other ) :
356                Expression( other ), member( maybeClone( other.member ) ), aggregate( maybeClone( other.aggregate ) ) {
357}
358
359UntypedMemberExpr::~UntypedMemberExpr() {
360        delete aggregate;
361        delete member;
362}
363
364bool UntypedMemberExpr::get_lvalue() const {
365        return aggregate->get_lvalue();
366}
367
368void UntypedMemberExpr::print( std::ostream & os, Indenter indent ) const {
369        os << "Untyped Member Expression, with field: " << std::endl << indent+1;
370        member->print(os, indent+1 );
371        os << indent << "... from aggregate:" << std::endl << indent+1;
372        aggregate->print(os, indent+1);
373        Expression::print( os, indent );
374}
375
376MemberExpr::MemberExpr( DeclarationWithType * member, Expression * aggregate ) :
377                Expression(), member(member), aggregate(aggregate) {
378        assert( member );
379        assert( aggregate );
380        assert( aggregate->result );
381
382        TypeSubstitution sub = aggregate->result->genericSubstitution();
383        Type * res = member->get_type()->clone();
384        sub.apply( res );
385        result = res;
386        result->get_qualifiers() |= aggregate->result->get_qualifiers();
387}
388
389MemberExpr::MemberExpr( const MemberExpr & other ) :
390                Expression( other ), member( other.member ), aggregate( maybeClone( other.aggregate ) ) {
391}
392
393MemberExpr::~MemberExpr() {
394        // don't delete the member declaration, since it points somewhere else in the tree
395        delete aggregate;
396}
397
398bool MemberExpr::get_lvalue() const {
399        // This is actually wrong by C, but it works with our current set-up.
400        return true;
401}
402
403void MemberExpr::print( std::ostream & os, Indenter indent ) const {
404        os << "Member Expression, with field:" << std::endl;
405        os << indent+1;
406        member->print( os, indent+1 );
407        os << std::endl << indent << "... from aggregate:" << std::endl << indent+1;
408        aggregate->print(os, indent + 1);
409        Expression::print( os, indent );
410}
411
412UntypedExpr::UntypedExpr( Expression * function, const std::list<Expression *> & args ) :
413                Expression(), function(function), args(args) {}
414
415UntypedExpr::UntypedExpr( const UntypedExpr & other ) :
416                Expression( other ), function( maybeClone( other.function ) ) {
417        cloneAll( other.args, args );
418}
419
420UntypedExpr::~UntypedExpr() {
421        delete function;
422        deleteAll( args );
423}
424
425UntypedExpr * UntypedExpr::createDeref( Expression * expr ) {
426        UntypedExpr * ret = new UntypedExpr( new NameExpr("*?"), std::list< Expression * >{ expr } );
427        if ( Type * type = expr->get_result() ) {
428                Type * base = InitTweak::getPointerBase( type );
429                assertf( base, "expected pointer type in dereference (type was %s)", toString( type ).c_str() );
430                ret->set_result( base->clone() );
431                if ( GenPoly::referencesPermissable() ) {
432                        // if references are still allowed in the AST, dereference returns a reference
433                        ret->set_result( new ReferenceType( Type::Qualifiers(), ret->get_result() ) );
434                }
435        }
436        return ret;
437}
438
439UntypedExpr * UntypedExpr::createAssign( Expression * arg1, Expression * arg2 ) {
440        assert( arg1 && arg2 );
441        UntypedExpr * ret = new UntypedExpr( new NameExpr( "?=?" ), std::list< Expression * >{ arg1, arg2 } );
442        if ( arg1->get_result() && arg2->get_result() ) {
443                // if both expressions are typed, assumes that this assignment is a C bitwise assignment,
444                // so the result is the type of the RHS
445                ret->set_result( arg2->get_result()->clone() );
446        }
447        return ret;
448}
449
450bool UntypedExpr::get_lvalue() const {
451        // from src/GenPoly/Lvalue.cc: isIntrinsicReference
452        static std::set<std::string> lvalueFunctions = { "*?", "?[?]" };
453        std::string fname = InitTweak::getFunctionName( const_cast< UntypedExpr * >( this ) );
454        return lvalueFunctions.count(fname);
455}
456
457void UntypedExpr::print( std::ostream & os, Indenter indent ) const {
458        os << "Applying untyped:" << std::endl;
459        os << indent+1;
460        function->print(os, indent+1);
461        os << std::endl << indent << "...to:" << std::endl;
462        printAll(args, os, indent+1);
463        Expression::print( os, indent );
464}
465
466NameExpr::NameExpr( std::string name ) : Expression(), name(name) {
467        assertf(name != "0", "Zero is not a valid name");
468        assertf(name != "1", "One is not a valid name");
469}
470
471NameExpr::NameExpr( const NameExpr & other ) : Expression( other ), name( other.name ) {
472}
473
474NameExpr::~NameExpr() {}
475
476void NameExpr::print( std::ostream & os, Indenter indent ) const {
477        os << "Name: " << get_name();
478        Expression::print( os, indent );
479}
480
481LogicalExpr::LogicalExpr( Expression * arg1_, Expression * arg2_, bool andp ) :
482                Expression(), arg1(arg1_), arg2(arg2_), isAnd(andp) {
483        set_result( new BasicType( Type::Qualifiers(), BasicType::SignedInt ) );
484}
485
486LogicalExpr::LogicalExpr( const LogicalExpr & other ) :
487                Expression( other ), arg1( maybeClone( other.arg1 ) ), arg2( maybeClone( other.arg2 ) ), isAnd( other.isAnd ) {
488}
489
490LogicalExpr::~LogicalExpr() {
491        delete arg1;
492        delete arg2;
493}
494
495void LogicalExpr::print( std::ostream & os, Indenter indent )const {
496        os << "Short-circuited operation (" << (isAnd ? "and" : "or") << ") on: ";
497        arg1->print(os);
498        os << " and ";
499        arg2->print(os);
500        Expression::print( os, indent );
501}
502
503ConditionalExpr::ConditionalExpr( Expression * arg1, Expression * arg2, Expression * arg3 ) :
504                Expression(), arg1(arg1), arg2(arg2), arg3(arg3) {}
505
506ConditionalExpr::ConditionalExpr( const ConditionalExpr & other ) :
507                Expression( other ), arg1( maybeClone( other.arg1 ) ), arg2( maybeClone( other.arg2 ) ), arg3( maybeClone( other.arg3 ) ) {
508}
509
510ConditionalExpr::~ConditionalExpr() {
511        delete arg1;
512        delete arg2;
513        delete arg3;
514}
515
516bool ConditionalExpr::get_lvalue() const {
517        return false;
518}
519
520void ConditionalExpr::print( std::ostream & os, Indenter indent ) const {
521        os << "Conditional expression on: " << std::endl << indent+1;
522        arg1->print( os, indent+1 );
523        os << indent << "First alternative:" << std::endl << indent+1;
524        arg2->print( os, indent+1 );
525        os << indent << "Second alternative:" << std::endl << indent+1;
526        arg3->print( os, indent+1 );
527        Expression::print( os, indent );
528}
529
530AsmExpr::AsmExpr( const AsmExpr & other ) : Expression( other ), inout( other.inout ), constraint( maybeClone( other.constraint ) ), operand( maybeClone( other.operand ) ) {}
531
532
533void AsmExpr::print( std::ostream & os, Indenter indent ) const {
534        os << "Asm Expression: " << std::endl;
535        if ( !inout.empty() ) os <<  "[" << inout << "] ";
536        if ( constraint ) constraint->print( os, indent+1 );
537        if ( operand ) operand->print( os, indent+1 );
538}
539
540
541ImplicitCopyCtorExpr::ImplicitCopyCtorExpr( ApplicationExpr * callExpr ) : callExpr( callExpr ) {
542        assert( callExpr );
543        assert( callExpr->result );
544        set_result( callExpr->result->clone() );
545}
546
547ImplicitCopyCtorExpr::ImplicitCopyCtorExpr( const ImplicitCopyCtorExpr & other ) : Expression( other ), callExpr( maybeClone( other.callExpr ) ) {
548}
549
550ImplicitCopyCtorExpr::~ImplicitCopyCtorExpr() {
551        set_env( nullptr ); // ImplicitCopyCtorExpr does not take ownership of an environment
552        delete callExpr;
553}
554
555void ImplicitCopyCtorExpr::print( std::ostream & os, Indenter indent ) const {
556        os <<  "Implicit Copy Constructor Expression: " << std::endl << indent+1;
557        callExpr->print( os, indent+1 );
558}
559
560
561ConstructorExpr::ConstructorExpr( Expression * callExpr ) : callExpr( callExpr ) {
562        // allow resolver to type a constructor used as an expression as if it has the same type as its first argument
563        assert( callExpr );
564        Expression * arg = InitTweak::getCallArg( callExpr, 0 );
565        assert( arg );
566        set_result( maybeClone( arg->result ) );
567}
568
569ConstructorExpr::ConstructorExpr( const ConstructorExpr & other ) : Expression( other ), callExpr( maybeClone( other.callExpr ) ) {
570}
571
572ConstructorExpr::~ConstructorExpr() {
573        delete callExpr;
574}
575
576bool ConstructorExpr::get_lvalue() const {
577        return false;
578}
579
580void ConstructorExpr::print( std::ostream & os, Indenter indent ) const {
581        os <<  "Constructor Expression: " << std::endl << indent+1;
582        callExpr->print( os, indent + 2 );
583        Expression::print( os, indent );
584}
585
586
587CompoundLiteralExpr::CompoundLiteralExpr( Type * type, Initializer * initializer ) : initializer( initializer ) {
588        assert( type && initializer );
589        set_result( type );
590}
591
592CompoundLiteralExpr::CompoundLiteralExpr( const CompoundLiteralExpr & other ) : Expression( other ), initializer( other.initializer->clone() ) {}
593
594CompoundLiteralExpr::~CompoundLiteralExpr() {
595        delete initializer;
596}
597
598bool CompoundLiteralExpr::get_lvalue() const {
599        return true;
600}
601
602void CompoundLiteralExpr::print( std::ostream & os, Indenter indent ) const {
603        os << "Compound Literal Expression: " << std::endl << indent+1;
604        result->print( os, indent+1 );
605        os << indent+1;
606        initializer->print( os, indent+1 );
607        Expression::print( os, indent );
608}
609
610RangeExpr::RangeExpr( Expression * low, Expression * high ) : low( low ), high( high ) {}
611RangeExpr::RangeExpr( const RangeExpr & other ) : Expression( other ), low( other.low->clone() ), high( other.high->clone() ) {}
612void RangeExpr::print( std::ostream & os, Indenter indent ) const {
613        os << "Range Expression: ";
614        low->print( os, indent );
615        os << " ... ";
616        high->print( os, indent );
617        Expression::print( os, indent );
618}
619
620StmtExpr::StmtExpr( CompoundStmt * statements ) : statements( statements ) {
621        computeResult();
622}
623StmtExpr::StmtExpr( const StmtExpr & other ) : Expression( other ), statements( other.statements->clone() ), resultExpr( other.resultExpr ) {
624        cloneAll( other.returnDecls, returnDecls );
625        cloneAll( other.dtors, dtors );
626}
627StmtExpr::~StmtExpr() {
628        delete statements;
629        deleteAll( dtors );
630        deleteAll( returnDecls );
631}
632void StmtExpr::computeResult() {
633        assert( statements );
634        std::list< Statement * > & body = statements->kids;
635        delete result;
636        result = nullptr;
637        if ( ! returnDecls.empty() ) {
638                // prioritize return decl for result type, since if a return decl exists, then
639                // the StmtExpr is currently in an intermediate state where the body will always
640                // give a void result type.
641                result = returnDecls.front()->get_type()->clone();
642        } else if ( ! body.empty() ) {
643                if ( ExprStmt * exprStmt = dynamic_cast< ExprStmt * >( body.back() ) ) {
644                        result = maybeClone( exprStmt->expr->result );
645                }
646        }
647        // ensure that StmtExpr has a result type
648        if ( ! result ) {
649                result = new VoidType( Type::Qualifiers() );
650        }
651}
652bool StmtExpr::get_lvalue() const {
653        return false;
654}
655void StmtExpr::print( std::ostream & os, Indenter indent ) const {
656        os << "Statement Expression: " << std::endl << indent+1;
657        statements->print( os, indent+1 );
658        if ( ! returnDecls.empty() ) {
659                os << indent+1 << "... with returnDecls: ";
660                printAll( returnDecls, os, indent+1 );
661        }
662        if ( ! dtors.empty() ) {
663                os << indent+1 << "... with dtors: ";
664                printAll( dtors, os, indent+1 );
665        }
666        Expression::print( os, indent );
667}
668
669
670long long UniqueExpr::count = 0;
671UniqueExpr::UniqueExpr( Expression * expr, long long idVal ) : expr( expr ), object( nullptr ), var( nullptr ), id( idVal ) {
672        assert( expr );
673        assert( count != -1 );
674        if ( id == -1 ) id = count++;
675        if ( expr->get_result() ) {
676                set_result( expr->get_result()->clone() );
677        }
678}
679UniqueExpr::UniqueExpr( const UniqueExpr & other ) : Expression( other ), expr( maybeClone( other.expr ) ), object( maybeClone( other.object ) ), var( maybeClone( other.var ) ), id( other.id ) {
680}
681UniqueExpr::~UniqueExpr() {
682        delete expr;
683        delete object;
684        delete var;
685}
686void UniqueExpr::print( std::ostream & os, Indenter indent ) const {
687        os << "Unique Expression with id:" << id << std::endl << indent+1;
688        expr->print( os, indent+1 );
689        if ( object ) {
690                os << indent << "... with decl: ";
691                get_object()->printShort( os, indent+1 );
692        }
693        Expression::print( os, indent );
694}
695
696InitAlternative::InitAlternative( Type * type, Designation * designation ) : type( type ), designation( designation ) {}
697InitAlternative::InitAlternative( const InitAlternative & other ) : type( maybeClone( other.type ) ), designation( maybeClone( other.designation ) ) {}
698InitAlternative::~InitAlternative() {
699        delete type;
700        delete designation;
701}
702
703UntypedInitExpr::UntypedInitExpr( Expression * expr, const std::list<InitAlternative> & initAlts ) : expr( expr ), initAlts( initAlts ) {}
704UntypedInitExpr::UntypedInitExpr( const UntypedInitExpr & other ) : Expression( other ), expr( maybeClone( other.expr ) ), initAlts( other.initAlts ) {}
705UntypedInitExpr::~UntypedInitExpr() {
706        delete expr;
707}
708
709void UntypedInitExpr::print( std::ostream & os, Indenter indent ) const {
710        os << "Untyped Init Expression" << std::endl << indent+1;
711        expr->print( os, indent+1 );
712        if ( ! initAlts.empty() ) {
713                for ( const InitAlternative & alt : initAlts ) {
714                        os << indent+1 <<  "InitAlternative: ";
715                        alt.type->print( os, indent+1 );
716                        alt.designation->print( os, indent+1 );
717                }
718        }
719}
720
721InitExpr::InitExpr( Expression * expr, Designation * designation ) : expr( expr ), designation( designation ) {
722        set_result( expr->get_result()->clone() );
723}
724InitExpr::InitExpr( const InitExpr & other ) : Expression( other ), expr( maybeClone( other.expr ) ), designation( maybeClone( other.designation) ) {}
725InitExpr::~InitExpr() {
726        delete expr;
727        delete designation;
728}
729
730void InitExpr::print( std::ostream & os, Indenter indent ) const {
731        os << "Init Expression" << std::endl << indent+1;
732        expr->print( os, indent+1 );
733        os << indent+1 << "... with designation: ";
734        designation->print( os, indent+1 );
735}
736
737DeletedExpr::DeletedExpr( Expression * expr, Declaration * deleteStmt ) : expr( expr ), deleteStmt( deleteStmt ) {
738        assert( expr->result );
739        result = expr->result->clone();
740}
741DeletedExpr::DeletedExpr( const DeletedExpr & other ) : Expression( other ), expr( maybeClone( other.expr ) ), deleteStmt( other.deleteStmt ) {}
742DeletedExpr::~DeletedExpr() {
743        delete expr;
744}
745
746void DeletedExpr::print( std::ostream & os, Indenter indent ) const {
747        os << "Deleted Expression" << std::endl << indent+1;
748        expr->print( os, indent+1 );
749        os << std::endl << indent+1 << "... deleted by: ";
750        deleteStmt->print( os, indent+1 );
751}
752
753
754DefaultArgExpr::DefaultArgExpr( Expression * expr ) : expr( expr ) {
755        assert( expr->result );
756        result = expr->result->clone();
757}
758DefaultArgExpr::DefaultArgExpr( const DefaultArgExpr & other ) : Expression( other ), expr( maybeClone( other.expr ) ) {}
759DefaultArgExpr::~DefaultArgExpr() {
760        delete expr;
761}
762
763void DefaultArgExpr::print( std::ostream & os, Indenter indent ) const {
764        os << "Default Argument Expression" << std::endl << indent+1;
765        expr->print( os, indent+1 );
766}
767
768GenericExpr::Association::Association( Type * type, Expression * expr ) : type( type ), expr( expr ), isDefault( false ) {}
769GenericExpr::Association::Association( Expression * expr ) : type( nullptr ), expr( expr ), isDefault( true ) {}
770GenericExpr::Association::Association( const Association & other ) : type( maybeClone( other.type ) ), expr( maybeClone( other.expr ) ), isDefault( other.isDefault ) {}
771GenericExpr::Association::~Association() {
772        delete type;
773        delete expr;
774}
775
776GenericExpr::GenericExpr( Expression * control, const std::list<Association> & assoc ) : Expression(), control( control ), associations( assoc ) {}
777GenericExpr::GenericExpr( const GenericExpr & other ) : Expression(other), control( maybeClone( other.control ) ), associations( other.associations ) {
778}
779GenericExpr::~GenericExpr() {
780        delete control;
781}
782
783void GenericExpr::print( std::ostream & os, Indenter indent ) const {
784        os << "C11 _Generic Expression" << std::endl << indent+1;
785        control->print( os, indent+1 );
786        os << std::endl << indent+1 << "... with associations: " << std::endl;
787        for ( const Association & assoc : associations ) {
788                os << indent+1;
789                if (assoc.isDefault) {
790                        os << "... default: ";
791                        assoc.expr->print( os, indent+1 );
792                } else {
793                        os << "... type: ";
794                        assoc.type->print( os, indent+1 );
795                        os << std::endl << indent+1 << "... expression: ";
796                        assoc.expr->print( os, indent+1 );
797                        os << std::endl;
798                }
799                os << std::endl;
800        }
801}
802
803// Local Variables: //
804// tab-width: 4 //
805// mode: c++ //
806// compile-command: "make install" //
807// End: //
Note: See TracBrowser for help on using the repository browser.