From 4ae7b32dc09eb7acd9411a8af63a767660aa64ec Mon Sep 17 00:00:00 2001 From: Michele Calgaro Date: Thu, 17 Dec 2020 20:50:19 +0900 Subject: Renaming of files in preparation for code style tools. Signed-off-by: Michele Calgaro (cherry picked from commit 3e3d9eda9d1dd8c67c1c27c6a9bdc68bdecfcc30) --- languages/ada/AdaAST.h | 77 +++++ languages/ada/AdaAST.hpp | 77 ----- languages/ada/AdaLexer.cpp | 16 +- languages/ada/AdaLexer.h | 86 ++++++ languages/ada/AdaLexer.hpp | 86 ------ languages/ada/AdaParser.cpp | 8 +- languages/ada/AdaParser.h | 389 +++++++++++++++++++++++++ languages/ada/AdaParser.hpp | 389 ------------------------- languages/ada/AdaStoreWalker.cpp | 14 +- languages/ada/AdaStoreWalker.h | 350 ++++++++++++++++++++++ languages/ada/AdaStoreWalker.hpp | 350 ---------------------- languages/ada/AdaStoreWalkerTokenTypes.h | 307 +++++++++++++++++++ languages/ada/AdaStoreWalkerTokenTypes.hpp | 307 ------------------- languages/ada/AdaTokenTypes.h | 306 +++++++++++++++++++ languages/ada/AdaTokenTypes.hpp | 306 ------------------- languages/ada/AdaTreeParserSuper.cpp | 14 +- languages/ada/AdaTreeParserSuper.h | 241 +++++++++++++++ languages/ada/AdaTreeParserSuper.hpp | 241 --------------- languages/ada/AdaTreeParserSuperTokenTypes.h | 307 +++++++++++++++++++ languages/ada/AdaTreeParserSuperTokenTypes.hpp | 307 ------------------- languages/ada/Makefile.am | 6 +- languages/ada/README.dox | 6 +- languages/ada/ada.g | 4 +- languages/ada/ada.store.g | 4 +- languages/ada/ada_utils.cpp | 4 +- languages/ada/ada_utils.h | 15 + languages/ada/ada_utils.hpp | 15 - languages/ada/adasupport.cpp | 8 +- languages/ada/adasupport.h | 13 + languages/ada/adasupport.hpp | 13 - languages/ada/adasupportpart.cpp | 8 +- languages/ada/backgroundparser.cpp | 6 +- 32 files changed, 2140 insertions(+), 2140 deletions(-) create mode 100644 languages/ada/AdaAST.h delete mode 100644 languages/ada/AdaAST.hpp create mode 100644 languages/ada/AdaLexer.h delete mode 100644 languages/ada/AdaLexer.hpp create mode 100644 languages/ada/AdaParser.h delete mode 100644 languages/ada/AdaParser.hpp create mode 100644 languages/ada/AdaStoreWalker.h delete mode 100644 languages/ada/AdaStoreWalker.hpp create mode 100644 languages/ada/AdaStoreWalkerTokenTypes.h delete mode 100644 languages/ada/AdaStoreWalkerTokenTypes.hpp create mode 100644 languages/ada/AdaTokenTypes.h delete mode 100644 languages/ada/AdaTokenTypes.hpp create mode 100644 languages/ada/AdaTreeParserSuper.h delete mode 100644 languages/ada/AdaTreeParserSuper.hpp create mode 100644 languages/ada/AdaTreeParserSuperTokenTypes.h delete mode 100644 languages/ada/AdaTreeParserSuperTokenTypes.hpp create mode 100644 languages/ada/ada_utils.h delete mode 100644 languages/ada/ada_utils.hpp create mode 100644 languages/ada/adasupport.h delete mode 100644 languages/ada/adasupport.hpp (limited to 'languages/ada') diff --git a/languages/ada/AdaAST.h b/languages/ada/AdaAST.h new file mode 100644 index 00000000..35b734b4 --- /dev/null +++ b/languages/ada/AdaAST.h @@ -0,0 +1,77 @@ +#ifndef ADAAST_HPP +#define ADAAST_HPP + +#include + +class AdaAST; +typedef antlr::ASTRefCount RefAdaAST; + +class AdaAST : public antlr::CommonAST { +public: + AdaAST() : m_line (0), m_column (0) {} + + ~AdaAST() {} + + int getLine () const { return m_line; } + void setLine (int line) { m_line = line; } + + int getColumn () const { return m_column; } + void setColumn (int column) { m_column = column; } + + void initialize (antlr::RefToken t) { + antlr::CommonAST::initialize (t); + m_line = t->getLine () - 1; + m_column = t->getColumn () - 1; + } + + void initialize (int t, const std::string& txt) { + setType (t); + setText (txt); + m_line = 0; + m_column = 0; + } + + RefAdaAST duplicate (void) const { + AdaAST *ast = new AdaAST (*this); + return RefAdaAST (ast); + } + + void set (int t, const std::string& txt) { + setType (t); + setText (txt); + } + + void addChild (RefAdaAST c) { + antlr::RefAST n( c.get() ); + antlr::BaseAST::addChild (n); + } + + RefAdaAST down () const { + return RefAdaAST (antlr::BaseAST::getFirstChild ()); + } + + RefAdaAST right () const { + return RefAdaAST (antlr::BaseAST::getNextSibling ()); + } + + /* bool equals(RefAdaAST t) const { + return ((antlr::BaseAST*)this)->equals (t); + } */ + + static antlr::RefAST factory (void) { + RefAdaAST n( new AdaAST ); + return n.get(); + } + + static const RefAdaAST nullAdaAST; + +private: + int m_line; + int m_column; +}; + +#define Set(n, t) (n)->set(t, #t) +// for Java compatibility: +#define boolean bool + +#endif diff --git a/languages/ada/AdaAST.hpp b/languages/ada/AdaAST.hpp deleted file mode 100644 index 1bb2bd07..00000000 --- a/languages/ada/AdaAST.hpp +++ /dev/null @@ -1,77 +0,0 @@ -#ifndef ADAAST_HPP -#define ADAAST_HPP - -#include - -class AdaAST; -typedef antlr::ASTRefCount RefAdaAST; - -class AdaAST : public antlr::CommonAST { -public: - AdaAST() : m_line (0), m_column (0) {} - - ~AdaAST() {} - - int getLine () const { return m_line; } - void setLine (int line) { m_line = line; } - - int getColumn () const { return m_column; } - void setColumn (int column) { m_column = column; } - - void initialize (antlr::RefToken t) { - antlr::CommonAST::initialize (t); - m_line = t->getLine () - 1; - m_column = t->getColumn () - 1; - } - - void initialize (int t, const std::string& txt) { - setType (t); - setText (txt); - m_line = 0; - m_column = 0; - } - - RefAdaAST duplicate (void) const { - AdaAST *ast = new AdaAST (*this); - return RefAdaAST (ast); - } - - void set (int t, const std::string& txt) { - setType (t); - setText (txt); - } - - void addChild (RefAdaAST c) { - antlr::RefAST n( c.get() ); - antlr::BaseAST::addChild (n); - } - - RefAdaAST down () const { - return RefAdaAST (antlr::BaseAST::getFirstChild ()); - } - - RefAdaAST right () const { - return RefAdaAST (antlr::BaseAST::getNextSibling ()); - } - - /* bool equals(RefAdaAST t) const { - return ((antlr::BaseAST*)this)->equals (t); - } */ - - static antlr::RefAST factory (void) { - RefAdaAST n( new AdaAST ); - return n.get(); - } - - static const RefAdaAST nullAdaAST; - -private: - int m_line; - int m_column; -}; - -#define Set(n, t) (n)->set(t, #t) -// for Java compatibility: -#define boolean bool - -#endif diff --git a/languages/ada/AdaLexer.cpp b/languages/ada/AdaLexer.cpp index 2ac19416..07e0cdd0 100644 --- a/languages/ada/AdaLexer.cpp +++ b/languages/ada/AdaLexer.cpp @@ -1,12 +1,12 @@ /* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaLexer.cpp"$ */ -#include "AdaLexer.hpp" -#include -#include -#include -#include -#include -#include -#include +#include "AdaLexer.h" +#include +#include +#include +#include +#include +#include +#include #line 1531 "ada.g" diff --git a/languages/ada/AdaLexer.h b/languages/ada/AdaLexer.h new file mode 100644 index 00000000..f004b971 --- /dev/null +++ b/languages/ada/AdaLexer.h @@ -0,0 +1,86 @@ +#ifndef INC_AdaLexer_h_ +#define INC_AdaLexer_h_ + +#line 29 "ada.g" + +#include // antlr wants this +#include "AdaAST.h" +#include "preambles.h" + +#line 11 "AdaLexer.h" +#include +/* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaLexer.h"$ */ +#include +#include +#include +#include "AdaTokenTypes.h" +#include +class CUSTOM_API AdaLexer : public ANTLR_USE_NAMESPACE(antlr)CharScanner, public AdaTokenTypes +{ +#line 1879 "ada.g" + + ANTLR_LEXER_PREAMBLE + private: + bool lastTokenWasTicCompatible; +#line 22 "AdaLexer.h" +private: + void initLiterals(); +public: + bool getCaseSensitiveLiterals() const + { + return false; + } +public: + AdaLexer(ANTLR_USE_NAMESPACE(std)istream& in); + AdaLexer(ANTLR_USE_NAMESPACE(antlr)InputBuffer& ib); + AdaLexer(const ANTLR_USE_NAMESPACE(antlr)LexerSharedInputState& state); + ANTLR_USE_NAMESPACE(antlr)RefToken nextToken(); + public: void mCOMMENT_INTRO(bool _createToken); + public: void mDOT_DOT(bool _createToken); + public: void mLT_LT(bool _createToken); + public: void mOX(bool _createToken); + public: void mGT_GT(bool _createToken); + public: void mASSIGN(bool _createToken); + public: void mRIGHT_SHAFT(bool _createToken); + public: void mNE(bool _createToken); + public: void mLE(bool _createToken); + public: void mGE(bool _createToken); + public: void mEXPON(bool _createToken); + public: void mPIPE(bool _createToken); + public: void mCONCAT(bool _createToken); + public: void mDOT(bool _createToken); + public: void mEQ(bool _createToken); + public: void mLT_(bool _createToken); + public: void mGT(bool _createToken); + public: void mPLUS(bool _createToken); + public: void mMINUS(bool _createToken); + public: void mSTAR(bool _createToken); + public: void mDIV(bool _createToken); + public: void mLPAREN(bool _createToken); + public: void mRPAREN(bool _createToken); + public: void mCOLON(bool _createToken); + public: void mCOMMA(bool _createToken); + public: void mSEMI(bool _createToken); + public: void mIDENTIFIER(bool _createToken); + public: void mTIC_OR_CHARACTER_LITERAL(bool _createToken); + public: void mCHAR_STRING(bool _createToken); + public: void mNUMERIC_LIT(bool _createToken); + protected: void mDIGIT(bool _createToken); + protected: void mBASED_INTEGER(bool _createToken); + protected: void mEXPONENT(bool _createToken); + protected: void mEXTENDED_DIGIT(bool _createToken); + public: void mWS_(bool _createToken); + public: void mCOMMENT(bool _createToken); +private: + + static const unsigned long _tokenSet_0_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; + static const unsigned long _tokenSet_1_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; + static const unsigned long _tokenSet_2_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; + static const unsigned long _tokenSet_3_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; +}; + +#endif /*INC_AdaLexer_h_*/ diff --git a/languages/ada/AdaLexer.hpp b/languages/ada/AdaLexer.hpp deleted file mode 100644 index 795c7bba..00000000 --- a/languages/ada/AdaLexer.hpp +++ /dev/null @@ -1,86 +0,0 @@ -#ifndef INC_AdaLexer_hpp_ -#define INC_AdaLexer_hpp_ - -#line 29 "ada.g" - -#include // antlr wants this -#include "AdaAST.hpp" -#include "preambles.h" - -#line 11 "AdaLexer.hpp" -#include -/* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaLexer.hpp"$ */ -#include -#include -#include -#include "AdaTokenTypes.hpp" -#include -class CUSTOM_API AdaLexer : public ANTLR_USE_NAMESPACE(antlr)CharScanner, public AdaTokenTypes -{ -#line 1879 "ada.g" - - ANTLR_LEXER_PREAMBLE - private: - bool lastTokenWasTicCompatible; -#line 22 "AdaLexer.hpp" -private: - void initLiterals(); -public: - bool getCaseSensitiveLiterals() const - { - return false; - } -public: - AdaLexer(ANTLR_USE_NAMESPACE(std)istream& in); - AdaLexer(ANTLR_USE_NAMESPACE(antlr)InputBuffer& ib); - AdaLexer(const ANTLR_USE_NAMESPACE(antlr)LexerSharedInputState& state); - ANTLR_USE_NAMESPACE(antlr)RefToken nextToken(); - public: void mCOMMENT_INTRO(bool _createToken); - public: void mDOT_DOT(bool _createToken); - public: void mLT_LT(bool _createToken); - public: void mOX(bool _createToken); - public: void mGT_GT(bool _createToken); - public: void mASSIGN(bool _createToken); - public: void mRIGHT_SHAFT(bool _createToken); - public: void mNE(bool _createToken); - public: void mLE(bool _createToken); - public: void mGE(bool _createToken); - public: void mEXPON(bool _createToken); - public: void mPIPE(bool _createToken); - public: void mCONCAT(bool _createToken); - public: void mDOT(bool _createToken); - public: void mEQ(bool _createToken); - public: void mLT_(bool _createToken); - public: void mGT(bool _createToken); - public: void mPLUS(bool _createToken); - public: void mMINUS(bool _createToken); - public: void mSTAR(bool _createToken); - public: void mDIV(bool _createToken); - public: void mLPAREN(bool _createToken); - public: void mRPAREN(bool _createToken); - public: void mCOLON(bool _createToken); - public: void mCOMMA(bool _createToken); - public: void mSEMI(bool _createToken); - public: void mIDENTIFIER(bool _createToken); - public: void mTIC_OR_CHARACTER_LITERAL(bool _createToken); - public: void mCHAR_STRING(bool _createToken); - public: void mNUMERIC_LIT(bool _createToken); - protected: void mDIGIT(bool _createToken); - protected: void mBASED_INTEGER(bool _createToken); - protected: void mEXPONENT(bool _createToken); - protected: void mEXTENDED_DIGIT(bool _createToken); - public: void mWS_(bool _createToken); - public: void mCOMMENT(bool _createToken); -private: - - static const unsigned long _tokenSet_0_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; - static const unsigned long _tokenSet_1_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; - static const unsigned long _tokenSet_2_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; - static const unsigned long _tokenSet_3_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; -}; - -#endif /*INC_AdaLexer_hpp_*/ diff --git a/languages/ada/AdaParser.cpp b/languages/ada/AdaParser.cpp index e783595e..fed95180 100644 --- a/languages/ada/AdaParser.cpp +++ b/languages/ada/AdaParser.cpp @@ -1,8 +1,8 @@ /* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaParser.cpp"$ */ -#include "AdaParser.hpp" -#include -#include -#include +#include "AdaParser.h" +#include +#include +#include #line 1 "ada.g" #line 8 "AdaParser.cpp" AdaParser::AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenBuffer& tokenBuf, int k) diff --git a/languages/ada/AdaParser.h b/languages/ada/AdaParser.h new file mode 100644 index 00000000..9ceb8811 --- /dev/null +++ b/languages/ada/AdaParser.h @@ -0,0 +1,389 @@ +#ifndef INC_AdaParser_h_ +#define INC_AdaParser_h_ + +#line 29 "ada.g" + +#include // antlr wants this +#include "AdaAST.h" +#include "preambles.h" + +#line 11 "AdaParser.h" +#include +/* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaParser.h"$ */ +#include +#include +#include "AdaTokenTypes.h" +#include + +class CUSTOM_API AdaParser : public ANTLR_USE_NAMESPACE(antlr)LLkParser, public AdaTokenTypes +{ +#line 53 "ada.g" + + ANTLR_PARSER_PREAMBLE + +public: + // Ada support stuff + void push_def_id (const RefAdaAST& defid); + const RefAdaAST& pop_def_id (); + bool end_id_matches_def_id (const RefAdaAST& endid); + bool definable_operator (const char *string); // operator_symbol sans "/=" + bool is_operator_symbol (const char *string); +#line 22 "AdaParser.h" +public: + void initializeASTFactory( ANTLR_USE_NAMESPACE(antlr)ASTFactory& factory ); +protected: + AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenBuffer& tokenBuf, int k); +public: + AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenBuffer& tokenBuf); +protected: + AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenStream& lexer, int k); +public: + AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenStream& lexer); + AdaParser(const ANTLR_USE_NAMESPACE(antlr)ParserSharedInputState& state); + int getNumTokens() const + { + return AdaParser::NUM_TOKENS; + } + const char* getTokenName( int type ) const + { + if( type > getNumTokens() ) return 0; + return AdaParser::tokenNames[type]; + } + const char* const* getTokenNames() const + { + return AdaParser::tokenNames; + } + public: void compilation_unit(); + public: void context_items_opt(); + public: void library_item(); + public: void subunit(); + public: void pragma(); + public: void pragma_args_opt(); + public: void pragma_arg(); + public: void expression(); + public: void with_clause(); + public: void use_clause(); + public: void c_name_list(); + public: void compound_name(); + public: void subtype_mark(); + public: void attribute_id(); + public: void private_opt(); + public: void lib_pkg_spec_or_body(); + public: void subprog_decl_or_rename_or_inst_or_body( + boolean lib_level + ); + public: void generic_decl( + boolean lib_level + ); + public: void def_id( + boolean lib_level + ); + public: void pkg_body_part(); + public: void spec_decl_part( + RefAdaAST pkg + ); + public: void subprog_decl( + boolean lib_level + ); + public: void generic_subp_inst(); + public: void formal_part_opt(); + public: void renames(); + public: void is_separate_or_abstract_or_decl( + RefAdaAST t + ); + public: void def_designator( + boolean lib_level + ); + public: void function_tail(); + public: void generic_inst(); + public: void value_s(); + public: void parenth_values(); + public: void value(); + public: void ranged_expr_s(); + public: void ranged_expr(); + public: void simple_expression(); + public: void range(); + public: void range_constraint(); + public: void range_dots(); + public: void range_attrib_ref(); + public: void prefix(); + public: void parameter_specification(); + public: void def_ids_colon(); + public: void mode_opt(); + public: void init_opt(); + public: void defining_identifier_list(); + public: void name(); + public: RefAdaAST definable_operator_symbol(); + public: RefAdaAST is_operator(); + public: void parenthesized_primary(); + public: void extension_opt(); + public: void separate_or_abstract( + RefAdaAST t + ); + public: RefAdaAST designator(); + public: void func_formal_part_opt(); + public: void func_param(); + public: void in_access_opt(); + public: void pkg_spec_part(); + public: void basic_declarative_items_opt(); + public: void private_declarative_items_opt(); + public: void end_id_opt(); + public: void basic_decl_item(); + public: void basic_declarative_items(); + public: void task_type_or_single_decl( + RefAdaAST tsk + ); + public: void prot_type_or_single_decl( + RefAdaAST pro + ); + public: void decl_common(); + public: void discrim_part_opt(); + public: void task_definition_opt(); + public: void task_items_opt(); + public: void private_task_items_opt(); + public: void discrim_part_text(); + public: void discriminant_specifications(); + public: void known_discrim_part(); + public: void empty_discrim_opt(); + public: void discrim_part(); + public: void discriminant_specification(); + public: void access_opt(); + public: void entrydecls_repspecs_opt(); + public: void entry_declaration(); + public: void rep_spec(); + public: void discrete_subtype_def_opt(); + public: void discrete_subtype_definition(); + public: void subtype_ind(); + public: void rep_spec_part( + RefAdaAST t + ); + public: void align_opt(); + public: void comp_loc_s(); + public: void protected_definition(); + public: void prot_private_opt(); + public: void prot_op_decl(); + public: void comp_decl(); + public: void prot_op_decl_s(); + public: void prot_member_decl_s(); + public: void component_subtype_def(); + public: void type_def( + RefAdaAST t + ); + public: void derived_or_private_or_record( + RefAdaAST t, boolean has_discrim + ); + public: void local_enum_name(); + public: void enumeration_aggregate(); + public: void aliased_constant_opt(); + public: void array_type_definition( + RefAdaAST t + ); + public: void enum_id_s(); + public: void range_constraint_opt(); + public: void access_type_definition( + RefAdaAST t + ); + public: void enumeration_literal_specification(); + public: void index_or_discrete_range_s(); + public: void index_or_discrete_range(); + public: void aliased_opt(); + public: void constraint_opt(); + public: void digits_constraint(); + public: void delta_constraint(); + public: void index_constraint(); + public: void discriminant_constraint(); + public: void discrete_range(); + public: void discriminant_association(); + public: void selector_names_opt(); + public: void association_head(); + public: void selector_name(); + public: void protected_opt(); + public: void constant_all_opt(); + public: void abstract_opt(); + public: void record_definition( + boolean has_discrim + ); + public: void abstract_tagged_limited_opt(); + public: void component_list( + boolean has_discrim + ); + public: void component_items(); + public: void variant_part(); + public: void empty_component_items(); + public: void discriminant_direct_name(); + public: void variant_s(); + public: void variant(); + public: void choice_s(); + public: void choice(); + public: void discrete_with_range(); + public: void mark_with_constraint(); + public: void generic_formal_part_opt(); + public: void generic_formal_parameter(); + public: void discriminable_type_definition( + RefAdaAST t + ); + public: void subprogram_default_opt(); + public: void formal_package_actual_part_opt(); + public: void body_part(); + public: void declarative_part(); + public: void block_body(); + public: void declarative_item(); + public: void body_is(); + public: void separate(); + public: void prot_op_bodies_opt(); + public: void block_body_opt(); + public: void handled_stmt_s(); + public: void entry_body(); + public: void subprog_decl_or_body(); + public: void statements(); + public: void except_handler_part_opt(); + public: void handled_stmts_opt(); + public: void statement(); + public: void def_label_opt(); + public: void null_stmt(); + public: void exit_stmt(); + public: void return_stmt(); + public: void goto_stmt(); + public: void delay_stmt(); + public: void abort_stmt(); + public: void raise_stmt(); + public: void requeue_stmt(); + public: void accept_stmt(); + public: void select_stmt(); + public: void if_stmt(); + public: void case_stmt(); + public: void loop_stmt(); + public: void block(); + public: void statement_identifier(); + public: void id_opt(); + public: void call_or_assignment(); + public: void cond_clause(); + public: void elsifs_opt(); + public: void else_opt(); + public: void condition(); + public: void alternative_s(); + public: void case_statement_alternative(); + public: void iteration_scheme_opt(); + public: void reverse_opt(); + public: void id_opt_aux(); + public: void declare_opt(); + public: void label_name(); + public: void entry_body_formal_part(); + public: void entry_barrier(); + public: void entry_index_spec_opt(); + public: void entry_call_stmt(); + public: void entry_index_opt(); + public: void until_opt(); + public: void triggering_alternative(); + public: void abortable_part(); + public: void selective_accept(); + public: void entry_call_alternative(); + public: void delay_alternative(); + public: void stmts_opt(); + public: void guard_opt(); + public: void select_alternative(); + public: void or_select_opt(); + public: void accept_alternative(); + public: void exception_handler(); + public: void identifier_colon_opt(); + public: void except_choice_s(); + public: void exception_choice(); + public: void operator_call(); + public: void operator_call_tail( + RefAdaAST opstr + ); + public: void relation(); + public: void range_or_mark(); + public: void signed_term(); + public: void term(); + public: void factor(); + public: void primary(); + public: void name_or_qualified(); + public: void allocator(); + public: void subprogram_body(); + public: void package_body(); + public: void task_body(); + public: void protected_body(); +public: + ANTLR_USE_NAMESPACE(antlr)RefAST getAST() + { + return ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST); + } + +protected: + RefAdaAST returnAST; +private: + static const char* tokenNames[]; +#ifndef NO_STATIC_CONSTS + static const int NUM_TOKENS = 290; +#else + enum { + NUM_TOKENS = 290 + }; +#endif + + static const unsigned long _tokenSet_0_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; + static const unsigned long _tokenSet_1_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; + static const unsigned long _tokenSet_2_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; + static const unsigned long _tokenSet_3_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; + static const unsigned long _tokenSet_4_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_4; + static const unsigned long _tokenSet_5_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_5; + static const unsigned long _tokenSet_6_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_6; + static const unsigned long _tokenSet_7_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_7; + static const unsigned long _tokenSet_8_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_8; + static const unsigned long _tokenSet_9_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_9; + static const unsigned long _tokenSet_10_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_10; + static const unsigned long _tokenSet_11_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_11; + static const unsigned long _tokenSet_12_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_12; + static const unsigned long _tokenSet_13_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_13; + static const unsigned long _tokenSet_14_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_14; + static const unsigned long _tokenSet_15_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_15; + static const unsigned long _tokenSet_16_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_16; + static const unsigned long _tokenSet_17_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_17; + static const unsigned long _tokenSet_18_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_18; + static const unsigned long _tokenSet_19_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_19; + static const unsigned long _tokenSet_20_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_20; + static const unsigned long _tokenSet_21_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_21; + static const unsigned long _tokenSet_22_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_22; + static const unsigned long _tokenSet_23_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_23; + static const unsigned long _tokenSet_24_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_24; + static const unsigned long _tokenSet_25_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_25; + static const unsigned long _tokenSet_26_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_26; + static const unsigned long _tokenSet_27_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_27; + static const unsigned long _tokenSet_28_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_28; + static const unsigned long _tokenSet_29_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_29; + static const unsigned long _tokenSet_30_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_30; +}; + +#endif /*INC_AdaParser_h_*/ diff --git a/languages/ada/AdaParser.hpp b/languages/ada/AdaParser.hpp deleted file mode 100644 index 0074c820..00000000 --- a/languages/ada/AdaParser.hpp +++ /dev/null @@ -1,389 +0,0 @@ -#ifndef INC_AdaParser_hpp_ -#define INC_AdaParser_hpp_ - -#line 29 "ada.g" - -#include // antlr wants this -#include "AdaAST.hpp" -#include "preambles.h" - -#line 11 "AdaParser.hpp" -#include -/* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaParser.hpp"$ */ -#include -#include -#include "AdaTokenTypes.hpp" -#include - -class CUSTOM_API AdaParser : public ANTLR_USE_NAMESPACE(antlr)LLkParser, public AdaTokenTypes -{ -#line 53 "ada.g" - - ANTLR_PARSER_PREAMBLE - -public: - // Ada support stuff - void push_def_id (const RefAdaAST& defid); - const RefAdaAST& pop_def_id (); - bool end_id_matches_def_id (const RefAdaAST& endid); - bool definable_operator (const char *string); // operator_symbol sans "/=" - bool is_operator_symbol (const char *string); -#line 22 "AdaParser.hpp" -public: - void initializeASTFactory( ANTLR_USE_NAMESPACE(antlr)ASTFactory& factory ); -protected: - AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenBuffer& tokenBuf, int k); -public: - AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenBuffer& tokenBuf); -protected: - AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenStream& lexer, int k); -public: - AdaParser(ANTLR_USE_NAMESPACE(antlr)TokenStream& lexer); - AdaParser(const ANTLR_USE_NAMESPACE(antlr)ParserSharedInputState& state); - int getNumTokens() const - { - return AdaParser::NUM_TOKENS; - } - const char* getTokenName( int type ) const - { - if( type > getNumTokens() ) return 0; - return AdaParser::tokenNames[type]; - } - const char* const* getTokenNames() const - { - return AdaParser::tokenNames; - } - public: void compilation_unit(); - public: void context_items_opt(); - public: void library_item(); - public: void subunit(); - public: void pragma(); - public: void pragma_args_opt(); - public: void pragma_arg(); - public: void expression(); - public: void with_clause(); - public: void use_clause(); - public: void c_name_list(); - public: void compound_name(); - public: void subtype_mark(); - public: void attribute_id(); - public: void private_opt(); - public: void lib_pkg_spec_or_body(); - public: void subprog_decl_or_rename_or_inst_or_body( - boolean lib_level - ); - public: void generic_decl( - boolean lib_level - ); - public: void def_id( - boolean lib_level - ); - public: void pkg_body_part(); - public: void spec_decl_part( - RefAdaAST pkg - ); - public: void subprog_decl( - boolean lib_level - ); - public: void generic_subp_inst(); - public: void formal_part_opt(); - public: void renames(); - public: void is_separate_or_abstract_or_decl( - RefAdaAST t - ); - public: void def_designator( - boolean lib_level - ); - public: void function_tail(); - public: void generic_inst(); - public: void value_s(); - public: void parenth_values(); - public: void value(); - public: void ranged_expr_s(); - public: void ranged_expr(); - public: void simple_expression(); - public: void range(); - public: void range_constraint(); - public: void range_dots(); - public: void range_attrib_ref(); - public: void prefix(); - public: void parameter_specification(); - public: void def_ids_colon(); - public: void mode_opt(); - public: void init_opt(); - public: void defining_identifier_list(); - public: void name(); - public: RefAdaAST definable_operator_symbol(); - public: RefAdaAST is_operator(); - public: void parenthesized_primary(); - public: void extension_opt(); - public: void separate_or_abstract( - RefAdaAST t - ); - public: RefAdaAST designator(); - public: void func_formal_part_opt(); - public: void func_param(); - public: void in_access_opt(); - public: void pkg_spec_part(); - public: void basic_declarative_items_opt(); - public: void private_declarative_items_opt(); - public: void end_id_opt(); - public: void basic_decl_item(); - public: void basic_declarative_items(); - public: void task_type_or_single_decl( - RefAdaAST tsk - ); - public: void prot_type_or_single_decl( - RefAdaAST pro - ); - public: void decl_common(); - public: void discrim_part_opt(); - public: void task_definition_opt(); - public: void task_items_opt(); - public: void private_task_items_opt(); - public: void discrim_part_text(); - public: void discriminant_specifications(); - public: void known_discrim_part(); - public: void empty_discrim_opt(); - public: void discrim_part(); - public: void discriminant_specification(); - public: void access_opt(); - public: void entrydecls_repspecs_opt(); - public: void entry_declaration(); - public: void rep_spec(); - public: void discrete_subtype_def_opt(); - public: void discrete_subtype_definition(); - public: void subtype_ind(); - public: void rep_spec_part( - RefAdaAST t - ); - public: void align_opt(); - public: void comp_loc_s(); - public: void protected_definition(); - public: void prot_private_opt(); - public: void prot_op_decl(); - public: void comp_decl(); - public: void prot_op_decl_s(); - public: void prot_member_decl_s(); - public: void component_subtype_def(); - public: void type_def( - RefAdaAST t - ); - public: void derived_or_private_or_record( - RefAdaAST t, boolean has_discrim - ); - public: void local_enum_name(); - public: void enumeration_aggregate(); - public: void aliased_constant_opt(); - public: void array_type_definition( - RefAdaAST t - ); - public: void enum_id_s(); - public: void range_constraint_opt(); - public: void access_type_definition( - RefAdaAST t - ); - public: void enumeration_literal_specification(); - public: void index_or_discrete_range_s(); - public: void index_or_discrete_range(); - public: void aliased_opt(); - public: void constraint_opt(); - public: void digits_constraint(); - public: void delta_constraint(); - public: void index_constraint(); - public: void discriminant_constraint(); - public: void discrete_range(); - public: void discriminant_association(); - public: void selector_names_opt(); - public: void association_head(); - public: void selector_name(); - public: void protected_opt(); - public: void constant_all_opt(); - public: void abstract_opt(); - public: void record_definition( - boolean has_discrim - ); - public: void abstract_tagged_limited_opt(); - public: void component_list( - boolean has_discrim - ); - public: void component_items(); - public: void variant_part(); - public: void empty_component_items(); - public: void discriminant_direct_name(); - public: void variant_s(); - public: void variant(); - public: void choice_s(); - public: void choice(); - public: void discrete_with_range(); - public: void mark_with_constraint(); - public: void generic_formal_part_opt(); - public: void generic_formal_parameter(); - public: void discriminable_type_definition( - RefAdaAST t - ); - public: void subprogram_default_opt(); - public: void formal_package_actual_part_opt(); - public: void body_part(); - public: void declarative_part(); - public: void block_body(); - public: void declarative_item(); - public: void body_is(); - public: void separate(); - public: void prot_op_bodies_opt(); - public: void block_body_opt(); - public: void handled_stmt_s(); - public: void entry_body(); - public: void subprog_decl_or_body(); - public: void statements(); - public: void except_handler_part_opt(); - public: void handled_stmts_opt(); - public: void statement(); - public: void def_label_opt(); - public: void null_stmt(); - public: void exit_stmt(); - public: void return_stmt(); - public: void goto_stmt(); - public: void delay_stmt(); - public: void abort_stmt(); - public: void raise_stmt(); - public: void requeue_stmt(); - public: void accept_stmt(); - public: void select_stmt(); - public: void if_stmt(); - public: void case_stmt(); - public: void loop_stmt(); - public: void block(); - public: void statement_identifier(); - public: void id_opt(); - public: void call_or_assignment(); - public: void cond_clause(); - public: void elsifs_opt(); - public: void else_opt(); - public: void condition(); - public: void alternative_s(); - public: void case_statement_alternative(); - public: void iteration_scheme_opt(); - public: void reverse_opt(); - public: void id_opt_aux(); - public: void declare_opt(); - public: void label_name(); - public: void entry_body_formal_part(); - public: void entry_barrier(); - public: void entry_index_spec_opt(); - public: void entry_call_stmt(); - public: void entry_index_opt(); - public: void until_opt(); - public: void triggering_alternative(); - public: void abortable_part(); - public: void selective_accept(); - public: void entry_call_alternative(); - public: void delay_alternative(); - public: void stmts_opt(); - public: void guard_opt(); - public: void select_alternative(); - public: void or_select_opt(); - public: void accept_alternative(); - public: void exception_handler(); - public: void identifier_colon_opt(); - public: void except_choice_s(); - public: void exception_choice(); - public: void operator_call(); - public: void operator_call_tail( - RefAdaAST opstr - ); - public: void relation(); - public: void range_or_mark(); - public: void signed_term(); - public: void term(); - public: void factor(); - public: void primary(); - public: void name_or_qualified(); - public: void allocator(); - public: void subprogram_body(); - public: void package_body(); - public: void task_body(); - public: void protected_body(); -public: - ANTLR_USE_NAMESPACE(antlr)RefAST getAST() - { - return ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST); - } - -protected: - RefAdaAST returnAST; -private: - static const char* tokenNames[]; -#ifndef NO_STATIC_CONSTS - static const int NUM_TOKENS = 290; -#else - enum { - NUM_TOKENS = 290 - }; -#endif - - static const unsigned long _tokenSet_0_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; - static const unsigned long _tokenSet_1_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; - static const unsigned long _tokenSet_2_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; - static const unsigned long _tokenSet_3_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; - static const unsigned long _tokenSet_4_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_4; - static const unsigned long _tokenSet_5_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_5; - static const unsigned long _tokenSet_6_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_6; - static const unsigned long _tokenSet_7_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_7; - static const unsigned long _tokenSet_8_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_8; - static const unsigned long _tokenSet_9_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_9; - static const unsigned long _tokenSet_10_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_10; - static const unsigned long _tokenSet_11_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_11; - static const unsigned long _tokenSet_12_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_12; - static const unsigned long _tokenSet_13_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_13; - static const unsigned long _tokenSet_14_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_14; - static const unsigned long _tokenSet_15_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_15; - static const unsigned long _tokenSet_16_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_16; - static const unsigned long _tokenSet_17_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_17; - static const unsigned long _tokenSet_18_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_18; - static const unsigned long _tokenSet_19_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_19; - static const unsigned long _tokenSet_20_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_20; - static const unsigned long _tokenSet_21_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_21; - static const unsigned long _tokenSet_22_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_22; - static const unsigned long _tokenSet_23_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_23; - static const unsigned long _tokenSet_24_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_24; - static const unsigned long _tokenSet_25_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_25; - static const unsigned long _tokenSet_26_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_26; - static const unsigned long _tokenSet_27_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_27; - static const unsigned long _tokenSet_28_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_28; - static const unsigned long _tokenSet_29_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_29; - static const unsigned long _tokenSet_30_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_30; -}; - -#endif /*INC_AdaParser_hpp_*/ diff --git a/languages/ada/AdaStoreWalker.cpp b/languages/ada/AdaStoreWalker.cpp index 167d671c..51cd0067 100644 --- a/languages/ada/AdaStoreWalker.cpp +++ b/languages/ada/AdaStoreWalker.cpp @@ -1,11 +1,11 @@ /* $ANTLR 2.7.7 (20070609): "expandedada.store.g" -> "AdaStoreWalker.cpp"$ */ -#include "AdaStoreWalker.hpp" -#include -#include -#include -#include -#include -#include +#include "AdaStoreWalker.h" +#include +#include +#include +#include +#include +#include #line 1 "expandedada.store.g" #line 11 "AdaStoreWalker.cpp" AdaStoreWalker::AdaStoreWalker() diff --git a/languages/ada/AdaStoreWalker.h b/languages/ada/AdaStoreWalker.h new file mode 100644 index 00000000..79b0ce76 --- /dev/null +++ b/languages/ada/AdaStoreWalker.h @@ -0,0 +1,350 @@ +#ifndef INC_AdaStoreWalker_h_ +#define INC_AdaStoreWalker_h_ + +#line 1 "expandedada.store.g" + +#include +#include +#include + +#include +#include "AdaAST.h" +#include "ada_utils.h" + +#line 15 "AdaStoreWalker.h" +#include +#include "AdaStoreWalkerTokenTypes.h" +/* $ANTLR 2.7.7 (20070609): "expandedada.store.g" -> "AdaStoreWalker.h"$ */ +#include + +#line 10 "expandedada.store.g" + +#include +#include + +#line 26 "AdaStoreWalker.h" +class CUSTOM_API AdaStoreWalker : public ANTLR_USE_NAMESPACE(antlr)TreeParser, public AdaStoreWalkerTokenTypes +{ +#line 25 "expandedada.store.g" + +private: + TQString m_fileName; + TQValueList m_scopeStack; + CodeModel* m_model; + TQValueList m_imports; + NamespaceDom m_currentContainer; + int m_currentAccess; + bool m_addToStore; /* auxiliary variable: for the moment, this is `true' + only when we are in specs, not bodies. */ + bool m_isSubprogram; // auxiliary to def_id() + FileDom m_file; + +public: + void setCodeModel (CodeModel* model) { m_model = model; } + CodeModel* codeModel () { return m_model; } + const CodeModel* codeModel () const { return m_model; } + + TQString fileName () const { return m_fileName; } + void setFileName (const TQString& fileName) { m_fileName = fileName; } + + void init () { + m_scopeStack.clear (); + m_imports.clear (); + m_currentContainer = m_model->globalNamespace (); + m_scopeStack.append (m_currentContainer); + m_currentAccess = CodeModelItem::Public; + m_addToStore = false; + m_isSubprogram = false; + if (m_model->hasFile(m_fileName)) + m_model->removeFile (m_model->fileByName(m_fileName)); + m_file = m_model->create(); + m_file->setName(m_fileName); + m_model->addFile(m_file); + } + + void wipeout () { m_model->wipeout (); } +// void out () { m_store->out (); } + void removeWithReferences (const TQString& fileName) { + m_model->removeFile (m_model->fileByName(fileName)); + } + NamespaceDom insertScopeContainer + (NamespaceDom scope, const TQStringList & scopes ) { + TQStringList::ConstIterator it = scopes.begin(); + TQString prefix( *it ); + NamespaceDom ns = scope->namespaceByName( prefix ); +// kdDebug() << "insertScopeContainer begin with prefix " << prefix << endl; + if (!ns.data()) { +// kdDebug() << "insertScopeContainer: ns is empty" << endl; + ns = m_model->create(); +// kdDebug() << "insertScopeContainer: ns created" << endl; + ns->setName( prefix ); +// kdDebug() << "insertScopeContainer: ns name set" << endl; + scope->addNamespace( ns ); +// kdDebug() << "insertScopeContainer: ns added to a scope" << endl; + + if (scope == m_model->globalNamespace()) + m_file->addNamespace( ns ); + } +// kdDebug() << "insertScopeContainer: while" << endl; + while ( ++it != scopes.end() ) { + TQString nameSegment( *it ); + prefix += "." + nameSegment; +// kdDebug() << "insertScopeContainer: while prefix = " << prefix << endl; + NamespaceDom inner = scope->namespaceByName( prefix ); + if (!inner.data() ) { +// kdDebug() << "insertScopeContainer: inner is empty " << endl; + inner = m_model->create(); +// kdDebug() << "insertScopeContainer: inner created " << endl; + inner->setName( nameSegment ); + ns->addNamespace( inner ); +// kdDebug() << "insertScopeContainer: inner added " << endl; + } + ns = inner; + } + return ns; + } + NamespaceDom defineScope( RefAdaAST namenode ) { + TQStringList scopes( qnamelist( namenode ) ); +// kdDebug() << "defineScope: " << scopes.join(" ") << endl; + NamespaceDom psc = insertScopeContainer( m_currentContainer, scopes ); +// kdDebug() << "defineScope psc created" << endl; + psc->setStartPosition(namenode->getLine(), namenode->getColumn()); +// kdDebug() << "defineScope start position set" << endl; + psc->setFileName(m_fileName); +// kdDebug() << "defineScope file name set" << endl; + // psc->setEndPosition (endLine, 0); +// kdDebug() << "defineScope return" << endl; + return psc; + } +#line 30 "AdaStoreWalker.h" +public: + AdaStoreWalker(); + static void initializeASTFactory( ANTLR_USE_NAMESPACE(antlr)ASTFactory& factory ); + int getNumTokens() const + { + return AdaStoreWalker::NUM_TOKENS; + } + const char* getTokenName( int type ) const + { + if( type > getNumTokens() ) return 0; + return AdaStoreWalker::tokenNames[type]; + } + const char* const* getTokenNames() const + { + return AdaStoreWalker::tokenNames; + } + public: void compilation_unit(RefAdaAST _t); + public: void context_items_opt(RefAdaAST _t); + public: void library_item(RefAdaAST _t); + public: void subunit(RefAdaAST _t); + public: void pragma(RefAdaAST _t); + public: void with_clause(RefAdaAST _t); + public: void compound_name(RefAdaAST _t); + public: void use_clause(RefAdaAST _t); + public: void subtype_mark(RefAdaAST _t); + public: void lib_subprog_decl_or_rename_or_inst_or_body(RefAdaAST _t); + public: void def_id(RefAdaAST _t); + public: void pkg_body_part(RefAdaAST _t); + public: void generic_inst(RefAdaAST _t); + public: void pkg_spec_part(RefAdaAST _t); + public: void renames(RefAdaAST _t); + public: void generic_decl(RefAdaAST _t); + public: void subprog_def_id(RefAdaAST _t); + public: void subprog_decl(RefAdaAST _t); + public: void formal_part_opt(RefAdaAST _t); + public: void def_designator(RefAdaAST _t); + public: void function_tail(RefAdaAST _t); + public: void definable_operator_symbol(RefAdaAST _t); + public: void spec_decl_part(RefAdaAST _t); + public: void basic_declarative_items_opt(RefAdaAST _t); + public: void private_declarative_items_opt(RefAdaAST _t); + public: void end_id_opt(RefAdaAST _t); + public: void basic_decl_item(RefAdaAST _t); + public: void generic_formal_part_opt(RefAdaAST _t); + public: void procedure_body(RefAdaAST _t); + public: void function_body(RefAdaAST _t); + public: void subprog_decl_or_rename_or_inst_or_body(RefAdaAST _t); + public: void subprog_decl_or_body(RefAdaAST _t); + public: void package_body(RefAdaAST _t); + public: void pragma_arg(RefAdaAST _t); + public: void expression(RefAdaAST _t); + public: void attribute_id(RefAdaAST _t); + public: void modifiers(RefAdaAST _t); + public: void id_opt(RefAdaAST _t); + public: void value_s(RefAdaAST _t); + public: void value(RefAdaAST _t); + public: void ranged_expr_s(RefAdaAST _t); + public: void ranged_expr(RefAdaAST _t); + public: void simple_expression(RefAdaAST _t); + public: void range(RefAdaAST _t); + public: void range_constraint(RefAdaAST _t); + public: void range_dots(RefAdaAST _t); + public: void range_attrib_ref(RefAdaAST _t); + public: void prefix(RefAdaAST _t); + public: void parameter_specification(RefAdaAST _t); + public: void defining_identifier_list(RefAdaAST _t); + public: void init_opt(RefAdaAST _t); + public: void name(RefAdaAST _t); + public: void parenthesized_primary(RefAdaAST _t); + public: void extension_opt(RefAdaAST _t); + public: void task_type_or_single_decl(RefAdaAST _t); + public: void prot_type_or_single_decl(RefAdaAST _t); + public: void decl_common(RefAdaAST _t); + public: void discrim_part_opt(RefAdaAST _t); + public: void task_definition_opt(RefAdaAST _t); + public: void task_items_opt(RefAdaAST _t); + public: void private_task_items_opt(RefAdaAST _t); + public: void discriminant_specifications(RefAdaAST _t); + public: void discriminant_specification(RefAdaAST _t); + public: void entrydecls_repspecs_opt(RefAdaAST _t); + public: void entry_declaration(RefAdaAST _t); + public: void rep_spec(RefAdaAST _t); + public: void discrete_subtype_def_opt(RefAdaAST _t); + public: void discrete_subtype_definition(RefAdaAST _t); + public: void subtype_ind(RefAdaAST _t); + public: void align_opt(RefAdaAST _t); + public: void comp_loc_s(RefAdaAST _t); + public: void local_enum_name(RefAdaAST _t); + public: void enumeration_aggregate(RefAdaAST _t); + public: void protected_definition(RefAdaAST _t); + public: void prot_private_opt(RefAdaAST _t); + public: void prot_member_decl_s(RefAdaAST _t); + public: void prot_op_decl_s(RefAdaAST _t); + public: void prot_op_decl(RefAdaAST _t); + public: void comp_decl(RefAdaAST _t); + public: void component_subtype_def(RefAdaAST _t); + public: void enum_id_s(RefAdaAST _t); + public: void range_constraint_opt(RefAdaAST _t); + public: void array_type_declaration(RefAdaAST _t); + public: void access_type_declaration(RefAdaAST _t); + public: void id_and_discrim(RefAdaAST _t); + public: void record_definition(RefAdaAST _t); + public: void array_type_definition(RefAdaAST _t); + public: void enumeration_literal_specification(RefAdaAST _t); + public: void index_or_discrete_range_s(RefAdaAST _t); + public: void index_or_discrete_range(RefAdaAST _t); + public: void constraint_opt(RefAdaAST _t); + public: void digits_constraint(RefAdaAST _t); + public: void delta_constraint(RefAdaAST _t); + public: void index_constraint(RefAdaAST _t); + public: void discriminant_constraint(RefAdaAST _t); + public: void discrete_range(RefAdaAST _t); + public: void discriminant_association(RefAdaAST _t); + public: void selector_names_opt(RefAdaAST _t); + public: void selector_name(RefAdaAST _t); + public: void component_list(RefAdaAST _t); + public: void component_items(RefAdaAST _t); + public: void variant_part(RefAdaAST _t); + public: void discriminant_direct_name(RefAdaAST _t); + public: void variant_s(RefAdaAST _t); + public: void variant(RefAdaAST _t); + public: void choice_s(RefAdaAST _t); + public: void choice(RefAdaAST _t); + public: void discrete_with_range(RefAdaAST _t); + public: void mark_with_constraint(RefAdaAST _t); + public: void generic_formal_parameter(RefAdaAST _t); + public: void formal_array_type_declaration(RefAdaAST _t); + public: void formal_access_type_declaration(RefAdaAST _t); + public: void id_part(RefAdaAST _t); + public: void subprogram_default_opt(RefAdaAST _t); + public: void formal_package_actual_part_opt(RefAdaAST _t); + public: void body_part(RefAdaAST _t); + public: void declarative_part(RefAdaAST _t); + public: void block_body(RefAdaAST _t); + public: void declarative_item(RefAdaAST _t); + public: void prot_op_bodies_opt(RefAdaAST _t); + public: void block_body_opt(RefAdaAST _t); + public: void handled_stmt_s(RefAdaAST _t); + public: void entry_body(RefAdaAST _t); + public: void statements(RefAdaAST _t); + public: void except_handler_part_opt(RefAdaAST _t); + public: void handled_stmts_opt(RefAdaAST _t); + public: void statement(RefAdaAST _t); + public: void def_label_opt(RefAdaAST _t); + public: void null_stmt(RefAdaAST _t); + public: void exit_stmt(RefAdaAST _t); + public: void return_stmt(RefAdaAST _t); + public: void goto_stmt(RefAdaAST _t); + public: void delay_stmt(RefAdaAST _t); + public: void abort_stmt(RefAdaAST _t); + public: void raise_stmt(RefAdaAST _t); + public: void requeue_stmt(RefAdaAST _t); + public: void accept_stmt(RefAdaAST _t); + public: void select_stmt(RefAdaAST _t); + public: void if_stmt(RefAdaAST _t); + public: void case_stmt(RefAdaAST _t); + public: void loop_stmt(RefAdaAST _t); + public: void block(RefAdaAST _t); + public: void call_or_assignment(RefAdaAST _t); + public: void cond_clause(RefAdaAST _t); + public: void elsifs_opt(RefAdaAST _t); + public: void else_opt(RefAdaAST _t); + public: void condition(RefAdaAST _t); + public: void alternative_s(RefAdaAST _t); + public: void case_statement_alternative(RefAdaAST _t); + public: void iteration_scheme_opt(RefAdaAST _t); + public: void declare_opt(RefAdaAST _t); + public: void label_name(RefAdaAST _t); + public: void entry_body_formal_part(RefAdaAST _t); + public: void entry_barrier(RefAdaAST _t); + public: void entry_index_spec_opt(RefAdaAST _t); + public: void entry_call_stmt(RefAdaAST _t); + public: void entry_index_opt(RefAdaAST _t); + public: void triggering_alternative(RefAdaAST _t); + public: void abortable_part(RefAdaAST _t); + public: void selective_accept(RefAdaAST _t); + public: void entry_call_alternative(RefAdaAST _t); + public: void delay_alternative(RefAdaAST _t); + public: void stmts_opt(RefAdaAST _t); + public: void guard_opt(RefAdaAST _t); + public: void select_alternative(RefAdaAST _t); + public: void or_select_opt(RefAdaAST _t); + public: void accept_alternative(RefAdaAST _t); + public: void exception_handler(RefAdaAST _t); + public: void identifier_colon_opt(RefAdaAST _t); + public: void except_choice_s(RefAdaAST _t); + public: void exception_choice(RefAdaAST _t); + public: void operator_call(RefAdaAST _t); + public: void relation(RefAdaAST _t); + public: void range_or_mark(RefAdaAST _t); + public: void signed_term(RefAdaAST _t); + public: void term(RefAdaAST _t); + public: void factor(RefAdaAST _t); + public: void primary(RefAdaAST _t); + public: void name_or_qualified(RefAdaAST _t); + public: void allocator(RefAdaAST _t); + public: void subprogram_body(RefAdaAST _t); + public: void task_body(RefAdaAST _t); + public: void protected_body(RefAdaAST _t); +public: + ANTLR_USE_NAMESPACE(antlr)RefAST getAST() + { + return ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST); + } + +protected: + RefAdaAST returnAST; + RefAdaAST _retTree; +private: + static const char* tokenNames[]; +#ifndef NO_STATIC_CONSTS + static const int NUM_TOKENS = 291; +#else + enum { + NUM_TOKENS = 291 + }; +#endif + + static const unsigned long _tokenSet_0_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; + static const unsigned long _tokenSet_1_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; + static const unsigned long _tokenSet_2_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; + static const unsigned long _tokenSet_3_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; + static const unsigned long _tokenSet_4_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_4; +}; + +#endif /*INC_AdaStoreWalker_h_*/ diff --git a/languages/ada/AdaStoreWalker.hpp b/languages/ada/AdaStoreWalker.hpp deleted file mode 100644 index c18f5dcd..00000000 --- a/languages/ada/AdaStoreWalker.hpp +++ /dev/null @@ -1,350 +0,0 @@ -#ifndef INC_AdaStoreWalker_hpp_ -#define INC_AdaStoreWalker_hpp_ - -#line 1 "expandedada.store.g" - -#include -#include -#include - -#include -#include "AdaAST.hpp" -#include "ada_utils.hpp" - -#line 15 "AdaStoreWalker.hpp" -#include -#include "AdaStoreWalkerTokenTypes.hpp" -/* $ANTLR 2.7.7 (20070609): "expandedada.store.g" -> "AdaStoreWalker.hpp"$ */ -#include - -#line 10 "expandedada.store.g" - -#include -#include - -#line 26 "AdaStoreWalker.hpp" -class CUSTOM_API AdaStoreWalker : public ANTLR_USE_NAMESPACE(antlr)TreeParser, public AdaStoreWalkerTokenTypes -{ -#line 25 "expandedada.store.g" - -private: - TQString m_fileName; - TQValueList m_scopeStack; - CodeModel* m_model; - TQValueList m_imports; - NamespaceDom m_currentContainer; - int m_currentAccess; - bool m_addToStore; /* auxiliary variable: for the moment, this is `true' - only when we are in specs, not bodies. */ - bool m_isSubprogram; // auxiliary to def_id() - FileDom m_file; - -public: - void setCodeModel (CodeModel* model) { m_model = model; } - CodeModel* codeModel () { return m_model; } - const CodeModel* codeModel () const { return m_model; } - - TQString fileName () const { return m_fileName; } - void setFileName (const TQString& fileName) { m_fileName = fileName; } - - void init () { - m_scopeStack.clear (); - m_imports.clear (); - m_currentContainer = m_model->globalNamespace (); - m_scopeStack.append (m_currentContainer); - m_currentAccess = CodeModelItem::Public; - m_addToStore = false; - m_isSubprogram = false; - if (m_model->hasFile(m_fileName)) - m_model->removeFile (m_model->fileByName(m_fileName)); - m_file = m_model->create(); - m_file->setName(m_fileName); - m_model->addFile(m_file); - } - - void wipeout () { m_model->wipeout (); } -// void out () { m_store->out (); } - void removeWithReferences (const TQString& fileName) { - m_model->removeFile (m_model->fileByName(fileName)); - } - NamespaceDom insertScopeContainer - (NamespaceDom scope, const TQStringList & scopes ) { - TQStringList::ConstIterator it = scopes.begin(); - TQString prefix( *it ); - NamespaceDom ns = scope->namespaceByName( prefix ); -// kdDebug() << "insertScopeContainer begin with prefix " << prefix << endl; - if (!ns.data()) { -// kdDebug() << "insertScopeContainer: ns is empty" << endl; - ns = m_model->create(); -// kdDebug() << "insertScopeContainer: ns created" << endl; - ns->setName( prefix ); -// kdDebug() << "insertScopeContainer: ns name set" << endl; - scope->addNamespace( ns ); -// kdDebug() << "insertScopeContainer: ns added to a scope" << endl; - - if (scope == m_model->globalNamespace()) - m_file->addNamespace( ns ); - } -// kdDebug() << "insertScopeContainer: while" << endl; - while ( ++it != scopes.end() ) { - TQString nameSegment( *it ); - prefix += "." + nameSegment; -// kdDebug() << "insertScopeContainer: while prefix = " << prefix << endl; - NamespaceDom inner = scope->namespaceByName( prefix ); - if (!inner.data() ) { -// kdDebug() << "insertScopeContainer: inner is empty " << endl; - inner = m_model->create(); -// kdDebug() << "insertScopeContainer: inner created " << endl; - inner->setName( nameSegment ); - ns->addNamespace( inner ); -// kdDebug() << "insertScopeContainer: inner added " << endl; - } - ns = inner; - } - return ns; - } - NamespaceDom defineScope( RefAdaAST namenode ) { - TQStringList scopes( qnamelist( namenode ) ); -// kdDebug() << "defineScope: " << scopes.join(" ") << endl; - NamespaceDom psc = insertScopeContainer( m_currentContainer, scopes ); -// kdDebug() << "defineScope psc created" << endl; - psc->setStartPosition(namenode->getLine(), namenode->getColumn()); -// kdDebug() << "defineScope start position set" << endl; - psc->setFileName(m_fileName); -// kdDebug() << "defineScope file name set" << endl; - // psc->setEndPosition (endLine, 0); -// kdDebug() << "defineScope return" << endl; - return psc; - } -#line 30 "AdaStoreWalker.hpp" -public: - AdaStoreWalker(); - static void initializeASTFactory( ANTLR_USE_NAMESPACE(antlr)ASTFactory& factory ); - int getNumTokens() const - { - return AdaStoreWalker::NUM_TOKENS; - } - const char* getTokenName( int type ) const - { - if( type > getNumTokens() ) return 0; - return AdaStoreWalker::tokenNames[type]; - } - const char* const* getTokenNames() const - { - return AdaStoreWalker::tokenNames; - } - public: void compilation_unit(RefAdaAST _t); - public: void context_items_opt(RefAdaAST _t); - public: void library_item(RefAdaAST _t); - public: void subunit(RefAdaAST _t); - public: void pragma(RefAdaAST _t); - public: void with_clause(RefAdaAST _t); - public: void compound_name(RefAdaAST _t); - public: void use_clause(RefAdaAST _t); - public: void subtype_mark(RefAdaAST _t); - public: void lib_subprog_decl_or_rename_or_inst_or_body(RefAdaAST _t); - public: void def_id(RefAdaAST _t); - public: void pkg_body_part(RefAdaAST _t); - public: void generic_inst(RefAdaAST _t); - public: void pkg_spec_part(RefAdaAST _t); - public: void renames(RefAdaAST _t); - public: void generic_decl(RefAdaAST _t); - public: void subprog_def_id(RefAdaAST _t); - public: void subprog_decl(RefAdaAST _t); - public: void formal_part_opt(RefAdaAST _t); - public: void def_designator(RefAdaAST _t); - public: void function_tail(RefAdaAST _t); - public: void definable_operator_symbol(RefAdaAST _t); - public: void spec_decl_part(RefAdaAST _t); - public: void basic_declarative_items_opt(RefAdaAST _t); - public: void private_declarative_items_opt(RefAdaAST _t); - public: void end_id_opt(RefAdaAST _t); - public: void basic_decl_item(RefAdaAST _t); - public: void generic_formal_part_opt(RefAdaAST _t); - public: void procedure_body(RefAdaAST _t); - public: void function_body(RefAdaAST _t); - public: void subprog_decl_or_rename_or_inst_or_body(RefAdaAST _t); - public: void subprog_decl_or_body(RefAdaAST _t); - public: void package_body(RefAdaAST _t); - public: void pragma_arg(RefAdaAST _t); - public: void expression(RefAdaAST _t); - public: void attribute_id(RefAdaAST _t); - public: void modifiers(RefAdaAST _t); - public: void id_opt(RefAdaAST _t); - public: void value_s(RefAdaAST _t); - public: void value(RefAdaAST _t); - public: void ranged_expr_s(RefAdaAST _t); - public: void ranged_expr(RefAdaAST _t); - public: void simple_expression(RefAdaAST _t); - public: void range(RefAdaAST _t); - public: void range_constraint(RefAdaAST _t); - public: void range_dots(RefAdaAST _t); - public: void range_attrib_ref(RefAdaAST _t); - public: void prefix(RefAdaAST _t); - public: void parameter_specification(RefAdaAST _t); - public: void defining_identifier_list(RefAdaAST _t); - public: void init_opt(RefAdaAST _t); - public: void name(RefAdaAST _t); - public: void parenthesized_primary(RefAdaAST _t); - public: void extension_opt(RefAdaAST _t); - public: void task_type_or_single_decl(RefAdaAST _t); - public: void prot_type_or_single_decl(RefAdaAST _t); - public: void decl_common(RefAdaAST _t); - public: void discrim_part_opt(RefAdaAST _t); - public: void task_definition_opt(RefAdaAST _t); - public: void task_items_opt(RefAdaAST _t); - public: void private_task_items_opt(RefAdaAST _t); - public: void discriminant_specifications(RefAdaAST _t); - public: void discriminant_specification(RefAdaAST _t); - public: void entrydecls_repspecs_opt(RefAdaAST _t); - public: void entry_declaration(RefAdaAST _t); - public: void rep_spec(RefAdaAST _t); - public: void discrete_subtype_def_opt(RefAdaAST _t); - public: void discrete_subtype_definition(RefAdaAST _t); - public: void subtype_ind(RefAdaAST _t); - public: void align_opt(RefAdaAST _t); - public: void comp_loc_s(RefAdaAST _t); - public: void local_enum_name(RefAdaAST _t); - public: void enumeration_aggregate(RefAdaAST _t); - public: void protected_definition(RefAdaAST _t); - public: void prot_private_opt(RefAdaAST _t); - public: void prot_member_decl_s(RefAdaAST _t); - public: void prot_op_decl_s(RefAdaAST _t); - public: void prot_op_decl(RefAdaAST _t); - public: void comp_decl(RefAdaAST _t); - public: void component_subtype_def(RefAdaAST _t); - public: void enum_id_s(RefAdaAST _t); - public: void range_constraint_opt(RefAdaAST _t); - public: void array_type_declaration(RefAdaAST _t); - public: void access_type_declaration(RefAdaAST _t); - public: void id_and_discrim(RefAdaAST _t); - public: void record_definition(RefAdaAST _t); - public: void array_type_definition(RefAdaAST _t); - public: void enumeration_literal_specification(RefAdaAST _t); - public: void index_or_discrete_range_s(RefAdaAST _t); - public: void index_or_discrete_range(RefAdaAST _t); - public: void constraint_opt(RefAdaAST _t); - public: void digits_constraint(RefAdaAST _t); - public: void delta_constraint(RefAdaAST _t); - public: void index_constraint(RefAdaAST _t); - public: void discriminant_constraint(RefAdaAST _t); - public: void discrete_range(RefAdaAST _t); - public: void discriminant_association(RefAdaAST _t); - public: void selector_names_opt(RefAdaAST _t); - public: void selector_name(RefAdaAST _t); - public: void component_list(RefAdaAST _t); - public: void component_items(RefAdaAST _t); - public: void variant_part(RefAdaAST _t); - public: void discriminant_direct_name(RefAdaAST _t); - public: void variant_s(RefAdaAST _t); - public: void variant(RefAdaAST _t); - public: void choice_s(RefAdaAST _t); - public: void choice(RefAdaAST _t); - public: void discrete_with_range(RefAdaAST _t); - public: void mark_with_constraint(RefAdaAST _t); - public: void generic_formal_parameter(RefAdaAST _t); - public: void formal_array_type_declaration(RefAdaAST _t); - public: void formal_access_type_declaration(RefAdaAST _t); - public: void id_part(RefAdaAST _t); - public: void subprogram_default_opt(RefAdaAST _t); - public: void formal_package_actual_part_opt(RefAdaAST _t); - public: void body_part(RefAdaAST _t); - public: void declarative_part(RefAdaAST _t); - public: void block_body(RefAdaAST _t); - public: void declarative_item(RefAdaAST _t); - public: void prot_op_bodies_opt(RefAdaAST _t); - public: void block_body_opt(RefAdaAST _t); - public: void handled_stmt_s(RefAdaAST _t); - public: void entry_body(RefAdaAST _t); - public: void statements(RefAdaAST _t); - public: void except_handler_part_opt(RefAdaAST _t); - public: void handled_stmts_opt(RefAdaAST _t); - public: void statement(RefAdaAST _t); - public: void def_label_opt(RefAdaAST _t); - public: void null_stmt(RefAdaAST _t); - public: void exit_stmt(RefAdaAST _t); - public: void return_stmt(RefAdaAST _t); - public: void goto_stmt(RefAdaAST _t); - public: void delay_stmt(RefAdaAST _t); - public: void abort_stmt(RefAdaAST _t); - public: void raise_stmt(RefAdaAST _t); - public: void requeue_stmt(RefAdaAST _t); - public: void accept_stmt(RefAdaAST _t); - public: void select_stmt(RefAdaAST _t); - public: void if_stmt(RefAdaAST _t); - public: void case_stmt(RefAdaAST _t); - public: void loop_stmt(RefAdaAST _t); - public: void block(RefAdaAST _t); - public: void call_or_assignment(RefAdaAST _t); - public: void cond_clause(RefAdaAST _t); - public: void elsifs_opt(RefAdaAST _t); - public: void else_opt(RefAdaAST _t); - public: void condition(RefAdaAST _t); - public: void alternative_s(RefAdaAST _t); - public: void case_statement_alternative(RefAdaAST _t); - public: void iteration_scheme_opt(RefAdaAST _t); - public: void declare_opt(RefAdaAST _t); - public: void label_name(RefAdaAST _t); - public: void entry_body_formal_part(RefAdaAST _t); - public: void entry_barrier(RefAdaAST _t); - public: void entry_index_spec_opt(RefAdaAST _t); - public: void entry_call_stmt(RefAdaAST _t); - public: void entry_index_opt(RefAdaAST _t); - public: void triggering_alternative(RefAdaAST _t); - public: void abortable_part(RefAdaAST _t); - public: void selective_accept(RefAdaAST _t); - public: void entry_call_alternative(RefAdaAST _t); - public: void delay_alternative(RefAdaAST _t); - public: void stmts_opt(RefAdaAST _t); - public: void guard_opt(RefAdaAST _t); - public: void select_alternative(RefAdaAST _t); - public: void or_select_opt(RefAdaAST _t); - public: void accept_alternative(RefAdaAST _t); - public: void exception_handler(RefAdaAST _t); - public: void identifier_colon_opt(RefAdaAST _t); - public: void except_choice_s(RefAdaAST _t); - public: void exception_choice(RefAdaAST _t); - public: void operator_call(RefAdaAST _t); - public: void relation(RefAdaAST _t); - public: void range_or_mark(RefAdaAST _t); - public: void signed_term(RefAdaAST _t); - public: void term(RefAdaAST _t); - public: void factor(RefAdaAST _t); - public: void primary(RefAdaAST _t); - public: void name_or_qualified(RefAdaAST _t); - public: void allocator(RefAdaAST _t); - public: void subprogram_body(RefAdaAST _t); - public: void task_body(RefAdaAST _t); - public: void protected_body(RefAdaAST _t); -public: - ANTLR_USE_NAMESPACE(antlr)RefAST getAST() - { - return ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST); - } - -protected: - RefAdaAST returnAST; - RefAdaAST _retTree; -private: - static const char* tokenNames[]; -#ifndef NO_STATIC_CONSTS - static const int NUM_TOKENS = 291; -#else - enum { - NUM_TOKENS = 291 - }; -#endif - - static const unsigned long _tokenSet_0_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; - static const unsigned long _tokenSet_1_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; - static const unsigned long _tokenSet_2_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; - static const unsigned long _tokenSet_3_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; - static const unsigned long _tokenSet_4_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_4; -}; - -#endif /*INC_AdaStoreWalker_hpp_*/ diff --git a/languages/ada/AdaStoreWalkerTokenTypes.h b/languages/ada/AdaStoreWalkerTokenTypes.h new file mode 100644 index 00000000..be52bae2 --- /dev/null +++ b/languages/ada/AdaStoreWalkerTokenTypes.h @@ -0,0 +1,307 @@ +#ifndef INC_AdaStoreWalkerTokenTypes_h_ +#define INC_AdaStoreWalkerTokenTypes_h_ + +/* $ANTLR 2.7.7 (20070609): "expandedada.store.g" -> "AdaStoreWalkerTokenTypes.h"$ */ + +#ifndef CUSTOM_API +# define CUSTOM_API +#endif + +#ifdef __cplusplus +struct CUSTOM_API AdaStoreWalkerTokenTypes { +#endif + enum { + EOF_ = 1, + PRAGMA = 4, + IDENTIFIER = 5, + SEMI = 6, + LPAREN = 7, + COMMA = 8, + RPAREN = 9, + RIGHT_SHAFT = 10, + WITH = 11, + DOT = 12, + USE = 13, + TYPE = 14, + TIC = 15, + RANGE = 16, + DIGITS = 17, + DELTA = 18, + ACCESS = 19, + PRIVATE = 20, + PACKAGE = 21, + BODY = 22, + IS = 23, + PROCEDURE = 24, + FUNCTION = 25, + NEW = 26, + OTHERS = 27, + PIPE = 28, + DOT_DOT = 29, + ALL = 30, + COLON = 31, + IN = 32, + OUT = 33, + RENAMES = 34, + CHARACTER_LITERAL = 35, + CHAR_STRING = 36, + NuLL = 37, + RECORD = 38, + SEPARATE = 39, + ABSTRACT = 40, + RETURN = 41, + TASK = 42, + PROTECTED = 43, + BOX = 44, + ASSIGN = 45, + ENTRY = 46, + FOR = 47, + END = 48, + AT = 49, + MOD = 50, + SUBTYPE = 51, + EXCEPTION = 52, + CONSTANT = 53, + ARRAY = 54, + OF = 55, + ALIASED = 56, + CASE = 57, + WHEN = 58, + TAGGED = 59, + LIMITED = 60, + GENERIC = 61, + BEGIN = 62, + LT_LT = 63, + GT_GT = 64, + IF = 65, + THEN = 66, + ELSIF = 67, + ELSE = 68, + LOOP = 69, + WHILE = 70, + REVERSE = 71, + DECLARE = 72, + EXIT = 73, + GOTO = 74, + ACCEPT = 75, + DO = 76, + DELAY = 77, + UNTIL = 78, + SELECT = 79, + ABORT = 80, + OR = 81, + TERMINATE = 82, + RAISE = 83, + REQUEUE = 84, + AND = 85, + XOR = 86, + NOT = 87, + EQ = 88, + NE = 89, + LT_ = 90, + LE = 91, + GT = 92, + GE = 93, + PLUS = 94, + MINUS = 95, + CONCAT = 96, + STAR = 97, + DIV = 98, + REM = 99, + ABS = 100, + EXPON = 101, + NUMERIC_LIT = 102, + ABORTABLE_PART = 103, + ABORT_STATEMENT = 104, + ACCEPT_ALTERNATIVE = 105, + ACCEPT_STATEMENT = 106, + ALLOCATOR = 107, + ASSIGNMENT_STATEMENT = 108, + ASYNCHRONOUS_SELECT = 109, + ATTRIBUTE_DEFINITION_CLAUSE = 110, + AT_CLAUSE = 111, + BLOCK_STATEMENT = 112, + CASE_STATEMENT = 113, + CASE_STATEMENT_ALTERNATIVE = 114, + CODE_STATEMENT = 115, + COMPONENT_DECLARATION = 116, + CONDITIONAL_ENTRY_CALL = 117, + CONTEXT_CLAUSE = 118, + DECLARATIVE_PART = 119, + DEFINING_IDENTIFIER_LIST = 120, + DELAY_ALTERNATIVE = 121, + DELAY_STATEMENT = 122, + DELTA_CONSTRAINT = 123, + DIGITS_CONSTRAINT = 124, + DISCRIMINANT_ASSOCIATION = 125, + DISCRIMINANT_CONSTRAINT = 126, + DISCRIMINANT_SPECIFICATION = 127, + ENTRY_BODY = 128, + ENTRY_CALL_ALTERNATIVE = 129, + ENTRY_CALL_STATEMENT = 130, + ENTRY_DECLARATION = 131, + ENTRY_INDEX_SPECIFICATION = 132, + ENUMERATION_REPESENTATION_CLAUSE = 133, + EXCEPTION_DECLARATION = 134, + EXCEPTION_HANDLER = 135, + EXCEPTION_RENAMING_DECLARATION = 136, + EXIT_STATEMENT = 137, + FORMAL_PACKAGE_DECLARATION = 138, + GENERIC_FORMAL_PART = 139, + GENERIC_PACKAGE_DECLARATION = 140, + GOTO_STATEMENT = 141, + HANDLED_SEQUENCE_OF_STATEMENTS = 142, + HANDLED_STMTS_OPT = 143, + IF_STATEMENT = 144, + INCOMPLETE_TYPE_DECLARATION = 145, + INDEXED_COMPONENT = 146, + INDEX_CONSTRAINT = 147, + LIBRARY_ITEM = 148, + LOOP_STATEMENT = 149, + NAME = 150, + NULL_STATEMENT = 151, + NUMBER_DECLARATION = 152, + OBJECT_DECLARATION = 153, + OBJECT_RENAMING_DECLARATION = 154, + OPERATOR_SYMBOL = 155, + PACKAGE_BODY = 156, + PACKAGE_BODY_STUB = 157, + PACKAGE_RENAMING_DECLARATION = 158, + PACKAGE_SPECIFICATION = 159, + PARAMETER_SPECIFICATION = 160, + PRIVATE_EXTENSION_DECLARATION = 161, + PRIVATE_TYPE_DECLARATION = 162, + PROTECTED_BODY = 163, + PROTECTED_BODY_STUB = 164, + PROTECTED_TYPE_DECLARATION = 165, + RAISE_STATEMENT = 166, + RANGE_ATTRIBUTE_REFERENCE = 167, + RECORD_REPRESENTATION_CLAUSE = 168, + REQUEUE_STATEMENT = 169, + RETURN_STATEMENT = 170, + SELECTIVE_ACCEPT = 171, + SEQUENCE_OF_STATEMENTS = 172, + SINGLE_PROTECTED_DECLARATION = 173, + SINGLE_TASK_DECLARATION = 174, + STATEMENT = 175, + SUBTYPE_DECLARATION = 176, + SUBTYPE_INDICATION = 177, + SUBTYPE_MARK = 178, + SUBUNIT = 179, + TASK_BODY = 180, + TASK_BODY_STUB = 181, + TASK_TYPE_DECLARATION = 182, + TERMINATE_ALTERNATIVE = 183, + TIMED_ENTRY_CALL = 184, + TRIGGERING_ALTERNATIVE = 185, + USE_CLAUSE = 186, + USE_TYPE_CLAUSE = 187, + VARIANT = 188, + VARIANT_PART = 189, + WITH_CLAUSE = 190, + ABSTRACT_FUNCTION_DECLARATION = 191, + ABSTRACT_PROCEDURE_DECLARATION = 192, + ACCESS_TO_FUNCTION_DECLARATION = 193, + ACCESS_TO_OBJECT_DECLARATION = 194, + ACCESS_TO_PROCEDURE_DECLARATION = 195, + ARRAY_OBJECT_DECLARATION = 196, + ARRAY_TYPE_DECLARATION = 197, + AND_THEN = 198, + BASIC_DECLARATIVE_ITEMS_OPT = 199, + BLOCK_BODY = 200, + BLOCK_BODY_OPT = 201, + CALL_STATEMENT = 202, + COMPONENT_CLAUSES_OPT = 203, + COMPONENT_ITEMS = 204, + COND_CLAUSE = 205, + DECIMAL_FIXED_POINT_DECLARATION = 206, + DECLARE_OPT = 207, + DERIVED_RECORD_EXTENSION = 208, + DISCRETE_SUBTYPE_DEF_OPT = 209, + DISCRIMINANT_SPECIFICATIONS = 210, + DISCRIM_PART_OPT = 211, + ELSE_OPT = 212, + ELSIFS_OPT = 213, + END_ID_OPT = 214, + ENTRY_INDEX_OPT = 215, + ENUMERATION_TYPE_DECLARATION = 216, + EXCEPT_HANDLER_PART_OPT = 217, + EXTENSION_OPT = 218, + FLOATING_POINT_DECLARATION = 219, + FORMAL_DECIMAL_FIXED_POINT_DECLARATION = 220, + FORMAL_DISCRETE_TYPE_DECLARATION = 221, + FORMAL_FLOATING_POINT_DECLARATION = 222, + FORMAL_FUNCTION_DECLARATION = 223, + FORMAL_MODULAR_TYPE_DECLARATION = 224, + FORMAL_ORDINARY_DERIVED_TYPE_DECLARATION = 225, + FORMAL_ORDINARY_FIXED_POINT_DECLARATION = 226, + FORMAL_PART_OPT = 227, + FORMAL_PRIVATE_EXTENSION_DECLARATION = 228, + FORMAL_PRIVATE_TYPE_DECLARATION = 229, + FORMAL_PROCEDURE_DECLARATION = 230, + FORMAL_SIGNED_INTEGER_TYPE_DECLARATION = 231, + FUNCTION_BODY = 232, + FUNCTION_BODY_STUB = 233, + FUNCTION_DECLARATION = 234, + FUNCTION_RENAMING_DECLARATION = 235, + GENERIC_FUNCTION_DECLARATION = 236, + GENERIC_FUNCTION_INSTANTIATION = 237, + GENERIC_FUNCTION_RENAMING = 238, + GENERIC_PACKAGE_INSTANTIATION = 239, + GENERIC_PACKAGE_RENAMING = 240, + GENERIC_PROCEDURE_DECLARATION = 241, + GENERIC_PROCEDURE_INSTANTIATION = 242, + GENERIC_PROCEDURE_RENAMING = 243, + GUARD_OPT = 244, + IDENTIFIER_COLON_OPT = 245, + ID_OPT = 246, + INIT_OPT = 247, + ITERATION_SCHEME_OPT = 248, + LABEL_OPT = 249, + MARK_WITH_CONSTRAINT = 250, + MODIFIERS = 251, + MODULAR_TYPE_DECLARATION = 252, + MOD_CLAUSE_OPT = 253, + NOT_IN = 254, + ORDINARY_DERIVED_TYPE_DECLARATION = 255, + ORDINARY_FIXED_POINT_DECLARATION = 256, + OR_ELSE = 257, + OR_SELECT_OPT = 258, + PARENTHESIZED_PRIMARY = 259, + PRIVATE_DECLARATIVE_ITEMS_OPT = 260, + PRIVATE_TASK_ITEMS_OPT = 261, + PROCEDURE_BODY = 262, + PROCEDURE_BODY_STUB = 263, + PROCEDURE_DECLARATION = 264, + PROCEDURE_RENAMING_DECLARATION = 265, + PROT_MEMBER_DECLARATIONS = 266, + PROT_OP_BODIES_OPT = 267, + PROT_OP_DECLARATIONS = 268, + PROT_PRIVATE_OPT = 269, + RANGED_EXPRS = 270, + RANGE_CONSTRAINT = 271, + RECORD_TYPE_DECLARATION = 272, + SELECTOR_NAMES_OPT = 273, + SIGNED_INTEGER_TYPE_DECLARATION = 274, + TASK_ITEMS_OPT = 275, + UNARY_MINUS = 276, + UNARY_PLUS = 277, + VALUE = 278, + VALUES = 279, + VARIANTS = 280, + COMMENT_INTRO = 281, + OX = 282, + TIC_OR_CHARACTER_LITERAL = 283, + DIGIT = 284, + EXPONENT = 285, + EXTENDED_DIGIT = 286, + BASED_INTEGER = 287, + WS_ = 288, + COMMENT = 289, + CHARACTER_STRING = 290, + NULL_TREE_LOOKAHEAD = 3 + }; +#ifdef __cplusplus +}; +#endif +#endif /*INC_AdaStoreWalkerTokenTypes_h_*/ diff --git a/languages/ada/AdaStoreWalkerTokenTypes.hpp b/languages/ada/AdaStoreWalkerTokenTypes.hpp deleted file mode 100644 index daaa4b21..00000000 --- a/languages/ada/AdaStoreWalkerTokenTypes.hpp +++ /dev/null @@ -1,307 +0,0 @@ -#ifndef INC_AdaStoreWalkerTokenTypes_hpp_ -#define INC_AdaStoreWalkerTokenTypes_hpp_ - -/* $ANTLR 2.7.7 (20070609): "expandedada.store.g" -> "AdaStoreWalkerTokenTypes.hpp"$ */ - -#ifndef CUSTOM_API -# define CUSTOM_API -#endif - -#ifdef __cplusplus -struct CUSTOM_API AdaStoreWalkerTokenTypes { -#endif - enum { - EOF_ = 1, - PRAGMA = 4, - IDENTIFIER = 5, - SEMI = 6, - LPAREN = 7, - COMMA = 8, - RPAREN = 9, - RIGHT_SHAFT = 10, - WITH = 11, - DOT = 12, - USE = 13, - TYPE = 14, - TIC = 15, - RANGE = 16, - DIGITS = 17, - DELTA = 18, - ACCESS = 19, - PRIVATE = 20, - PACKAGE = 21, - BODY = 22, - IS = 23, - PROCEDURE = 24, - FUNCTION = 25, - NEW = 26, - OTHERS = 27, - PIPE = 28, - DOT_DOT = 29, - ALL = 30, - COLON = 31, - IN = 32, - OUT = 33, - RENAMES = 34, - CHARACTER_LITERAL = 35, - CHAR_STRING = 36, - NuLL = 37, - RECORD = 38, - SEPARATE = 39, - ABSTRACT = 40, - RETURN = 41, - TASK = 42, - PROTECTED = 43, - BOX = 44, - ASSIGN = 45, - ENTRY = 46, - FOR = 47, - END = 48, - AT = 49, - MOD = 50, - SUBTYPE = 51, - EXCEPTION = 52, - CONSTANT = 53, - ARRAY = 54, - OF = 55, - ALIASED = 56, - CASE = 57, - WHEN = 58, - TAGGED = 59, - LIMITED = 60, - GENERIC = 61, - BEGIN = 62, - LT_LT = 63, - GT_GT = 64, - IF = 65, - THEN = 66, - ELSIF = 67, - ELSE = 68, - LOOP = 69, - WHILE = 70, - REVERSE = 71, - DECLARE = 72, - EXIT = 73, - GOTO = 74, - ACCEPT = 75, - DO = 76, - DELAY = 77, - UNTIL = 78, - SELECT = 79, - ABORT = 80, - OR = 81, - TERMINATE = 82, - RAISE = 83, - REQUEUE = 84, - AND = 85, - XOR = 86, - NOT = 87, - EQ = 88, - NE = 89, - LT_ = 90, - LE = 91, - GT = 92, - GE = 93, - PLUS = 94, - MINUS = 95, - CONCAT = 96, - STAR = 97, - DIV = 98, - REM = 99, - ABS = 100, - EXPON = 101, - NUMERIC_LIT = 102, - ABORTABLE_PART = 103, - ABORT_STATEMENT = 104, - ACCEPT_ALTERNATIVE = 105, - ACCEPT_STATEMENT = 106, - ALLOCATOR = 107, - ASSIGNMENT_STATEMENT = 108, - ASYNCHRONOUS_SELECT = 109, - ATTRIBUTE_DEFINITION_CLAUSE = 110, - AT_CLAUSE = 111, - BLOCK_STATEMENT = 112, - CASE_STATEMENT = 113, - CASE_STATEMENT_ALTERNATIVE = 114, - CODE_STATEMENT = 115, - COMPONENT_DECLARATION = 116, - CONDITIONAL_ENTRY_CALL = 117, - CONTEXT_CLAUSE = 118, - DECLARATIVE_PART = 119, - DEFINING_IDENTIFIER_LIST = 120, - DELAY_ALTERNATIVE = 121, - DELAY_STATEMENT = 122, - DELTA_CONSTRAINT = 123, - DIGITS_CONSTRAINT = 124, - DISCRIMINANT_ASSOCIATION = 125, - DISCRIMINANT_CONSTRAINT = 126, - DISCRIMINANT_SPECIFICATION = 127, - ENTRY_BODY = 128, - ENTRY_CALL_ALTERNATIVE = 129, - ENTRY_CALL_STATEMENT = 130, - ENTRY_DECLARATION = 131, - ENTRY_INDEX_SPECIFICATION = 132, - ENUMERATION_REPESENTATION_CLAUSE = 133, - EXCEPTION_DECLARATION = 134, - EXCEPTION_HANDLER = 135, - EXCEPTION_RENAMING_DECLARATION = 136, - EXIT_STATEMENT = 137, - FORMAL_PACKAGE_DECLARATION = 138, - GENERIC_FORMAL_PART = 139, - GENERIC_PACKAGE_DECLARATION = 140, - GOTO_STATEMENT = 141, - HANDLED_SEQUENCE_OF_STATEMENTS = 142, - HANDLED_STMTS_OPT = 143, - IF_STATEMENT = 144, - INCOMPLETE_TYPE_DECLARATION = 145, - INDEXED_COMPONENT = 146, - INDEX_CONSTRAINT = 147, - LIBRARY_ITEM = 148, - LOOP_STATEMENT = 149, - NAME = 150, - NULL_STATEMENT = 151, - NUMBER_DECLARATION = 152, - OBJECT_DECLARATION = 153, - OBJECT_RENAMING_DECLARATION = 154, - OPERATOR_SYMBOL = 155, - PACKAGE_BODY = 156, - PACKAGE_BODY_STUB = 157, - PACKAGE_RENAMING_DECLARATION = 158, - PACKAGE_SPECIFICATION = 159, - PARAMETER_SPECIFICATION = 160, - PRIVATE_EXTENSION_DECLARATION = 161, - PRIVATE_TYPE_DECLARATION = 162, - PROTECTED_BODY = 163, - PROTECTED_BODY_STUB = 164, - PROTECTED_TYPE_DECLARATION = 165, - RAISE_STATEMENT = 166, - RANGE_ATTRIBUTE_REFERENCE = 167, - RECORD_REPRESENTATION_CLAUSE = 168, - REQUEUE_STATEMENT = 169, - RETURN_STATEMENT = 170, - SELECTIVE_ACCEPT = 171, - SEQUENCE_OF_STATEMENTS = 172, - SINGLE_PROTECTED_DECLARATION = 173, - SINGLE_TASK_DECLARATION = 174, - STATEMENT = 175, - SUBTYPE_DECLARATION = 176, - SUBTYPE_INDICATION = 177, - SUBTYPE_MARK = 178, - SUBUNIT = 179, - TASK_BODY = 180, - TASK_BODY_STUB = 181, - TASK_TYPE_DECLARATION = 182, - TERMINATE_ALTERNATIVE = 183, - TIMED_ENTRY_CALL = 184, - TRIGGERING_ALTERNATIVE = 185, - USE_CLAUSE = 186, - USE_TYPE_CLAUSE = 187, - VARIANT = 188, - VARIANT_PART = 189, - WITH_CLAUSE = 190, - ABSTRACT_FUNCTION_DECLARATION = 191, - ABSTRACT_PROCEDURE_DECLARATION = 192, - ACCESS_TO_FUNCTION_DECLARATION = 193, - ACCESS_TO_OBJECT_DECLARATION = 194, - ACCESS_TO_PROCEDURE_DECLARATION = 195, - ARRAY_OBJECT_DECLARATION = 196, - ARRAY_TYPE_DECLARATION = 197, - AND_THEN = 198, - BASIC_DECLARATIVE_ITEMS_OPT = 199, - BLOCK_BODY = 200, - BLOCK_BODY_OPT = 201, - CALL_STATEMENT = 202, - COMPONENT_CLAUSES_OPT = 203, - COMPONENT_ITEMS = 204, - COND_CLAUSE = 205, - DECIMAL_FIXED_POINT_DECLARATION = 206, - DECLARE_OPT = 207, - DERIVED_RECORD_EXTENSION = 208, - DISCRETE_SUBTYPE_DEF_OPT = 209, - DISCRIMINANT_SPECIFICATIONS = 210, - DISCRIM_PART_OPT = 211, - ELSE_OPT = 212, - ELSIFS_OPT = 213, - END_ID_OPT = 214, - ENTRY_INDEX_OPT = 215, - ENUMERATION_TYPE_DECLARATION = 216, - EXCEPT_HANDLER_PART_OPT = 217, - EXTENSION_OPT = 218, - FLOATING_POINT_DECLARATION = 219, - FORMAL_DECIMAL_FIXED_POINT_DECLARATION = 220, - FORMAL_DISCRETE_TYPE_DECLARATION = 221, - FORMAL_FLOATING_POINT_DECLARATION = 222, - FORMAL_FUNCTION_DECLARATION = 223, - FORMAL_MODULAR_TYPE_DECLARATION = 224, - FORMAL_ORDINARY_DERIVED_TYPE_DECLARATION = 225, - FORMAL_ORDINARY_FIXED_POINT_DECLARATION = 226, - FORMAL_PART_OPT = 227, - FORMAL_PRIVATE_EXTENSION_DECLARATION = 228, - FORMAL_PRIVATE_TYPE_DECLARATION = 229, - FORMAL_PROCEDURE_DECLARATION = 230, - FORMAL_SIGNED_INTEGER_TYPE_DECLARATION = 231, - FUNCTION_BODY = 232, - FUNCTION_BODY_STUB = 233, - FUNCTION_DECLARATION = 234, - FUNCTION_RENAMING_DECLARATION = 235, - GENERIC_FUNCTION_DECLARATION = 236, - GENERIC_FUNCTION_INSTANTIATION = 237, - GENERIC_FUNCTION_RENAMING = 238, - GENERIC_PACKAGE_INSTANTIATION = 239, - GENERIC_PACKAGE_RENAMING = 240, - GENERIC_PROCEDURE_DECLARATION = 241, - GENERIC_PROCEDURE_INSTANTIATION = 242, - GENERIC_PROCEDURE_RENAMING = 243, - GUARD_OPT = 244, - IDENTIFIER_COLON_OPT = 245, - ID_OPT = 246, - INIT_OPT = 247, - ITERATION_SCHEME_OPT = 248, - LABEL_OPT = 249, - MARK_WITH_CONSTRAINT = 250, - MODIFIERS = 251, - MODULAR_TYPE_DECLARATION = 252, - MOD_CLAUSE_OPT = 253, - NOT_IN = 254, - ORDINARY_DERIVED_TYPE_DECLARATION = 255, - ORDINARY_FIXED_POINT_DECLARATION = 256, - OR_ELSE = 257, - OR_SELECT_OPT = 258, - PARENTHESIZED_PRIMARY = 259, - PRIVATE_DECLARATIVE_ITEMS_OPT = 260, - PRIVATE_TASK_ITEMS_OPT = 261, - PROCEDURE_BODY = 262, - PROCEDURE_BODY_STUB = 263, - PROCEDURE_DECLARATION = 264, - PROCEDURE_RENAMING_DECLARATION = 265, - PROT_MEMBER_DECLARATIONS = 266, - PROT_OP_BODIES_OPT = 267, - PROT_OP_DECLARATIONS = 268, - PROT_PRIVATE_OPT = 269, - RANGED_EXPRS = 270, - RANGE_CONSTRAINT = 271, - RECORD_TYPE_DECLARATION = 272, - SELECTOR_NAMES_OPT = 273, - SIGNED_INTEGER_TYPE_DECLARATION = 274, - TASK_ITEMS_OPT = 275, - UNARY_MINUS = 276, - UNARY_PLUS = 277, - VALUE = 278, - VALUES = 279, - VARIANTS = 280, - COMMENT_INTRO = 281, - OX = 282, - TIC_OR_CHARACTER_LITERAL = 283, - DIGIT = 284, - EXPONENT = 285, - EXTENDED_DIGIT = 286, - BASED_INTEGER = 287, - WS_ = 288, - COMMENT = 289, - CHARACTER_STRING = 290, - NULL_TREE_LOOKAHEAD = 3 - }; -#ifdef __cplusplus -}; -#endif -#endif /*INC_AdaStoreWalkerTokenTypes_hpp_*/ diff --git a/languages/ada/AdaTokenTypes.h b/languages/ada/AdaTokenTypes.h new file mode 100644 index 00000000..becbd205 --- /dev/null +++ b/languages/ada/AdaTokenTypes.h @@ -0,0 +1,306 @@ +#ifndef INC_AdaTokenTypes_h_ +#define INC_AdaTokenTypes_h_ + +/* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaTokenTypes.h"$ */ + +#ifndef CUSTOM_API +# define CUSTOM_API +#endif + +#ifdef __cplusplus +struct CUSTOM_API AdaTokenTypes { +#endif + enum { + EOF_ = 1, + PRAGMA = 4, + IDENTIFIER = 5, + SEMI = 6, + LPAREN = 7, + COMMA = 8, + RPAREN = 9, + RIGHT_SHAFT = 10, + WITH = 11, + DOT = 12, + USE = 13, + TYPE = 14, + TIC = 15, + RANGE = 16, + DIGITS = 17, + DELTA = 18, + ACCESS = 19, + PRIVATE = 20, + PACKAGE = 21, + BODY = 22, + IS = 23, + PROCEDURE = 24, + FUNCTION = 25, + NEW = 26, + OTHERS = 27, + PIPE = 28, + DOT_DOT = 29, + ALL = 30, + COLON = 31, + IN = 32, + OUT = 33, + RENAMES = 34, + CHARACTER_LITERAL = 35, + CHAR_STRING = 36, + NuLL = 37, + RECORD = 38, + SEPARATE = 39, + ABSTRACT = 40, + RETURN = 41, + TASK = 42, + PROTECTED = 43, + BOX = 44, + ASSIGN = 45, + ENTRY = 46, + FOR = 47, + END = 48, + AT = 49, + MOD = 50, + SUBTYPE = 51, + EXCEPTION = 52, + CONSTANT = 53, + ARRAY = 54, + OF = 55, + ALIASED = 56, + CASE = 57, + WHEN = 58, + TAGGED = 59, + LIMITED = 60, + GENERIC = 61, + BEGIN = 62, + LT_LT = 63, + GT_GT = 64, + IF = 65, + THEN = 66, + ELSIF = 67, + ELSE = 68, + LOOP = 69, + WHILE = 70, + REVERSE = 71, + DECLARE = 72, + EXIT = 73, + GOTO = 74, + ACCEPT = 75, + DO = 76, + DELAY = 77, + UNTIL = 78, + SELECT = 79, + ABORT = 80, + OR = 81, + TERMINATE = 82, + RAISE = 83, + REQUEUE = 84, + AND = 85, + XOR = 86, + NOT = 87, + EQ = 88, + NE = 89, + LT_ = 90, + LE = 91, + GT = 92, + GE = 93, + PLUS = 94, + MINUS = 95, + CONCAT = 96, + STAR = 97, + DIV = 98, + REM = 99, + ABS = 100, + EXPON = 101, + NUMERIC_LIT = 102, + ABORTABLE_PART = 103, + ABORT_STATEMENT = 104, + ACCEPT_ALTERNATIVE = 105, + ACCEPT_STATEMENT = 106, + ALLOCATOR = 107, + ASSIGNMENT_STATEMENT = 108, + ASYNCHRONOUS_SELECT = 109, + ATTRIBUTE_DEFINITION_CLAUSE = 110, + AT_CLAUSE = 111, + BLOCK_STATEMENT = 112, + CASE_STATEMENT = 113, + CASE_STATEMENT_ALTERNATIVE = 114, + CODE_STATEMENT = 115, + COMPONENT_DECLARATION = 116, + CONDITIONAL_ENTRY_CALL = 117, + CONTEXT_CLAUSE = 118, + DECLARATIVE_PART = 119, + DEFINING_IDENTIFIER_LIST = 120, + DELAY_ALTERNATIVE = 121, + DELAY_STATEMENT = 122, + DELTA_CONSTRAINT = 123, + DIGITS_CONSTRAINT = 124, + DISCRIMINANT_ASSOCIATION = 125, + DISCRIMINANT_CONSTRAINT = 126, + DISCRIMINANT_SPECIFICATION = 127, + ENTRY_BODY = 128, + ENTRY_CALL_ALTERNATIVE = 129, + ENTRY_CALL_STATEMENT = 130, + ENTRY_DECLARATION = 131, + ENTRY_INDEX_SPECIFICATION = 132, + ENUMERATION_REPESENTATION_CLAUSE = 133, + EXCEPTION_DECLARATION = 134, + EXCEPTION_HANDLER = 135, + EXCEPTION_RENAMING_DECLARATION = 136, + EXIT_STATEMENT = 137, + FORMAL_PACKAGE_DECLARATION = 138, + GENERIC_FORMAL_PART = 139, + GENERIC_PACKAGE_DECLARATION = 140, + GOTO_STATEMENT = 141, + HANDLED_SEQUENCE_OF_STATEMENTS = 142, + HANDLED_STMTS_OPT = 143, + IF_STATEMENT = 144, + INCOMPLETE_TYPE_DECLARATION = 145, + INDEXED_COMPONENT = 146, + INDEX_CONSTRAINT = 147, + LIBRARY_ITEM = 148, + LOOP_STATEMENT = 149, + NAME = 150, + NULL_STATEMENT = 151, + NUMBER_DECLARATION = 152, + OBJECT_DECLARATION = 153, + OBJECT_RENAMING_DECLARATION = 154, + OPERATOR_SYMBOL = 155, + PACKAGE_BODY = 156, + PACKAGE_BODY_STUB = 157, + PACKAGE_RENAMING_DECLARATION = 158, + PACKAGE_SPECIFICATION = 159, + PARAMETER_SPECIFICATION = 160, + PRIVATE_EXTENSION_DECLARATION = 161, + PRIVATE_TYPE_DECLARATION = 162, + PROTECTED_BODY = 163, + PROTECTED_BODY_STUB = 164, + PROTECTED_TYPE_DECLARATION = 165, + RAISE_STATEMENT = 166, + RANGE_ATTRIBUTE_REFERENCE = 167, + RECORD_REPRESENTATION_CLAUSE = 168, + REQUEUE_STATEMENT = 169, + RETURN_STATEMENT = 170, + SELECTIVE_ACCEPT = 171, + SEQUENCE_OF_STATEMENTS = 172, + SINGLE_PROTECTED_DECLARATION = 173, + SINGLE_TASK_DECLARATION = 174, + STATEMENT = 175, + SUBTYPE_DECLARATION = 176, + SUBTYPE_INDICATION = 177, + SUBTYPE_MARK = 178, + SUBUNIT = 179, + TASK_BODY = 180, + TASK_BODY_STUB = 181, + TASK_TYPE_DECLARATION = 182, + TERMINATE_ALTERNATIVE = 183, + TIMED_ENTRY_CALL = 184, + TRIGGERING_ALTERNATIVE = 185, + USE_CLAUSE = 186, + USE_TYPE_CLAUSE = 187, + VARIANT = 188, + VARIANT_PART = 189, + WITH_CLAUSE = 190, + ABSTRACT_FUNCTION_DECLARATION = 191, + ABSTRACT_PROCEDURE_DECLARATION = 192, + ACCESS_TO_FUNCTION_DECLARATION = 193, + ACCESS_TO_OBJECT_DECLARATION = 194, + ACCESS_TO_PROCEDURE_DECLARATION = 195, + ARRAY_OBJECT_DECLARATION = 196, + ARRAY_TYPE_DECLARATION = 197, + AND_THEN = 198, + BASIC_DECLARATIVE_ITEMS_OPT = 199, + BLOCK_BODY = 200, + BLOCK_BODY_OPT = 201, + CALL_STATEMENT = 202, + COMPONENT_CLAUSES_OPT = 203, + COMPONENT_ITEMS = 204, + COND_CLAUSE = 205, + DECIMAL_FIXED_POINT_DECLARATION = 206, + DECLARE_OPT = 207, + DERIVED_RECORD_EXTENSION = 208, + DISCRETE_SUBTYPE_DEF_OPT = 209, + DISCRIMINANT_SPECIFICATIONS = 210, + DISCRIM_PART_OPT = 211, + ELSE_OPT = 212, + ELSIFS_OPT = 213, + END_ID_OPT = 214, + ENTRY_INDEX_OPT = 215, + ENUMERATION_TYPE_DECLARATION = 216, + EXCEPT_HANDLER_PART_OPT = 217, + EXTENSION_OPT = 218, + FLOATING_POINT_DECLARATION = 219, + FORMAL_DECIMAL_FIXED_POINT_DECLARATION = 220, + FORMAL_DISCRETE_TYPE_DECLARATION = 221, + FORMAL_FLOATING_POINT_DECLARATION = 222, + FORMAL_FUNCTION_DECLARATION = 223, + FORMAL_MODULAR_TYPE_DECLARATION = 224, + FORMAL_ORDINARY_DERIVED_TYPE_DECLARATION = 225, + FORMAL_ORDINARY_FIXED_POINT_DECLARATION = 226, + FORMAL_PART_OPT = 227, + FORMAL_PRIVATE_EXTENSION_DECLARATION = 228, + FORMAL_PRIVATE_TYPE_DECLARATION = 229, + FORMAL_PROCEDURE_DECLARATION = 230, + FORMAL_SIGNED_INTEGER_TYPE_DECLARATION = 231, + FUNCTION_BODY = 232, + FUNCTION_BODY_STUB = 233, + FUNCTION_DECLARATION = 234, + FUNCTION_RENAMING_DECLARATION = 235, + GENERIC_FUNCTION_DECLARATION = 236, + GENERIC_FUNCTION_INSTANTIATION = 237, + GENERIC_FUNCTION_RENAMING = 238, + GENERIC_PACKAGE_INSTANTIATION = 239, + GENERIC_PACKAGE_RENAMING = 240, + GENERIC_PROCEDURE_DECLARATION = 241, + GENERIC_PROCEDURE_INSTANTIATION = 242, + GENERIC_PROCEDURE_RENAMING = 243, + GUARD_OPT = 244, + IDENTIFIER_COLON_OPT = 245, + ID_OPT = 246, + INIT_OPT = 247, + ITERATION_SCHEME_OPT = 248, + LABEL_OPT = 249, + MARK_WITH_CONSTRAINT = 250, + MODIFIERS = 251, + MODULAR_TYPE_DECLARATION = 252, + MOD_CLAUSE_OPT = 253, + NOT_IN = 254, + ORDINARY_DERIVED_TYPE_DECLARATION = 255, + ORDINARY_FIXED_POINT_DECLARATION = 256, + OR_ELSE = 257, + OR_SELECT_OPT = 258, + PARENTHESIZED_PRIMARY = 259, + PRIVATE_DECLARATIVE_ITEMS_OPT = 260, + PRIVATE_TASK_ITEMS_OPT = 261, + PROCEDURE_BODY = 262, + PROCEDURE_BODY_STUB = 263, + PROCEDURE_DECLARATION = 264, + PROCEDURE_RENAMING_DECLARATION = 265, + PROT_MEMBER_DECLARATIONS = 266, + PROT_OP_BODIES_OPT = 267, + PROT_OP_DECLARATIONS = 268, + PROT_PRIVATE_OPT = 269, + RANGED_EXPRS = 270, + RANGE_CONSTRAINT = 271, + RECORD_TYPE_DECLARATION = 272, + SELECTOR_NAMES_OPT = 273, + SIGNED_INTEGER_TYPE_DECLARATION = 274, + TASK_ITEMS_OPT = 275, + UNARY_MINUS = 276, + UNARY_PLUS = 277, + VALUE = 278, + VALUES = 279, + VARIANTS = 280, + COMMENT_INTRO = 281, + OX = 282, + TIC_OR_CHARACTER_LITERAL = 283, + DIGIT = 284, + EXPONENT = 285, + EXTENDED_DIGIT = 286, + BASED_INTEGER = 287, + WS_ = 288, + COMMENT = 289, + NULL_TREE_LOOKAHEAD = 3 + }; +#ifdef __cplusplus +}; +#endif +#endif /*INC_AdaTokenTypes_h_*/ diff --git a/languages/ada/AdaTokenTypes.hpp b/languages/ada/AdaTokenTypes.hpp deleted file mode 100644 index 918b1cfd..00000000 --- a/languages/ada/AdaTokenTypes.hpp +++ /dev/null @@ -1,306 +0,0 @@ -#ifndef INC_AdaTokenTypes_hpp_ -#define INC_AdaTokenTypes_hpp_ - -/* $ANTLR 2.7.7 (20070609): "ada.g" -> "AdaTokenTypes.hpp"$ */ - -#ifndef CUSTOM_API -# define CUSTOM_API -#endif - -#ifdef __cplusplus -struct CUSTOM_API AdaTokenTypes { -#endif - enum { - EOF_ = 1, - PRAGMA = 4, - IDENTIFIER = 5, - SEMI = 6, - LPAREN = 7, - COMMA = 8, - RPAREN = 9, - RIGHT_SHAFT = 10, - WITH = 11, - DOT = 12, - USE = 13, - TYPE = 14, - TIC = 15, - RANGE = 16, - DIGITS = 17, - DELTA = 18, - ACCESS = 19, - PRIVATE = 20, - PACKAGE = 21, - BODY = 22, - IS = 23, - PROCEDURE = 24, - FUNCTION = 25, - NEW = 26, - OTHERS = 27, - PIPE = 28, - DOT_DOT = 29, - ALL = 30, - COLON = 31, - IN = 32, - OUT = 33, - RENAMES = 34, - CHARACTER_LITERAL = 35, - CHAR_STRING = 36, - NuLL = 37, - RECORD = 38, - SEPARATE = 39, - ABSTRACT = 40, - RETURN = 41, - TASK = 42, - PROTECTED = 43, - BOX = 44, - ASSIGN = 45, - ENTRY = 46, - FOR = 47, - END = 48, - AT = 49, - MOD = 50, - SUBTYPE = 51, - EXCEPTION = 52, - CONSTANT = 53, - ARRAY = 54, - OF = 55, - ALIASED = 56, - CASE = 57, - WHEN = 58, - TAGGED = 59, - LIMITED = 60, - GENERIC = 61, - BEGIN = 62, - LT_LT = 63, - GT_GT = 64, - IF = 65, - THEN = 66, - ELSIF = 67, - ELSE = 68, - LOOP = 69, - WHILE = 70, - REVERSE = 71, - DECLARE = 72, - EXIT = 73, - GOTO = 74, - ACCEPT = 75, - DO = 76, - DELAY = 77, - UNTIL = 78, - SELECT = 79, - ABORT = 80, - OR = 81, - TERMINATE = 82, - RAISE = 83, - REQUEUE = 84, - AND = 85, - XOR = 86, - NOT = 87, - EQ = 88, - NE = 89, - LT_ = 90, - LE = 91, - GT = 92, - GE = 93, - PLUS = 94, - MINUS = 95, - CONCAT = 96, - STAR = 97, - DIV = 98, - REM = 99, - ABS = 100, - EXPON = 101, - NUMERIC_LIT = 102, - ABORTABLE_PART = 103, - ABORT_STATEMENT = 104, - ACCEPT_ALTERNATIVE = 105, - ACCEPT_STATEMENT = 106, - ALLOCATOR = 107, - ASSIGNMENT_STATEMENT = 108, - ASYNCHRONOUS_SELECT = 109, - ATTRIBUTE_DEFINITION_CLAUSE = 110, - AT_CLAUSE = 111, - BLOCK_STATEMENT = 112, - CASE_STATEMENT = 113, - CASE_STATEMENT_ALTERNATIVE = 114, - CODE_STATEMENT = 115, - COMPONENT_DECLARATION = 116, - CONDITIONAL_ENTRY_CALL = 117, - CONTEXT_CLAUSE = 118, - DECLARATIVE_PART = 119, - DEFINING_IDENTIFIER_LIST = 120, - DELAY_ALTERNATIVE = 121, - DELAY_STATEMENT = 122, - DELTA_CONSTRAINT = 123, - DIGITS_CONSTRAINT = 124, - DISCRIMINANT_ASSOCIATION = 125, - DISCRIMINANT_CONSTRAINT = 126, - DISCRIMINANT_SPECIFICATION = 127, - ENTRY_BODY = 128, - ENTRY_CALL_ALTERNATIVE = 129, - ENTRY_CALL_STATEMENT = 130, - ENTRY_DECLARATION = 131, - ENTRY_INDEX_SPECIFICATION = 132, - ENUMERATION_REPESENTATION_CLAUSE = 133, - EXCEPTION_DECLARATION = 134, - EXCEPTION_HANDLER = 135, - EXCEPTION_RENAMING_DECLARATION = 136, - EXIT_STATEMENT = 137, - FORMAL_PACKAGE_DECLARATION = 138, - GENERIC_FORMAL_PART = 139, - GENERIC_PACKAGE_DECLARATION = 140, - GOTO_STATEMENT = 141, - HANDLED_SEQUENCE_OF_STATEMENTS = 142, - HANDLED_STMTS_OPT = 143, - IF_STATEMENT = 144, - INCOMPLETE_TYPE_DECLARATION = 145, - INDEXED_COMPONENT = 146, - INDEX_CONSTRAINT = 147, - LIBRARY_ITEM = 148, - LOOP_STATEMENT = 149, - NAME = 150, - NULL_STATEMENT = 151, - NUMBER_DECLARATION = 152, - OBJECT_DECLARATION = 153, - OBJECT_RENAMING_DECLARATION = 154, - OPERATOR_SYMBOL = 155, - PACKAGE_BODY = 156, - PACKAGE_BODY_STUB = 157, - PACKAGE_RENAMING_DECLARATION = 158, - PACKAGE_SPECIFICATION = 159, - PARAMETER_SPECIFICATION = 160, - PRIVATE_EXTENSION_DECLARATION = 161, - PRIVATE_TYPE_DECLARATION = 162, - PROTECTED_BODY = 163, - PROTECTED_BODY_STUB = 164, - PROTECTED_TYPE_DECLARATION = 165, - RAISE_STATEMENT = 166, - RANGE_ATTRIBUTE_REFERENCE = 167, - RECORD_REPRESENTATION_CLAUSE = 168, - REQUEUE_STATEMENT = 169, - RETURN_STATEMENT = 170, - SELECTIVE_ACCEPT = 171, - SEQUENCE_OF_STATEMENTS = 172, - SINGLE_PROTECTED_DECLARATION = 173, - SINGLE_TASK_DECLARATION = 174, - STATEMENT = 175, - SUBTYPE_DECLARATION = 176, - SUBTYPE_INDICATION = 177, - SUBTYPE_MARK = 178, - SUBUNIT = 179, - TASK_BODY = 180, - TASK_BODY_STUB = 181, - TASK_TYPE_DECLARATION = 182, - TERMINATE_ALTERNATIVE = 183, - TIMED_ENTRY_CALL = 184, - TRIGGERING_ALTERNATIVE = 185, - USE_CLAUSE = 186, - USE_TYPE_CLAUSE = 187, - VARIANT = 188, - VARIANT_PART = 189, - WITH_CLAUSE = 190, - ABSTRACT_FUNCTION_DECLARATION = 191, - ABSTRACT_PROCEDURE_DECLARATION = 192, - ACCESS_TO_FUNCTION_DECLARATION = 193, - ACCESS_TO_OBJECT_DECLARATION = 194, - ACCESS_TO_PROCEDURE_DECLARATION = 195, - ARRAY_OBJECT_DECLARATION = 196, - ARRAY_TYPE_DECLARATION = 197, - AND_THEN = 198, - BASIC_DECLARATIVE_ITEMS_OPT = 199, - BLOCK_BODY = 200, - BLOCK_BODY_OPT = 201, - CALL_STATEMENT = 202, - COMPONENT_CLAUSES_OPT = 203, - COMPONENT_ITEMS = 204, - COND_CLAUSE = 205, - DECIMAL_FIXED_POINT_DECLARATION = 206, - DECLARE_OPT = 207, - DERIVED_RECORD_EXTENSION = 208, - DISCRETE_SUBTYPE_DEF_OPT = 209, - DISCRIMINANT_SPECIFICATIONS = 210, - DISCRIM_PART_OPT = 211, - ELSE_OPT = 212, - ELSIFS_OPT = 213, - END_ID_OPT = 214, - ENTRY_INDEX_OPT = 215, - ENUMERATION_TYPE_DECLARATION = 216, - EXCEPT_HANDLER_PART_OPT = 217, - EXTENSION_OPT = 218, - FLOATING_POINT_DECLARATION = 219, - FORMAL_DECIMAL_FIXED_POINT_DECLARATION = 220, - FORMAL_DISCRETE_TYPE_DECLARATION = 221, - FORMAL_FLOATING_POINT_DECLARATION = 222, - FORMAL_FUNCTION_DECLARATION = 223, - FORMAL_MODULAR_TYPE_DECLARATION = 224, - FORMAL_ORDINARY_DERIVED_TYPE_DECLARATION = 225, - FORMAL_ORDINARY_FIXED_POINT_DECLARATION = 226, - FORMAL_PART_OPT = 227, - FORMAL_PRIVATE_EXTENSION_DECLARATION = 228, - FORMAL_PRIVATE_TYPE_DECLARATION = 229, - FORMAL_PROCEDURE_DECLARATION = 230, - FORMAL_SIGNED_INTEGER_TYPE_DECLARATION = 231, - FUNCTION_BODY = 232, - FUNCTION_BODY_STUB = 233, - FUNCTION_DECLARATION = 234, - FUNCTION_RENAMING_DECLARATION = 235, - GENERIC_FUNCTION_DECLARATION = 236, - GENERIC_FUNCTION_INSTANTIATION = 237, - GENERIC_FUNCTION_RENAMING = 238, - GENERIC_PACKAGE_INSTANTIATION = 239, - GENERIC_PACKAGE_RENAMING = 240, - GENERIC_PROCEDURE_DECLARATION = 241, - GENERIC_PROCEDURE_INSTANTIATION = 242, - GENERIC_PROCEDURE_RENAMING = 243, - GUARD_OPT = 244, - IDENTIFIER_COLON_OPT = 245, - ID_OPT = 246, - INIT_OPT = 247, - ITERATION_SCHEME_OPT = 248, - LABEL_OPT = 249, - MARK_WITH_CONSTRAINT = 250, - MODIFIERS = 251, - MODULAR_TYPE_DECLARATION = 252, - MOD_CLAUSE_OPT = 253, - NOT_IN = 254, - ORDINARY_DERIVED_TYPE_DECLARATION = 255, - ORDINARY_FIXED_POINT_DECLARATION = 256, - OR_ELSE = 257, - OR_SELECT_OPT = 258, - PARENTHESIZED_PRIMARY = 259, - PRIVATE_DECLARATIVE_ITEMS_OPT = 260, - PRIVATE_TASK_ITEMS_OPT = 261, - PROCEDURE_BODY = 262, - PROCEDURE_BODY_STUB = 263, - PROCEDURE_DECLARATION = 264, - PROCEDURE_RENAMING_DECLARATION = 265, - PROT_MEMBER_DECLARATIONS = 266, - PROT_OP_BODIES_OPT = 267, - PROT_OP_DECLARATIONS = 268, - PROT_PRIVATE_OPT = 269, - RANGED_EXPRS = 270, - RANGE_CONSTRAINT = 271, - RECORD_TYPE_DECLARATION = 272, - SELECTOR_NAMES_OPT = 273, - SIGNED_INTEGER_TYPE_DECLARATION = 274, - TASK_ITEMS_OPT = 275, - UNARY_MINUS = 276, - UNARY_PLUS = 277, - VALUE = 278, - VALUES = 279, - VARIANTS = 280, - COMMENT_INTRO = 281, - OX = 282, - TIC_OR_CHARACTER_LITERAL = 283, - DIGIT = 284, - EXPONENT = 285, - EXTENDED_DIGIT = 286, - BASED_INTEGER = 287, - WS_ = 288, - COMMENT = 289, - NULL_TREE_LOOKAHEAD = 3 - }; -#ifdef __cplusplus -}; -#endif -#endif /*INC_AdaTokenTypes_hpp_*/ diff --git a/languages/ada/AdaTreeParserSuper.cpp b/languages/ada/AdaTreeParserSuper.cpp index be5f0623..16e95182 100644 --- a/languages/ada/AdaTreeParserSuper.cpp +++ b/languages/ada/AdaTreeParserSuper.cpp @@ -1,11 +1,11 @@ /* $ANTLR 2.7.7 (20070609): "ada.tree.g" -> "AdaTreeParserSuper.cpp"$ */ -#include "AdaTreeParserSuper.hpp" -#include -#include -#include -#include -#include -#include +#include "AdaTreeParserSuper.h" +#include +#include +#include +#include +#include +#include #line 1 "ada.tree.g" #line 11 "AdaTreeParserSuper.cpp" AdaTreeParserSuper::AdaTreeParserSuper() diff --git a/languages/ada/AdaTreeParserSuper.h b/languages/ada/AdaTreeParserSuper.h new file mode 100644 index 00000000..cb35ac25 --- /dev/null +++ b/languages/ada/AdaTreeParserSuper.h @@ -0,0 +1,241 @@ +#ifndef INC_AdaTreeParserSuper_h_ +#define INC_AdaTreeParserSuper_h_ + +#include +#include "AdaTreeParserSuperTokenTypes.h" +/* $ANTLR 2.7.7 (20070609): "ada.tree.g" -> "AdaTreeParserSuper.h"$ */ +#include + +class CUSTOM_API AdaTreeParserSuper : public ANTLR_USE_NAMESPACE(antlr)TreeParser, public AdaTreeParserSuperTokenTypes +{ +#line 1 "ada.tree.g" +#line 13 "AdaTreeParserSuper.h" +public: + AdaTreeParserSuper(); + static void initializeASTFactory( ANTLR_USE_NAMESPACE(antlr)ASTFactory& factory ); + int getNumTokens() const + { + return AdaTreeParserSuper::NUM_TOKENS; + } + const char* getTokenName( int type ) const + { + if( type > getNumTokens() ) return 0; + return AdaTreeParserSuper::tokenNames[type]; + } + const char* const* getTokenNames() const + { + return AdaTreeParserSuper::tokenNames; + } + public: void compilation_unit(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void context_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void library_item(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subunit(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void pragma(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void pragma_arg(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void expression(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void with_clause(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void use_clause(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void compound_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subtype_mark(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void attribute_id(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void modifiers(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subprog_decl_or_rename_or_inst_or_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void def_id(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void pkg_body_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void generic_inst(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void pkg_spec_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void renames(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void generic_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void id_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void def_designator(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void end_id_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subprog_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void formal_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void function_tail(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void value_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void value(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void ranged_expr_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void ranged_expr(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void simple_expression(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void range_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void range_dots(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void range_attrib_ref(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void prefix(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void parameter_specification(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void defining_identifier_list(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void init_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void definable_operator_symbol(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void parenthesized_primary(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void extension_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void spec_decl_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void basic_declarative_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void private_declarative_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void basic_decl_item(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void task_type_or_single_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void prot_type_or_single_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void decl_common(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discrim_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void task_definition_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void task_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void private_task_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discriminant_specifications(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discriminant_specification(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entrydecls_repspecs_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void rep_spec(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discrete_subtype_def_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discrete_subtype_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subtype_ind(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void align_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void comp_loc_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void local_enum_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void enumeration_aggregate(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void protected_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void prot_private_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void prot_member_decl_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void prot_op_decl_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void prot_op_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void comp_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void component_subtype_def(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void enum_id_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void range_constraint_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void array_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void access_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void id_and_discrim(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void record_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void array_type_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void enumeration_literal_specification(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void index_or_discrete_range_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void index_or_discrete_range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void constraint_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void digits_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void delta_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void index_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discriminant_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discrete_range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discriminant_association(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void selector_names_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void selector_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void component_list(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void component_items(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void variant_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discriminant_direct_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void variant_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void variant(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void choice_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void choice(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void discrete_with_range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void mark_with_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void generic_formal_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void generic_formal_parameter(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void formal_array_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void formal_access_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void id_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subprogram_default_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void formal_package_actual_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void procedure_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void function_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void body_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void declarative_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void block_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void declarative_item(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void prot_op_bodies_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void block_body_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void handled_stmt_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subprog_decl_or_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void statements(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void except_handler_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void handled_stmts_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void statement(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void def_label_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void null_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void exit_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void return_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void goto_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void delay_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void abort_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void raise_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void requeue_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void accept_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void select_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void if_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void case_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void loop_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void block(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void call_or_assignment(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void cond_clause(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void elsifs_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void else_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void condition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void alternative_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void case_statement_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void iteration_scheme_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void declare_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void label_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_body_formal_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_barrier(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_index_spec_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_call_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_index_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void triggering_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void abortable_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void selective_accept(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void entry_call_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void delay_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void stmts_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void guard_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void select_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void or_select_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void accept_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void exception_handler(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void identifier_colon_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void except_choice_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void exception_choice(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void operator_call(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void relation(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void range_or_mark(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void signed_term(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void term(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void factor(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void primary(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void name_or_qualified(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void allocator(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void subprogram_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void package_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void task_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); + public: void protected_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); +public: + ANTLR_USE_NAMESPACE(antlr)RefAST getAST() + { + return returnAST; + } + +protected: + ANTLR_USE_NAMESPACE(antlr)RefAST returnAST; + ANTLR_USE_NAMESPACE(antlr)RefAST _retTree; +private: + static const char* tokenNames[]; +#ifndef NO_STATIC_CONSTS + static const int NUM_TOKENS = 291; +#else + enum { + NUM_TOKENS = 291 + }; +#endif + + static const unsigned long _tokenSet_0_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; + static const unsigned long _tokenSet_1_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; + static const unsigned long _tokenSet_2_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; + static const unsigned long _tokenSet_3_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; + static const unsigned long _tokenSet_4_data_[]; + static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_4; +}; + +#endif /*INC_AdaTreeParserSuper_h_*/ diff --git a/languages/ada/AdaTreeParserSuper.hpp b/languages/ada/AdaTreeParserSuper.hpp deleted file mode 100644 index a4d164f0..00000000 --- a/languages/ada/AdaTreeParserSuper.hpp +++ /dev/null @@ -1,241 +0,0 @@ -#ifndef INC_AdaTreeParserSuper_hpp_ -#define INC_AdaTreeParserSuper_hpp_ - -#include -#include "AdaTreeParserSuperTokenTypes.hpp" -/* $ANTLR 2.7.7 (20070609): "ada.tree.g" -> "AdaTreeParserSuper.hpp"$ */ -#include - -class CUSTOM_API AdaTreeParserSuper : public ANTLR_USE_NAMESPACE(antlr)TreeParser, public AdaTreeParserSuperTokenTypes -{ -#line 1 "ada.tree.g" -#line 13 "AdaTreeParserSuper.hpp" -public: - AdaTreeParserSuper(); - static void initializeASTFactory( ANTLR_USE_NAMESPACE(antlr)ASTFactory& factory ); - int getNumTokens() const - { - return AdaTreeParserSuper::NUM_TOKENS; - } - const char* getTokenName( int type ) const - { - if( type > getNumTokens() ) return 0; - return AdaTreeParserSuper::tokenNames[type]; - } - const char* const* getTokenNames() const - { - return AdaTreeParserSuper::tokenNames; - } - public: void compilation_unit(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void context_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void library_item(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subunit(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void pragma(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void pragma_arg(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void expression(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void with_clause(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void use_clause(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void compound_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subtype_mark(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void attribute_id(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void modifiers(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subprog_decl_or_rename_or_inst_or_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void def_id(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void pkg_body_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void generic_inst(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void pkg_spec_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void renames(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void generic_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void id_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void def_designator(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void end_id_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subprog_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void formal_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void function_tail(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void value_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void value(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void ranged_expr_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void ranged_expr(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void simple_expression(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void range_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void range_dots(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void range_attrib_ref(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void prefix(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void parameter_specification(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void defining_identifier_list(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void init_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void definable_operator_symbol(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void parenthesized_primary(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void extension_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void spec_decl_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void basic_declarative_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void private_declarative_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void basic_decl_item(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void task_type_or_single_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void prot_type_or_single_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void decl_common(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discrim_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void task_definition_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void task_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void private_task_items_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discriminant_specifications(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discriminant_specification(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entrydecls_repspecs_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void rep_spec(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discrete_subtype_def_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discrete_subtype_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subtype_ind(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void align_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void comp_loc_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void local_enum_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void enumeration_aggregate(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void protected_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void prot_private_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void prot_member_decl_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void prot_op_decl_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void prot_op_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void comp_decl(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void component_subtype_def(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void enum_id_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void range_constraint_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void array_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void access_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void id_and_discrim(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void record_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void array_type_definition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void enumeration_literal_specification(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void index_or_discrete_range_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void index_or_discrete_range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void constraint_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void digits_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void delta_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void index_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discriminant_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discrete_range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discriminant_association(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void selector_names_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void selector_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void component_list(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void component_items(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void variant_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discriminant_direct_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void variant_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void variant(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void choice_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void choice(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void discrete_with_range(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void mark_with_constraint(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void generic_formal_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void generic_formal_parameter(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void formal_array_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void formal_access_type_declaration(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void id_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subprogram_default_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void formal_package_actual_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void procedure_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void function_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void body_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void declarative_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void block_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void declarative_item(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void prot_op_bodies_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void block_body_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void handled_stmt_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subprog_decl_or_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void statements(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void except_handler_part_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void handled_stmts_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void statement(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void def_label_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void null_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void exit_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void return_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void goto_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void delay_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void abort_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void raise_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void requeue_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void accept_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void select_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void if_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void case_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void loop_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void block(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void call_or_assignment(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void cond_clause(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void elsifs_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void else_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void condition(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void alternative_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void case_statement_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void iteration_scheme_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void declare_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void label_name(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_body_formal_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_barrier(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_index_spec_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_call_stmt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_index_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void triggering_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void abortable_part(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void selective_accept(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void entry_call_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void delay_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void stmts_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void guard_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void select_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void or_select_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void accept_alternative(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void exception_handler(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void identifier_colon_opt(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void except_choice_s(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void exception_choice(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void operator_call(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void relation(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void range_or_mark(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void signed_term(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void term(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void factor(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void primary(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void name_or_qualified(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void allocator(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void subprogram_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void package_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void task_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); - public: void protected_body(ANTLR_USE_NAMESPACE(antlr)RefAST _t); -public: - ANTLR_USE_NAMESPACE(antlr)RefAST getAST() - { - return returnAST; - } - -protected: - ANTLR_USE_NAMESPACE(antlr)RefAST returnAST; - ANTLR_USE_NAMESPACE(antlr)RefAST _retTree; -private: - static const char* tokenNames[]; -#ifndef NO_STATIC_CONSTS - static const int NUM_TOKENS = 291; -#else - enum { - NUM_TOKENS = 291 - }; -#endif - - static const unsigned long _tokenSet_0_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_0; - static const unsigned long _tokenSet_1_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_1; - static const unsigned long _tokenSet_2_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_2; - static const unsigned long _tokenSet_3_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_3; - static const unsigned long _tokenSet_4_data_[]; - static const ANTLR_USE_NAMESPACE(antlr)BitSet _tokenSet_4; -}; - -#endif /*INC_AdaTreeParserSuper_hpp_*/ diff --git a/languages/ada/AdaTreeParserSuperTokenTypes.h b/languages/ada/AdaTreeParserSuperTokenTypes.h new file mode 100644 index 00000000..f6f75893 --- /dev/null +++ b/languages/ada/AdaTreeParserSuperTokenTypes.h @@ -0,0 +1,307 @@ +#ifndef INC_AdaTreeParserSuperTokenTypes_h_ +#define INC_AdaTreeParserSuperTokenTypes_h_ + +/* $ANTLR 2.7.7 (20070609): "ada.tree.g" -> "AdaTreeParserSuperTokenTypes.h"$ */ + +#ifndef CUSTOM_API +# define CUSTOM_API +#endif + +#ifdef __cplusplus +struct CUSTOM_API AdaTreeParserSuperTokenTypes { +#endif + enum { + EOF_ = 1, + PRAGMA = 4, + IDENTIFIER = 5, + SEMI = 6, + LPAREN = 7, + COMMA = 8, + RPAREN = 9, + RIGHT_SHAFT = 10, + WITH = 11, + DOT = 12, + USE = 13, + TYPE = 14, + TIC = 15, + RANGE = 16, + DIGITS = 17, + DELTA = 18, + ACCESS = 19, + PRIVATE = 20, + PACKAGE = 21, + BODY = 22, + IS = 23, + PROCEDURE = 24, + FUNCTION = 25, + NEW = 26, + OTHERS = 27, + PIPE = 28, + DOT_DOT = 29, + ALL = 30, + COLON = 31, + IN = 32, + OUT = 33, + RENAMES = 34, + CHARACTER_LITERAL = 35, + CHAR_STRING = 36, + NuLL = 37, + RECORD = 38, + SEPARATE = 39, + ABSTRACT = 40, + RETURN = 41, + TASK = 42, + PROTECTED = 43, + BOX = 44, + ASSIGN = 45, + ENTRY = 46, + FOR = 47, + END = 48, + AT = 49, + MOD = 50, + SUBTYPE = 51, + EXCEPTION = 52, + CONSTANT = 53, + ARRAY = 54, + OF = 55, + ALIASED = 56, + CASE = 57, + WHEN = 58, + TAGGED = 59, + LIMITED = 60, + GENERIC = 61, + BEGIN = 62, + LT_LT = 63, + GT_GT = 64, + IF = 65, + THEN = 66, + ELSIF = 67, + ELSE = 68, + LOOP = 69, + WHILE = 70, + REVERSE = 71, + DECLARE = 72, + EXIT = 73, + GOTO = 74, + ACCEPT = 75, + DO = 76, + DELAY = 77, + UNTIL = 78, + SELECT = 79, + ABORT = 80, + OR = 81, + TERMINATE = 82, + RAISE = 83, + REQUEUE = 84, + AND = 85, + XOR = 86, + NOT = 87, + EQ = 88, + NE = 89, + LT_ = 90, + LE = 91, + GT = 92, + GE = 93, + PLUS = 94, + MINUS = 95, + CONCAT = 96, + STAR = 97, + DIV = 98, + REM = 99, + ABS = 100, + EXPON = 101, + NUMERIC_LIT = 102, + ABORTABLE_PART = 103, + ABORT_STATEMENT = 104, + ACCEPT_ALTERNATIVE = 105, + ACCEPT_STATEMENT = 106, + ALLOCATOR = 107, + ASSIGNMENT_STATEMENT = 108, + ASYNCHRONOUS_SELECT = 109, + ATTRIBUTE_DEFINITION_CLAUSE = 110, + AT_CLAUSE = 111, + BLOCK_STATEMENT = 112, + CASE_STATEMENT = 113, + CASE_STATEMENT_ALTERNATIVE = 114, + CODE_STATEMENT = 115, + COMPONENT_DECLARATION = 116, + CONDITIONAL_ENTRY_CALL = 117, + CONTEXT_CLAUSE = 118, + DECLARATIVE_PART = 119, + DEFINING_IDENTIFIER_LIST = 120, + DELAY_ALTERNATIVE = 121, + DELAY_STATEMENT = 122, + DELTA_CONSTRAINT = 123, + DIGITS_CONSTRAINT = 124, + DISCRIMINANT_ASSOCIATION = 125, + DISCRIMINANT_CONSTRAINT = 126, + DISCRIMINANT_SPECIFICATION = 127, + ENTRY_BODY = 128, + ENTRY_CALL_ALTERNATIVE = 129, + ENTRY_CALL_STATEMENT = 130, + ENTRY_DECLARATION = 131, + ENTRY_INDEX_SPECIFICATION = 132, + ENUMERATION_REPESENTATION_CLAUSE = 133, + EXCEPTION_DECLARATION = 134, + EXCEPTION_HANDLER = 135, + EXCEPTION_RENAMING_DECLARATION = 136, + EXIT_STATEMENT = 137, + FORMAL_PACKAGE_DECLARATION = 138, + GENERIC_FORMAL_PART = 139, + GENERIC_PACKAGE_DECLARATION = 140, + GOTO_STATEMENT = 141, + HANDLED_SEQUENCE_OF_STATEMENTS = 142, + HANDLED_STMTS_OPT = 143, + IF_STATEMENT = 144, + INCOMPLETE_TYPE_DECLARATION = 145, + INDEXED_COMPONENT = 146, + INDEX_CONSTRAINT = 147, + LIBRARY_ITEM = 148, + LOOP_STATEMENT = 149, + NAME = 150, + NULL_STATEMENT = 151, + NUMBER_DECLARATION = 152, + OBJECT_DECLARATION = 153, + OBJECT_RENAMING_DECLARATION = 154, + OPERATOR_SYMBOL = 155, + PACKAGE_BODY = 156, + PACKAGE_BODY_STUB = 157, + PACKAGE_RENAMING_DECLARATION = 158, + PACKAGE_SPECIFICATION = 159, + PARAMETER_SPECIFICATION = 160, + PRIVATE_EXTENSION_DECLARATION = 161, + PRIVATE_TYPE_DECLARATION = 162, + PROTECTED_BODY = 163, + PROTECTED_BODY_STUB = 164, + PROTECTED_TYPE_DECLARATION = 165, + RAISE_STATEMENT = 166, + RANGE_ATTRIBUTE_REFERENCE = 167, + RECORD_REPRESENTATION_CLAUSE = 168, + REQUEUE_STATEMENT = 169, + RETURN_STATEMENT = 170, + SELECTIVE_ACCEPT = 171, + SEQUENCE_OF_STATEMENTS = 172, + SINGLE_PROTECTED_DECLARATION = 173, + SINGLE_TASK_DECLARATION = 174, + STATEMENT = 175, + SUBTYPE_DECLARATION = 176, + SUBTYPE_INDICATION = 177, + SUBTYPE_MARK = 178, + SUBUNIT = 179, + TASK_BODY = 180, + TASK_BODY_STUB = 181, + TASK_TYPE_DECLARATION = 182, + TERMINATE_ALTERNATIVE = 183, + TIMED_ENTRY_CALL = 184, + TRIGGERING_ALTERNATIVE = 185, + USE_CLAUSE = 186, + USE_TYPE_CLAUSE = 187, + VARIANT = 188, + VARIANT_PART = 189, + WITH_CLAUSE = 190, + ABSTRACT_FUNCTION_DECLARATION = 191, + ABSTRACT_PROCEDURE_DECLARATION = 192, + ACCESS_TO_FUNCTION_DECLARATION = 193, + ACCESS_TO_OBJECT_DECLARATION = 194, + ACCESS_TO_PROCEDURE_DECLARATION = 195, + ARRAY_OBJECT_DECLARATION = 196, + ARRAY_TYPE_DECLARATION = 197, + AND_THEN = 198, + BASIC_DECLARATIVE_ITEMS_OPT = 199, + BLOCK_BODY = 200, + BLOCK_BODY_OPT = 201, + CALL_STATEMENT = 202, + COMPONENT_CLAUSES_OPT = 203, + COMPONENT_ITEMS = 204, + COND_CLAUSE = 205, + DECIMAL_FIXED_POINT_DECLARATION = 206, + DECLARE_OPT = 207, + DERIVED_RECORD_EXTENSION = 208, + DISCRETE_SUBTYPE_DEF_OPT = 209, + DISCRIMINANT_SPECIFICATIONS = 210, + DISCRIM_PART_OPT = 211, + ELSE_OPT = 212, + ELSIFS_OPT = 213, + END_ID_OPT = 214, + ENTRY_INDEX_OPT = 215, + ENUMERATION_TYPE_DECLARATION = 216, + EXCEPT_HANDLER_PART_OPT = 217, + EXTENSION_OPT = 218, + FLOATING_POINT_DECLARATION = 219, + FORMAL_DECIMAL_FIXED_POINT_DECLARATION = 220, + FORMAL_DISCRETE_TYPE_DECLARATION = 221, + FORMAL_FLOATING_POINT_DECLARATION = 222, + FORMAL_FUNCTION_DECLARATION = 223, + FORMAL_MODULAR_TYPE_DECLARATION = 224, + FORMAL_ORDINARY_DERIVED_TYPE_DECLARATION = 225, + FORMAL_ORDINARY_FIXED_POINT_DECLARATION = 226, + FORMAL_PART_OPT = 227, + FORMAL_PRIVATE_EXTENSION_DECLARATION = 228, + FORMAL_PRIVATE_TYPE_DECLARATION = 229, + FORMAL_PROCEDURE_DECLARATION = 230, + FORMAL_SIGNED_INTEGER_TYPE_DECLARATION = 231, + FUNCTION_BODY = 232, + FUNCTION_BODY_STUB = 233, + FUNCTION_DECLARATION = 234, + FUNCTION_RENAMING_DECLARATION = 235, + GENERIC_FUNCTION_DECLARATION = 236, + GENERIC_FUNCTION_INSTANTIATION = 237, + GENERIC_FUNCTION_RENAMING = 238, + GENERIC_PACKAGE_INSTANTIATION = 239, + GENERIC_PACKAGE_RENAMING = 240, + GENERIC_PROCEDURE_DECLARATION = 241, + GENERIC_PROCEDURE_INSTANTIATION = 242, + GENERIC_PROCEDURE_RENAMING = 243, + GUARD_OPT = 244, + IDENTIFIER_COLON_OPT = 245, + ID_OPT = 246, + INIT_OPT = 247, + ITERATION_SCHEME_OPT = 248, + LABEL_OPT = 249, + MARK_WITH_CONSTRAINT = 250, + MODIFIERS = 251, + MODULAR_TYPE_DECLARATION = 252, + MOD_CLAUSE_OPT = 253, + NOT_IN = 254, + ORDINARY_DERIVED_TYPE_DECLARATION = 255, + ORDINARY_FIXED_POINT_DECLARATION = 256, + OR_ELSE = 257, + OR_SELECT_OPT = 258, + PARENTHESIZED_PRIMARY = 259, + PRIVATE_DECLARATIVE_ITEMS_OPT = 260, + PRIVATE_TASK_ITEMS_OPT = 261, + PROCEDURE_BODY = 262, + PROCEDURE_BODY_STUB = 263, + PROCEDURE_DECLARATION = 264, + PROCEDURE_RENAMING_DECLARATION = 265, + PROT_MEMBER_DECLARATIONS = 266, + PROT_OP_BODIES_OPT = 267, + PROT_OP_DECLARATIONS = 268, + PROT_PRIVATE_OPT = 269, + RANGED_EXPRS = 270, + RANGE_CONSTRAINT = 271, + RECORD_TYPE_DECLARATION = 272, + SELECTOR_NAMES_OPT = 273, + SIGNED_INTEGER_TYPE_DECLARATION = 274, + TASK_ITEMS_OPT = 275, + UNARY_MINUS = 276, + UNARY_PLUS = 277, + VALUE = 278, + VALUES = 279, + VARIANTS = 280, + COMMENT_INTRO = 281, + OX = 282, + TIC_OR_CHARACTER_LITERAL = 283, + DIGIT = 284, + EXPONENT = 285, + EXTENDED_DIGIT = 286, + BASED_INTEGER = 287, + WS_ = 288, + COMMENT = 289, + CHARACTER_STRING = 290, + NULL_TREE_LOOKAHEAD = 3 + }; +#ifdef __cplusplus +}; +#endif +#endif /*INC_AdaTreeParserSuperTokenTypes_h_*/ diff --git a/languages/ada/AdaTreeParserSuperTokenTypes.hpp b/languages/ada/AdaTreeParserSuperTokenTypes.hpp deleted file mode 100644 index 924b7415..00000000 --- a/languages/ada/AdaTreeParserSuperTokenTypes.hpp +++ /dev/null @@ -1,307 +0,0 @@ -#ifndef INC_AdaTreeParserSuperTokenTypes_hpp_ -#define INC_AdaTreeParserSuperTokenTypes_hpp_ - -/* $ANTLR 2.7.7 (20070609): "ada.tree.g" -> "AdaTreeParserSuperTokenTypes.hpp"$ */ - -#ifndef CUSTOM_API -# define CUSTOM_API -#endif - -#ifdef __cplusplus -struct CUSTOM_API AdaTreeParserSuperTokenTypes { -#endif - enum { - EOF_ = 1, - PRAGMA = 4, - IDENTIFIER = 5, - SEMI = 6, - LPAREN = 7, - COMMA = 8, - RPAREN = 9, - RIGHT_SHAFT = 10, - WITH = 11, - DOT = 12, - USE = 13, - TYPE = 14, - TIC = 15, - RANGE = 16, - DIGITS = 17, - DELTA = 18, - ACCESS = 19, - PRIVATE = 20, - PACKAGE = 21, - BODY = 22, - IS = 23, - PROCEDURE = 24, - FUNCTION = 25, - NEW = 26, - OTHERS = 27, - PIPE = 28, - DOT_DOT = 29, - ALL = 30, - COLON = 31, - IN = 32, - OUT = 33, - RENAMES = 34, - CHARACTER_LITERAL = 35, - CHAR_STRING = 36, - NuLL = 37, - RECORD = 38, - SEPARATE = 39, - ABSTRACT = 40, - RETURN = 41, - TASK = 42, - PROTECTED = 43, - BOX = 44, - ASSIGN = 45, - ENTRY = 46, - FOR = 47, - END = 48, - AT = 49, - MOD = 50, - SUBTYPE = 51, - EXCEPTION = 52, - CONSTANT = 53, - ARRAY = 54, - OF = 55, - ALIASED = 56, - CASE = 57, - WHEN = 58, - TAGGED = 59, - LIMITED = 60, - GENERIC = 61, - BEGIN = 62, - LT_LT = 63, - GT_GT = 64, - IF = 65, - THEN = 66, - ELSIF = 67, - ELSE = 68, - LOOP = 69, - WHILE = 70, - REVERSE = 71, - DECLARE = 72, - EXIT = 73, - GOTO = 74, - ACCEPT = 75, - DO = 76, - DELAY = 77, - UNTIL = 78, - SELECT = 79, - ABORT = 80, - OR = 81, - TERMINATE = 82, - RAISE = 83, - REQUEUE = 84, - AND = 85, - XOR = 86, - NOT = 87, - EQ = 88, - NE = 89, - LT_ = 90, - LE = 91, - GT = 92, - GE = 93, - PLUS = 94, - MINUS = 95, - CONCAT = 96, - STAR = 97, - DIV = 98, - REM = 99, - ABS = 100, - EXPON = 101, - NUMERIC_LIT = 102, - ABORTABLE_PART = 103, - ABORT_STATEMENT = 104, - ACCEPT_ALTERNATIVE = 105, - ACCEPT_STATEMENT = 106, - ALLOCATOR = 107, - ASSIGNMENT_STATEMENT = 108, - ASYNCHRONOUS_SELECT = 109, - ATTRIBUTE_DEFINITION_CLAUSE = 110, - AT_CLAUSE = 111, - BLOCK_STATEMENT = 112, - CASE_STATEMENT = 113, - CASE_STATEMENT_ALTERNATIVE = 114, - CODE_STATEMENT = 115, - COMPONENT_DECLARATION = 116, - CONDITIONAL_ENTRY_CALL = 117, - CONTEXT_CLAUSE = 118, - DECLARATIVE_PART = 119, - DEFINING_IDENTIFIER_LIST = 120, - DELAY_ALTERNATIVE = 121, - DELAY_STATEMENT = 122, - DELTA_CONSTRAINT = 123, - DIGITS_CONSTRAINT = 124, - DISCRIMINANT_ASSOCIATION = 125, - DISCRIMINANT_CONSTRAINT = 126, - DISCRIMINANT_SPECIFICATION = 127, - ENTRY_BODY = 128, - ENTRY_CALL_ALTERNATIVE = 129, - ENTRY_CALL_STATEMENT = 130, - ENTRY_DECLARATION = 131, - ENTRY_INDEX_SPECIFICATION = 132, - ENUMERATION_REPESENTATION_CLAUSE = 133, - EXCEPTION_DECLARATION = 134, - EXCEPTION_HANDLER = 135, - EXCEPTION_RENAMING_DECLARATION = 136, - EXIT_STATEMENT = 137, - FORMAL_PACKAGE_DECLARATION = 138, - GENERIC_FORMAL_PART = 139, - GENERIC_PACKAGE_DECLARATION = 140, - GOTO_STATEMENT = 141, - HANDLED_SEQUENCE_OF_STATEMENTS = 142, - HANDLED_STMTS_OPT = 143, - IF_STATEMENT = 144, - INCOMPLETE_TYPE_DECLARATION = 145, - INDEXED_COMPONENT = 146, - INDEX_CONSTRAINT = 147, - LIBRARY_ITEM = 148, - LOOP_STATEMENT = 149, - NAME = 150, - NULL_STATEMENT = 151, - NUMBER_DECLARATION = 152, - OBJECT_DECLARATION = 153, - OBJECT_RENAMING_DECLARATION = 154, - OPERATOR_SYMBOL = 155, - PACKAGE_BODY = 156, - PACKAGE_BODY_STUB = 157, - PACKAGE_RENAMING_DECLARATION = 158, - PACKAGE_SPECIFICATION = 159, - PARAMETER_SPECIFICATION = 160, - PRIVATE_EXTENSION_DECLARATION = 161, - PRIVATE_TYPE_DECLARATION = 162, - PROTECTED_BODY = 163, - PROTECTED_BODY_STUB = 164, - PROTECTED_TYPE_DECLARATION = 165, - RAISE_STATEMENT = 166, - RANGE_ATTRIBUTE_REFERENCE = 167, - RECORD_REPRESENTATION_CLAUSE = 168, - REQUEUE_STATEMENT = 169, - RETURN_STATEMENT = 170, - SELECTIVE_ACCEPT = 171, - SEQUENCE_OF_STATEMENTS = 172, - SINGLE_PROTECTED_DECLARATION = 173, - SINGLE_TASK_DECLARATION = 174, - STATEMENT = 175, - SUBTYPE_DECLARATION = 176, - SUBTYPE_INDICATION = 177, - SUBTYPE_MARK = 178, - SUBUNIT = 179, - TASK_BODY = 180, - TASK_BODY_STUB = 181, - TASK_TYPE_DECLARATION = 182, - TERMINATE_ALTERNATIVE = 183, - TIMED_ENTRY_CALL = 184, - TRIGGERING_ALTERNATIVE = 185, - USE_CLAUSE = 186, - USE_TYPE_CLAUSE = 187, - VARIANT = 188, - VARIANT_PART = 189, - WITH_CLAUSE = 190, - ABSTRACT_FUNCTION_DECLARATION = 191, - ABSTRACT_PROCEDURE_DECLARATION = 192, - ACCESS_TO_FUNCTION_DECLARATION = 193, - ACCESS_TO_OBJECT_DECLARATION = 194, - ACCESS_TO_PROCEDURE_DECLARATION = 195, - ARRAY_OBJECT_DECLARATION = 196, - ARRAY_TYPE_DECLARATION = 197, - AND_THEN = 198, - BASIC_DECLARATIVE_ITEMS_OPT = 199, - BLOCK_BODY = 200, - BLOCK_BODY_OPT = 201, - CALL_STATEMENT = 202, - COMPONENT_CLAUSES_OPT = 203, - COMPONENT_ITEMS = 204, - COND_CLAUSE = 205, - DECIMAL_FIXED_POINT_DECLARATION = 206, - DECLARE_OPT = 207, - DERIVED_RECORD_EXTENSION = 208, - DISCRETE_SUBTYPE_DEF_OPT = 209, - DISCRIMINANT_SPECIFICATIONS = 210, - DISCRIM_PART_OPT = 211, - ELSE_OPT = 212, - ELSIFS_OPT = 213, - END_ID_OPT = 214, - ENTRY_INDEX_OPT = 215, - ENUMERATION_TYPE_DECLARATION = 216, - EXCEPT_HANDLER_PART_OPT = 217, - EXTENSION_OPT = 218, - FLOATING_POINT_DECLARATION = 219, - FORMAL_DECIMAL_FIXED_POINT_DECLARATION = 220, - FORMAL_DISCRETE_TYPE_DECLARATION = 221, - FORMAL_FLOATING_POINT_DECLARATION = 222, - FORMAL_FUNCTION_DECLARATION = 223, - FORMAL_MODULAR_TYPE_DECLARATION = 224, - FORMAL_ORDINARY_DERIVED_TYPE_DECLARATION = 225, - FORMAL_ORDINARY_FIXED_POINT_DECLARATION = 226, - FORMAL_PART_OPT = 227, - FORMAL_PRIVATE_EXTENSION_DECLARATION = 228, - FORMAL_PRIVATE_TYPE_DECLARATION = 229, - FORMAL_PROCEDURE_DECLARATION = 230, - FORMAL_SIGNED_INTEGER_TYPE_DECLARATION = 231, - FUNCTION_BODY = 232, - FUNCTION_BODY_STUB = 233, - FUNCTION_DECLARATION = 234, - FUNCTION_RENAMING_DECLARATION = 235, - GENERIC_FUNCTION_DECLARATION = 236, - GENERIC_FUNCTION_INSTANTIATION = 237, - GENERIC_FUNCTION_RENAMING = 238, - GENERIC_PACKAGE_INSTANTIATION = 239, - GENERIC_PACKAGE_RENAMING = 240, - GENERIC_PROCEDURE_DECLARATION = 241, - GENERIC_PROCEDURE_INSTANTIATION = 242, - GENERIC_PROCEDURE_RENAMING = 243, - GUARD_OPT = 244, - IDENTIFIER_COLON_OPT = 245, - ID_OPT = 246, - INIT_OPT = 247, - ITERATION_SCHEME_OPT = 248, - LABEL_OPT = 249, - MARK_WITH_CONSTRAINT = 250, - MODIFIERS = 251, - MODULAR_TYPE_DECLARATION = 252, - MOD_CLAUSE_OPT = 253, - NOT_IN = 254, - ORDINARY_DERIVED_TYPE_DECLARATION = 255, - ORDINARY_FIXED_POINT_DECLARATION = 256, - OR_ELSE = 257, - OR_SELECT_OPT = 258, - PARENTHESIZED_PRIMARY = 259, - PRIVATE_DECLARATIVE_ITEMS_OPT = 260, - PRIVATE_TASK_ITEMS_OPT = 261, - PROCEDURE_BODY = 262, - PROCEDURE_BODY_STUB = 263, - PROCEDURE_DECLARATION = 264, - PROCEDURE_RENAMING_DECLARATION = 265, - PROT_MEMBER_DECLARATIONS = 266, - PROT_OP_BODIES_OPT = 267, - PROT_OP_DECLARATIONS = 268, - PROT_PRIVATE_OPT = 269, - RANGED_EXPRS = 270, - RANGE_CONSTRAINT = 271, - RECORD_TYPE_DECLARATION = 272, - SELECTOR_NAMES_OPT = 273, - SIGNED_INTEGER_TYPE_DECLARATION = 274, - TASK_ITEMS_OPT = 275, - UNARY_MINUS = 276, - UNARY_PLUS = 277, - VALUE = 278, - VALUES = 279, - VARIANTS = 280, - COMMENT_INTRO = 281, - OX = 282, - TIC_OR_CHARACTER_LITERAL = 283, - DIGIT = 284, - EXPONENT = 285, - EXTENDED_DIGIT = 286, - BASED_INTEGER = 287, - WS_ = 288, - COMMENT = 289, - CHARACTER_STRING = 290, - NULL_TREE_LOOKAHEAD = 3 - }; -#ifdef __cplusplus -}; -#endif -#endif /*INC_AdaTreeParserSuperTokenTypes_hpp_*/ diff --git a/languages/ada/Makefile.am b/languages/ada/Makefile.am index d45a2add..26fe8c2c 100644 --- a/languages/ada/Makefile.am +++ b/languages/ada/Makefile.am @@ -20,13 +20,13 @@ EXTRA_DIST = ada.g ada.tree.g ada.store.g ## The following three rules assume that you have Java installed, ## ANTLR installed, and you have the antlr jar in your CLASSPATH. -#AdaLexer.hpp AdaLexer.cpp AdaParser.hpp AdaParser.cpp: ada.g +#AdaLexer.h AdaLexer.cpp AdaParser.h AdaParser.cpp: ada.g # antlr ada.g -#AdaTreeParserSuper.hpp AdaTreeParserSuper.cpp: ada.tree.g +#AdaTreeParserSuper.h AdaTreeParserSuper.cpp: ada.tree.g # antlr ada.tree.g -#AdaStoreWalker.hpp AdaStoreWalker.cpp: ada.store.g +#AdaStoreWalker.h AdaStoreWalker.cpp: ada.store.g # antlr -glib ada.tree.g ada.store.g genparser: diff --git a/languages/ada/README.dox b/languages/ada/README.dox index e71e6d45..017b3aed 100644 --- a/languages/ada/README.dox +++ b/languages/ada/README.dox @@ -2,10 +2,10 @@ Ada Language Support The ANTLR Ada core support files are: - - ada.g -- contains AdaLexer and AdaParser, requires AdaAST.hpp and adasupport.cpp + - ada.g -- contains AdaLexer and AdaParser, requires AdaAST.h and adasupport.cpp - ada.tree.g -- contains the AdaTreeParserSuper - - AdaAST.hpp -- definition of the AST node used by ada.g - - adasupport.hpp -- general purpose utilities + - AdaAST.h -- definition of the AST node used by ada.g + - adasupport.h -- general purpose utilities - adasupport.cpp -- implementation of general purpose utilities and implementation of AdaParser class methods from ada.g These are ANTLR master files. diff --git a/languages/ada/ada.g b/languages/ada/ada.g index 5f97952b..164c2187 100644 --- a/languages/ada/ada.g +++ b/languages/ada/ada.g @@ -27,8 +27,8 @@ header "pre_include_hpp" { -#include // antlr wants this -#include "AdaAST.hpp" +#include // antlr wants this +#include "AdaAST.h" #include "preambles.h" } diff --git a/languages/ada/ada.store.g b/languages/ada/ada.store.g index 31dccf99..658bfcfa 100644 --- a/languages/ada/ada.store.g +++ b/languages/ada/ada.store.g @@ -9,8 +9,8 @@ header "pre_include_hpp" { #include #include -#include "AdaAST.hpp" -#include "ada_utils.hpp" +#include "AdaAST.h" +#include "ada_utils.h" } header "post_include_hpp" { diff --git a/languages/ada/ada_utils.cpp b/languages/ada/ada_utils.cpp index d7b8bbf7..e12306ea 100644 --- a/languages/ada/ada_utils.cpp +++ b/languages/ada/ada_utils.cpp @@ -11,8 +11,8 @@ #include -#include "ada_utils.hpp" -#include "adasupport.hpp" +#include "ada_utils.h" +#include "adasupport.h" TQString qtext (const RefAdaAST& n) { diff --git a/languages/ada/ada_utils.h b/languages/ada/ada_utils.h new file mode 100644 index 00000000..ae4f9011 --- /dev/null +++ b/languages/ada/ada_utils.h @@ -0,0 +1,15 @@ +/* + */ +#ifndef ADA_UTILS_H +#define ADA_UTILS_H + +#include +#include "AdaAST.h" + +TQString qtext (const RefAdaAST& n); +TQStringList qnamelist (const RefAdaAST& n); +TQString ada_spec_filename (const TQString& comp_unit_name); +TQString fq_specfilename (const TQString& comp_unit_name); + +#endif + diff --git a/languages/ada/ada_utils.hpp b/languages/ada/ada_utils.hpp deleted file mode 100644 index 25c9fabd..00000000 --- a/languages/ada/ada_utils.hpp +++ /dev/null @@ -1,15 +0,0 @@ -/* - */ -#ifndef ADA_UTILS_H -#define ADA_UTILS_H - -#include -#include "AdaAST.hpp" - -TQString qtext (const RefAdaAST& n); -TQStringList qnamelist (const RefAdaAST& n); -TQString ada_spec_filename (const TQString& comp_unit_name); -TQString fq_specfilename (const TQString& comp_unit_name); - -#endif - diff --git a/languages/ada/adasupport.cpp b/languages/ada/adasupport.cpp index 6b877b7b..69baa66d 100644 --- a/languages/ada/adasupport.cpp +++ b/languages/ada/adasupport.cpp @@ -4,10 +4,10 @@ #include #include #include -#include -#include "AdaParser.hpp" -#include "AdaTokenTypes.hpp" -#include "adasupport.hpp" +#include +#include "AdaParser.h" +#include "AdaTokenTypes.h" +#include "adasupport.h" #define eq !strcmp diff --git a/languages/ada/adasupport.h b/languages/ada/adasupport.h new file mode 100644 index 00000000..f6bfddee --- /dev/null +++ b/languages/ada/adasupport.h @@ -0,0 +1,13 @@ +/* + */ +#ifndef ADASUPPORT_H +#define ADASUPPORT_H + +#include +#include "AdaAST.h" + +std::string text (const RefAdaAST& n); +int txteq (RefAdaAST n1, RefAdaAST n2); + +#endif + diff --git a/languages/ada/adasupport.hpp b/languages/ada/adasupport.hpp deleted file mode 100644 index 9d65e0e5..00000000 --- a/languages/ada/adasupport.hpp +++ /dev/null @@ -1,13 +0,0 @@ -/* - */ -#ifndef ADASUPPORT_H -#define ADASUPPORT_H - -#include -#include "AdaAST.hpp" - -std::string text (const RefAdaAST& n); -int txteq (RefAdaAST n1, RefAdaAST n2); - -#endif - diff --git a/languages/ada/adasupportpart.cpp b/languages/ada/adasupportpart.cpp index e08ef9a3..0d87f0a7 100644 --- a/languages/ada/adasupportpart.cpp +++ b/languages/ada/adasupportpart.cpp @@ -28,10 +28,10 @@ #include "problemreporter.h" #include "backgroundparser.h" -#include "AdaLexer.hpp" -#include "AdaParser.hpp" -#include "AdaStoreWalker.hpp" -#include "AdaAST.hpp" +#include "AdaLexer.h" +#include "AdaParser.h" +#include "AdaStoreWalker.h" +#include "AdaAST.h" #include diff --git a/languages/ada/backgroundparser.cpp b/languages/ada/backgroundparser.cpp index 68607851..4b77abcd 100644 --- a/languages/ada/backgroundparser.cpp +++ b/languages/ada/backgroundparser.cpp @@ -11,9 +11,9 @@ #include "backgroundparser.h" #include "problemreporter.h" -#include "AdaLexer.hpp" -#include "AdaParser.hpp" -#include "AdaAST.hpp" +#include "AdaLexer.h" +#include "AdaParser.h" +#include "AdaAST.h" #include #include -- cgit v1.2.3