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