3b63571425
Scan FORMAT strings locally to avoid C++ binary runtime dependence when computing deepest parenthesis nesting
Remove a dependency on ostream from runtime
Remove remaining direct external references from runtime to C++ library binaries
Remove runtime dependences on lib/common
SetPos() and SetRec()
Instantiate templates for input
Begin input; rearrange locking, deal with CLOSE races
View()
Update error message in test to agree with compiler change
First cut at real input
More robust I/O runtime error handling
Debugging of REAL input
Add iostat.{h,cpp}
Rename runtime/numeric-* to runtime/edit-*
Move templates around, templatize integer output editing
Move LOGICAL and CHARACTER output from io-api.cpp to edit-output.cpp
Change pointer argument to reference
More list-directed input
Complex list-directed input
Use enum class Direction rather than bool for templates
Catch up with changes to master
Undo reformatting of Lower code
Use record number instead of subscripts for internal unit
Unformatted sequential backspace
Testing and debugging
Dodge bogus GCC warning
Add <cstddef> for std::size_t to fix CI build
Address review comments
Original-commit: flang-compiler/f18@50406b3496
Reviewed-on: https://github.com/flang-compiler/f18/pull/1053
38 lines
1.4 KiB
C
38 lines
1.4 KiB
C
#if 0 /*===-- runtime/magic-numbers.h -----------------------------------===*/
|
|
/*
|
|
* Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
|
|
* See https://llvm.org/LICENSE.txt for license information.
|
|
* SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
|
|
*
|
|
*===--------------------------------------------------------------------===*/
|
|
#endif
|
|
#if 0
|
|
This header can be included into both Fortran and C.
|
|
|
|
This file defines various code values that need to be exported
|
|
to predefined Fortran standard modules as well as to C/C++
|
|
code in the compiler and runtime library.
|
|
These include:
|
|
- the error/end code values that can be returned
|
|
to an IOSTAT= or STAT= specifier on a Fortran I/O statement
|
|
or coindexed data reference (see Fortran 2018 12.11.5,
|
|
16.10.2, and 16.10.2.33)
|
|
Codes from <errno.h>, e.g. ENOENT, are assumed to be positive
|
|
and are used "raw" as IOSTAT values.
|
|
#endif
|
|
#ifndef FORTRAN_RUNTIME_MAGIC_NUMBERS_H_
|
|
#define FORTRAN_RUNTIME_MAGIC_NUMBERS_H_
|
|
|
|
#define FORTRAN_RUNTIME_IOSTAT_END (-1)
|
|
#define FORTRAN_RUNTIME_IOSTAT_EOR (-2)
|
|
#define FORTRAN_RUNTIME_IOSTAT_FLUSH (-3)
|
|
#define FORTRAN_RUNTIME_IOSTAT_INQUIRE_INTERNAL_UNIT 256
|
|
|
|
#define FORTRAN_RUNTIME_STAT_FAILED_IMAGE 10
|
|
#define FORTRAN_RUNTIME_STAT_LOCKED 11
|
|
#define FORTRAN_RUNTIME_STAT_LOCKED_OTHER_IMAGE 12
|
|
#define FORTRAN_RUNTIME_STAT_STOPPED_IMAGE 13
|
|
#define FORTRAN_RUNTIME_STAT_UNLOCKED 14
|
|
#define FORTRAN_RUNTIME_STAT_UNLOCKED_FAILED_IMAGE 15
|
|
#endif
|