1 /*
2  * Copyright (c) 1995-2019, NVIDIA CORPORATION.  All rights reserved.
3  *
4  * Licensed under the Apache License, Version 2.0 (the "License");
5  * you may not use this file except in compliance with the License.
6  * You may obtain a copy of the License at
7  *
8  *     http://www.apache.org/licenses/LICENSE-2.0
9  *
10  * Unless required by applicable law or agreed to in writing, software
11  * distributed under the License is distributed on an "AS IS" BASIS,
12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13  * See the License for the specific language governing permissions and
14  * limitations under the License.
15  *
16  */
17 
18 /** \file
19  * \brief Definitions for FORTRAN edit descriptor symbolics
20  *
21  * If contents are changed, changes must also be applied to the run-time
22  * document file (fio.n) and this file must copied to the io source rte
23  * directory.
24  */
25 
26 #define FED_END -1
27 #define FED_LPAREN -2
28 #define FED_RPAREN -3
29 #define FED_P -4
30 #define FED_STR -5
31 #define FED_T -6
32 #define FED_TL -7
33 #define FED_TR -8
34 #define FED_X -9
35 #define FED_S -10
36 #define FED_SP -11
37 #define FED_SS -12
38 #define FED_BN -13
39 #define FED_BZ -14
40 #define FED_SLASH -15
41 #define FED_COLON -16
42 #define FED_Q -17
43 #define FED_DOLLAR -18
44 #define FED_Aw -19
45 #define FED_Lw -20
46 #define FED_Iw_m -21
47 #define FED_Fw_d -22
48 #define FED_Ee -23
49 #define FED_Ew_d -24
50 #define FED_ENw_d -25
51 #define FED_ESw_d -26
52 #define FED_Gw_d -27
53 #define FED_Dw_d -28
54 #define FED_Ow_m -29
55 #define FED_Zw_m -30
56 #define FED_A -31
57 #define FED_L -32
58 #define FED_I -33
59 #define FED_F -34
60 #define FED_E -35
61 #define FED_G -36
62 #define FED_D -37
63 #define FED_O -38
64 #define FED_Z -39
65 #define FED_KANJI_STRING -40
66 #define FED_Nw -41
67 #define FED_N -42
68 #define FED_Bw_m -43
69 #define FED_ERROR -44
70 #define FED_DC -45
71 #define FED_DP -46
72 #define FED_RU -47
73 #define FED_RD -48
74 #define FED_RZ -49
75 #define FED_RN -50
76 #define FED_RC -51
77 #define FED_RP -52
78 #define FED_DT -53
79 #define FED_G0 -54
80 #define FED_G0_d -55
81 
82 void I8(get_vlist_desc)(F90_Desc *sd, __INT_T ubnd);
83