1//===-- Implementation of fclose ------------------------------------------===//
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 "src/stdio/fclose.h"
10#include "src/__support/File/file.h"
11
12#include "src/errno/libc_errno.h"
13#include <stdio.h>
14
15namespace LIBC_NAMESPACE {
16
17LLVM_LIBC_FUNCTION(int, fclose, (::FILE * stream)) {
18 int result = reinterpret_cast<LIBC_NAMESPACE::File *>(stream)->close();
19 if (result != 0) {
20 libc_errno = result;
21 return EOF;
22 }
23 return 0;
24}
25
26} // namespace LIBC_NAMESPACE
27

source code of libc/src/stdio/generic/fclose.cpp