comparison flang/lib/Semantics/check-data.h @ 236:c4bab56944e8 llvm-original

LLVM 16
author kono
date Wed, 09 Nov 2022 17:45:10 +0900
parents 79ff65ed7e25
children
comparison
equal deleted inserted replaced
232:70dce7da266c 236:c4bab56944e8
35 void Leave(const parser::DataStmtObject &); 35 void Leave(const parser::DataStmtObject &);
36 void Leave(const parser::DataIDoObject &); 36 void Leave(const parser::DataIDoObject &);
37 void Enter(const parser::DataImpliedDo &); 37 void Enter(const parser::DataImpliedDo &);
38 void Leave(const parser::DataImpliedDo &); 38 void Leave(const parser::DataImpliedDo &);
39 void Leave(const parser::DataStmtSet &); 39 void Leave(const parser::DataStmtSet &);
40 // These cases are for legacy DATA-like /initializations/
41 void Leave(const parser::ComponentDecl &);
42 void Leave(const parser::EntityDecl &);
40 43
41 // After all DATA statements have been processed, converts their 44 // After all DATA statements have been processed, converts their
42 // initializations into per-symbol static initializers. 45 // initializations into per-symbol static initializers.
43 void CompileDataInitializationsIntoInitializers(); 46 void CompileDataInitializationsIntoInitializers();
44 47
45 private: 48 private:
46 ConstantSubscript GetRepetitionCount(const parser::DataStmtRepeat &); 49 ConstantSubscript GetRepetitionCount(const parser::DataStmtRepeat &);
47 template <typename T> void CheckIfConstantSubscript(const T &); 50 template <typename T> void CheckIfConstantSubscript(const T &);
48 void CheckSubscript(const parser::SectionSubscript &); 51 void CheckSubscript(const parser::SectionSubscript &);
49 bool CheckAllSubscriptsInDataRef(const parser::DataRef &, parser::CharBlock); 52 bool CheckAllSubscriptsInDataRef(const parser::DataRef &, parser::CharBlock);
53 template <typename A> void LegacyDataInit(const A &);
50 54
51 DataInitializations inits_; 55 DataInitializations inits_;
52 evaluate::ExpressionAnalyzer exprAnalyzer_; 56 evaluate::ExpressionAnalyzer exprAnalyzer_;
53 bool currentSetHasFatalErrors_{false}; 57 bool currentSetHasFatalErrors_{false};
54 }; 58 };