check-stop.h
920 Bytes
//===-- lib/Semantics/check-stop.h ------------------------------*- C++ -*-===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#ifndef FORTRAN_SEMANTICS_CHECK_STOP_H_
#define FORTRAN_SEMANTICS_CHECK_STOP_H_
#include "flang/Semantics/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_