| 1 | /*
|
|---|
| 2 | * This file is part of the Cforall project
|
|---|
| 3 | *
|
|---|
| 4 | * $Id: AlternativeFinder.h,v 1.19 2005/08/29 20:14:15 rcbilson Exp $
|
|---|
| 5 | *
|
|---|
| 6 | */
|
|---|
| 7 |
|
|---|
| 8 | #ifndef RESOLVEXPR_ALTERNATIVEFINDER_H
|
|---|
| 9 | #define RESOLVEXPR_ALTERNATIVEFINDER_H
|
|---|
| 10 |
|
|---|
| 11 | #include <set>
|
|---|
| 12 |
|
|---|
| 13 | #include "Alternative.h"
|
|---|
| 14 | #include "Unify.h"
|
|---|
| 15 | #include "SynTree/SynTree.h"
|
|---|
| 16 | #include "SymTab/Indexer.h"
|
|---|
| 17 | #include "SynTree/TypeSubstitution.h"
|
|---|
| 18 |
|
|---|
| 19 | namespace ResolvExpr {
|
|---|
| 20 |
|
|---|
| 21 | class AlternativeFinder : public Visitor
|
|---|
| 22 | {
|
|---|
| 23 | public:
|
|---|
| 24 | AlternativeFinder( const SymTab::Indexer &indexer, const TypeEnvironment &env );
|
|---|
| 25 | void find( Expression *expr, bool adjust = false );
|
|---|
| 26 | void findWithAdjustment( Expression *expr );
|
|---|
| 27 | AltList &get_alternatives() { return alternatives; }
|
|---|
| 28 |
|
|---|
| 29 | // make this look like an STL container so that we can apply generic algorithms
|
|---|
| 30 | typedef Alternative value_type;
|
|---|
| 31 | typedef AltList::iterator iterator;
|
|---|
| 32 | typedef AltList::const_iterator const_iterator;
|
|---|
| 33 | AltList::iterator begin() { return alternatives.begin(); }
|
|---|
| 34 | AltList::iterator end() { return alternatives.end(); }
|
|---|
| 35 | AltList::const_iterator begin() const { return alternatives.begin(); }
|
|---|
| 36 | AltList::const_iterator end() const { return alternatives.end(); }
|
|---|
| 37 |
|
|---|
| 38 | const SymTab::Indexer &get_indexer() const { return indexer; }
|
|---|
| 39 | const TypeEnvironment &get_environ() const { return env; }
|
|---|
| 40 | private:
|
|---|
| 41 | virtual void visit(ApplicationExpr *applicationExpr);
|
|---|
| 42 | virtual void visit(UntypedExpr *untypedExpr);
|
|---|
| 43 | virtual void visit(AddressExpr *addressExpr);
|
|---|
| 44 | virtual void visit(CastExpr *castExpr);
|
|---|
| 45 | virtual void visit(UntypedMemberExpr *memberExpr);
|
|---|
| 46 | virtual void visit(MemberExpr *memberExpr);
|
|---|
| 47 | virtual void visit(NameExpr *variableExpr);
|
|---|
| 48 | virtual void visit(VariableExpr *variableExpr);
|
|---|
| 49 | virtual void visit(ConstantExpr *constantExpr);
|
|---|
| 50 | virtual void visit(SizeofExpr *sizeofExpr);
|
|---|
| 51 | virtual void visit(AttrExpr *attrExpr);
|
|---|
| 52 | virtual void visit(LogicalExpr *logicalExpr);
|
|---|
| 53 | virtual void visit(ConditionalExpr *conditionalExpr);
|
|---|
| 54 | virtual void visit(CommaExpr *commaExpr);
|
|---|
| 55 | virtual void visit(TupleExpr *tupleExpr);
|
|---|
| 56 | public: // xxx - temporary hack - should make Tuples::TupleAssignment a friend
|
|---|
| 57 | template< typename InputIterator, typename OutputIterator >
|
|---|
| 58 | void findSubExprs( InputIterator begin, InputIterator end, OutputIterator out );
|
|---|
| 59 |
|
|---|
| 60 | private:
|
|---|
| 61 | template< typename StructOrUnionType > void addAggMembers( StructOrUnionType *aggInst, Expression *expr, const Cost &newCost, const std::string &name );
|
|---|
| 62 | bool instantiateFunction( std::list< DeclarationWithType* >& formals, /*const*/ AltList &actuals, bool isVarArgs, OpenVarSet& openVars, TypeEnvironment &resultEnv, AssertionSet &resultNeed, AssertionSet &resultHave );
|
|---|
| 63 | template< typename OutputIterator >
|
|---|
| 64 | void makeFunctionAlternatives( const Alternative &func, FunctionType *funcType, AltList &actualAlt, OutputIterator out );
|
|---|
| 65 | template< typename OutputIterator >
|
|---|
| 66 | void inferParameters( const AssertionSet &need, AssertionSet &have, const Alternative &newAlt, OpenVarSet &openVars, OutputIterator out );
|
|---|
| 67 | void resolveAttr( DeclarationWithType *funcDecl, FunctionType *function, Type *argType, const TypeEnvironment &env );
|
|---|
| 68 |
|
|---|
| 69 | const SymTab::Indexer &indexer;
|
|---|
| 70 | AltList alternatives;
|
|---|
| 71 | const TypeEnvironment &env;
|
|---|
| 72 | };
|
|---|
| 73 |
|
|---|
| 74 | Expression *resolveInVoidContext( Expression *expr, const SymTab::Indexer &indexer, TypeEnvironment &env )
|
|---|
| 75 | ;
|
|---|
| 76 |
|
|---|
| 77 | } // namespace ResolvExpr
|
|---|
| 78 |
|
|---|
| 79 | #endif /* #ifndef RESOLVEXPR_ALTERNATIVEFINDER_H */
|
|---|
