1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
/*
Copyright (C) 2010-2012, 2016 Free Software Foundation, Inc.
Written by Roger While
This file is part of GnuCOBOL.
The GnuCOBOL compiler is free software: you can redistribute it
and/or modify it under the terms of the GNU General Public License
as published by the Free Software Foundation, either version 3 of the
License, or (at your option) any later version.
GnuCOBOL is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GnuCOBOL. If not, see <https://www.gnu.org/licenses/>.
*/
/* CB_PARSE_DEF (name, return value if true) */
CB_PARSE_DEF ("OPENCOBOL", 1U)
CB_PARSE_DEF ("GNUCOBOL", 1U)
#ifdef COB_64_BIT_POINTER
CB_PARSE_DEF ("P64", 1U)
#else
CB_PARSE_DEF ("P64", 0U)
#endif
CB_PARSE_DEF ("EXECUTABLE", cb_flag_main != 0)
CB_PARSE_DEF ("MODULE", cb_flag_main == 0)
CB_PARSE_DEF ("TRUNC", cb_binary_truncate != 0)
CB_PARSE_DEF ("NOTRUNC", cb_binary_truncate == 0)
CB_PARSE_DEF ("DEBUG", cobc_wants_debug != 0)
CB_PARSE_DEF ("STICKY-LINKAGE", cb_sticky_linkage != 0)
CB_PARSE_DEF ("NOSTICKY-LINKAGE", cb_sticky_linkage == 0)
CB_PARSE_DEF ("HOSTSIGNS", cb_host_sign != 0)
CB_PARSE_DEF ("NOHOSTSIGNS", cb_host_sign == 0)
CB_PARSE_DEF ("IBMCOMP", cb_binary_size == CB_BINARY_SIZE_2_4_8)
CB_PARSE_DEF ("OCCOMP", cb_binary_size == CB_BINARY_SIZE_1_2_4_8)
CB_PARSE_DEF ("GCCOMP", cb_binary_size == CB_BINARY_SIZE_1_2_4_8)
CB_PARSE_DEF ("NOIBMCOMP", cb_binary_size != CB_BINARY_SIZE_2_4_8)
|
