[flang] Accept polymorphic component element in storage_size
[llvm-project.git] / libc / src / dirent / readdir.cpp
blobb9ce30140ee0e91d378d61a59f0aa260c0aa0611
1 //===-- Implementation of readdir -----------------------------------------===//
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 //===----------------------------------------------------------------------===//
9 #include "readdir.h"
11 #include "src/__support/File/dir.h"
12 #include "src/__support/common.h"
14 #include <dirent.h>
15 #include <errno.h>
17 namespace __llvm_libc {
19 LLVM_LIBC_FUNCTION(struct ::dirent *, readdir, (::DIR * dir)) {
20 auto *d = reinterpret_cast<__llvm_libc::Dir *>(dir);
21 auto dirent_val = d->read();
22 if (!dirent_val) {
23 errno = dirent_val.error();
24 return nullptr;
26 return dirent_val;
29 } // namespace __llvm_libc