1 //===- FrontendOptions.cpp ------------------------------------------------===//
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 #include "flang/Frontend/FrontendOptions.h"
10 #include "flang/FrontendTool/Utils.h"
11 
12 using namespace Fortran::frontend;
13 
14 InputKind FrontendOptions::GetInputKindForExtension(llvm::StringRef extension) {
15   if (isFixedFormSuffix(extension) || isFreeFormSuffix(extension)) {
16     return Language::Fortran;
17   }
18   return Language::Unknown;
19 }
20