// Copyright (c) 2019, Arm Ltd. All rights reserved. // // Licensed under the Apache License, Version 2.0 (the "License"); // you may not use this file except in compliance with the License. // You may obtain a copy of the License at // // http://www.apache.org/licenses/LICENSE-2.0 // // Unless required by applicable law or agreed to in writing, software // distributed under the License is distributed on an "AS IS" BASIS, // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. // See the License for the specific language governing permissions and // limitations under the License. #ifndef FORTRAN_SEMANTICS_CHECK_STOP_H_ #define FORTRAN_SEMANTICS_CHECK_STOP_H_ #include "semantics.h" namespace Fortran::parser { struct StopStmt; } namespace Fortran::semantics { // Semantic analysis of STOP and ERROR STOP statements. class StopChecker : public virtual BaseChecker { public: explicit StopChecker(SemanticsContext &context) : context_{context} {}; void Enter(const parser::StopStmt &); private: SemanticsContext &context_; }; } // namespace Fortran::semantics #endif // FORTRAN_SEMANTICS_CHECK_STOP_H_