1 //===-- lib/Semantics/check-deallocate.h ------------------------*- C++ -*-===// 2 // 3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 4 // See https://llvm.org/LICENSE.txt for license information. 5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 6 // 7 //===----------------------------------------------------------------------===// 8 9 #ifndef FORTRAN_SEMANTICS_CHECK_DEALLOCATE_H_ 10 #define FORTRAN_SEMANTICS_CHECK_DEALLOCATE_H_ 11 12 #include "flang/Semantics/semantics.h" 13 14 namespace Fortran::parser { 15 struct DeallocateStmt; 16 } 17 18 namespace Fortran::semantics { 19 class DeallocateChecker : public virtual BaseChecker { 20 public: DeallocateChecker(SemanticsContext & context)21 DeallocateChecker(SemanticsContext &context) : context_{context} {} 22 void Leave(const parser::DeallocateStmt &); 23 24 private: 25 SemanticsContext &context_; 26 }; 27 } // namespace Fortran::semantics 28 #endif // FORTRAN_SEMANTICS_CHECK_DEALLOCATE_H_ 29