source: src/SynTree/ApplicationExpr.cc @ b45d4b2

aaron-thesisarm-ehcleanup-dtorsdeferred_resndemanglerjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprnew-envno_listpersistent-indexerresolv-newwith_gc
Last change on this file since b45d4b2 was df626eb, checked in by Rob Schluntz <rschlunt@…>, 4 years ago

Move inferred parameters to Exception base class

  • Property mode set to 100644
File size: 3.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// ApplicationExpr.cc.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 : Tue Apr 26 12:41:06 2016
13// Update Count     : 4
14//
15
16#include <cassert>               // for strict_dynamic_cast, assert
17#include <list>                  // for list
18#include <map>                   // for _Rb_tree_const_iterator, map, map<>:...
19#include <memory>                // for unique_ptr
20#include <ostream>               // for operator<<, ostream, basic_ostream
21#include <string>                // for operator<<, string, char_traits
22#include <utility>               // for pair
23
24#include "Common/utility.h"      // for maybeClone, cloneAll, deleteAll, pri...
25#include "Declaration.h"         // for Declaration
26#include "Expression.h"          // for ParamEntry, ApplicationExpr, Expression
27#include "ResolvExpr/typeops.h"  // for extractResultType
28#include "Type.h"                // for Type, PointerType, FunctionType
29
30ParamEntry::ParamEntry( const ParamEntry &other ) :
31                decl( other.decl ), actualType( maybeClone( other.actualType ) ), formalType( maybeClone( other.formalType ) ), expr( maybeClone( other.expr ) ), inferParams( new InferredParams( *other.inferParams ) ) {
32}
33
34ParamEntry &ParamEntry::operator=( const ParamEntry &other ) {
35        if ( &other == this ) return *this;
36        decl = other.decl;
37        // xxx - this looks like a memory leak
38        actualType = maybeClone( other.actualType );
39        formalType = maybeClone( other.formalType );
40        expr = maybeClone( other.expr );
41        *inferParams = *other.inferParams;
42        return *this;
43}
44
45ParamEntry::~ParamEntry() {
46        delete actualType;
47        delete formalType;
48        delete expr;
49}
50
51ApplicationExpr::ApplicationExpr( Expression *funcExpr, const std::list<Expression *> & args ) : function( funcExpr ), args( args ) {
52        PointerType *pointer = strict_dynamic_cast< PointerType* >( funcExpr->get_result() );
53        FunctionType *function = strict_dynamic_cast< FunctionType* >( pointer->get_base() );
54
55        set_result( ResolvExpr::extractResultType( function ) );
56
57        assert( result );
58}
59
60ApplicationExpr::ApplicationExpr( const ApplicationExpr &other ) :
61                Expression( other ), function( maybeClone( other.function ) ) {
62        cloneAll( other.args, args );
63}
64
65ApplicationExpr::~ApplicationExpr() {
66        delete function;
67        deleteAll( args );
68}
69
70void printInferParams( const InferredParams & inferParams, std::ostream &os, Indenter indent, int level ) {
71        if ( ! inferParams.empty() ) {
72                os << indent << "with inferred parameters " << level << ":" << std::endl;
73                for ( InferredParams::const_iterator i = inferParams.begin(); i != inferParams.end(); ++i ) {
74                        os << indent+1;
75                        Declaration::declFromId( i->second.decl )->printShort( os, indent+1 );
76                        os << std::endl;
77                        printInferParams( *i->second.inferParams, os, indent+1, level+1 );
78                } // for
79        } // if
80}
81
82void ApplicationExpr::print( std::ostream &os, Indenter indent ) const {
83        os << "Application of" << std::endl << indent+1;
84        function->print( os, indent+1 );
85        os << std::endl;
86        if ( ! args.empty() ) {
87                os << indent << "... to arguments" << std::endl;
88                printAll( args, os, indent+1 );
89        } // if
90        printInferParams( inferParams, os, indent+1, 0 );
91        Expression::print( os, indent );
92}
93
94// Local Variables: //
95// tab-width: 4 //
96// mode: c++ //
97// compile-command: "make install" //
98// End: //
Note: See TracBrowser for help on using the repository browser.