[flang] Accept polymorphic component element in storage_size
[llvm-project.git] / libc / src / stdio / funlockfile.cpp
blob6c7dbee303cbb387cee6bc808c584d4d795b6876
1 //===-- Implementation of funlockfile -------------------------------------===//
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 "src/stdio/funlockfile.h"
10 #include "src/__support/File/file.h"
12 #include <stdio.h>
14 namespace __llvm_libc {
16 LLVM_LIBC_FUNCTION(void, funlockfile, (::FILE * stream)) {
17 reinterpret_cast<__llvm_libc::File *>(stream)->unlock();
20 } // namespace __llvm_libc