Mercurial > hg > CbC > CbC_llvm
comparison flang/runtime/magic-numbers.h @ 173:0572611fdcc8 llvm10 llvm12
reorgnization done
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 25 May 2020 11:55:54 +0900 |
parents | |
children | 2e18cbf3894f |
comparison
equal
deleted
inserted
replaced
172:9fbae9c8bf63 | 173:0572611fdcc8 |
---|---|
1 #if 0 /*===-- runtime/magic-numbers.h -----------------------------------===*/ | |
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 #endif | |
9 #if 0 | |
10 This header can be included into both Fortran and C. | |
11 | |
12 This file defines various code values that need to be exported | |
13 to predefined Fortran standard modules as well as to C/C++ | |
14 code in the compiler and runtime library. | |
15 These include: | |
16 - the error/end code values that can be returned | |
17 to an IOSTAT= or STAT= specifier on a Fortran I/O statement | |
18 or coindexed data reference (see Fortran 2018 12.11.5, | |
19 16.10.2, and 16.10.2.33) | |
20 Codes from <errno.h>, e.g. ENOENT, are assumed to be positive | |
21 and are used "raw" as IOSTAT values. | |
22 #endif | |
23 #ifndef FORTRAN_RUNTIME_MAGIC_NUMBERS_H_ | |
24 #define FORTRAN_RUNTIME_MAGIC_NUMBERS_H_ | |
25 | |
26 #define FORTRAN_RUNTIME_IOSTAT_END (-1) | |
27 #define FORTRAN_RUNTIME_IOSTAT_EOR (-2) | |
28 #define FORTRAN_RUNTIME_IOSTAT_FLUSH (-3) | |
29 #define FORTRAN_RUNTIME_IOSTAT_INQUIRE_INTERNAL_UNIT 256 | |
30 | |
31 #define FORTRAN_RUNTIME_STAT_FAILED_IMAGE 10 | |
32 #define FORTRAN_RUNTIME_STAT_LOCKED 11 | |
33 #define FORTRAN_RUNTIME_STAT_LOCKED_OTHER_IMAGE 12 | |
34 #define FORTRAN_RUNTIME_STAT_STOPPED_IMAGE 13 | |
35 #define FORTRAN_RUNTIME_STAT_UNLOCKED 14 | |
36 #define FORTRAN_RUNTIME_STAT_UNLOCKED_FAILED_IMAGE 15 | |
37 #endif |