1 //===-- lib/Semantics/resolve-labels.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_RESOLVE_LABELS_H_ 10 #define FORTRAN_SEMANTICS_RESOLVE_LABELS_H_ 11 12 namespace Fortran::parser { 13 struct Program; 14 } 15 16 namespace Fortran::semantics { 17 class SemanticsContext; 18 19 /// \brief Validate the labels in the program 20 /// \param context semantic context for errors 21 /// \param program the parse tree of the program 22 /// \return true, iff the program's labels pass semantics checks 23 bool ValidateLabels(SemanticsContext &context, const parser::Program &program); 24 } // namespace Fortran::semantics 25 #endif // FORTRAN_SEMANTICS_RESOLVE_LABELS_H_ 26