1//===-- runtime/support.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/Runtime/support.h"
10#include "flang/Runtime/descriptor.h"
11
12namespace Fortran::runtime {
13extern "C" {
14RT_EXT_API_GROUP_BEGIN
15
16bool RTDEF(IsContiguous)(const Descriptor &descriptor) {
17 return descriptor.IsContiguous();
18}
19
20RT_EXT_API_GROUP_END
21} // extern "C"
22} // namespace Fortran::runtime
23

source code of flang/runtime/support.cpp