IODA Bundle
CMakeFortranCompilerId.F
Go to the documentation of this file.
1  PROGRAM cmakefortrancompilerid
2 #if 0
3 ! Identify the compiler
4 #endif
5 #if defined(_MSC_VER)
6  print *, 'INFO:simulate[MSVC]'
7 # if _MSC_VER >= 1900
8  print *, 'INFO:simulate_version[019.00]'
9 # elif _MSC_VER >= 1800
10  print *, 'INFO:simulate_version[018.00]'
11 # elif _MSC_VER >= 1700
12  print *, 'INFO:simulate_version[017.00]'
13 # elif _MSC_VER >= 1600
14  print *, 'INFO:simulate_version[016.00]'
15 # elif _MSC_VER >= 1500
16  print *, 'INFO:simulate_version[015.00]'
17 # elif _MSC_VER >= 1400
18  print *, 'INFO:simulate_version[014.00]'
19 # elif _MSC_VER >= 1310
20  print *, 'INFO:simulate_version[013.01]'
21 # else
22  print *, 'INFO:simulate_version[013.00]'
23 # endif
24 #endif
25 #if defined(__INTEL_LLVM_COMPILER)
26  print *, 'INFO:compiler[IntelLLVM]'
27 ! __INTEL_LLVM_COMPILER = VVVVRP prior to 2021.2.0, VVVVRRPP for 2021.2.0 and
28 ! later. Look for 6 digit vs. 8 digit version number to decide encoding.
29 ! VVVV is no smaller than the current year when a version is released.
30 # if __INTEL_LLVM_COMPILER < 1000000
31 # define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/100)
32 # define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/10 % 10)
33 # define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER % 10)
34 # else
35 # define COMPILER_VERSION_MAJOR DEC(__INTEL_LLVM_COMPILER/10000)
36 # define COMPILER_VERSION_MINOR DEC(__INTEL_LLVM_COMPILER/100 % 100)
37 # define COMPILER_VERSION_PATCH DEC(__INTEL_LLVM_COMPILER % 100)
38 # endif
39 #elif defined(__INTEL_COMPILER) && __INTEL_COMPILER == 201900
40  print *, 'INFO:compiler[IntelLLVM]'
41 ! ifx 2021.1 forgot to define __INTEL_LLVM_COMPILER.
42 ! Instead it defines __INTEL_COMPILER == 201900.
43 # define COMPILER_VERSION_MAJOR DEC(2021)
44 # define COMPILER_VERSION_MINOR DEC(1)
45 # define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER_UPDATE)
46 # define COMPILER_VERSION_TWEAK DEC(__INTEL_COMPILER_BUILD_DATE)
47 #elif defined(__INTEL_COMPILER) || defined(__ICC)
48  print *, 'INFO:compiler[Intel]'
49 ! __INTEL_COMPILER = VRP prior to 2021, and then VVVV for 2021 and later.
50 # if __INTEL_COMPILER < 2021
51 # define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER/100)
52 # define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER/10 % 10)
53 # if defined(__INTEL_COMPILER_UPDATE)
54 # define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER_UPDATE)
55 # else
56 # define COMPILER_VERSION_PATCH DEC(__INTEL_COMPILER % 10)
57 # endif
58 # else
59 # define COMPILER_VERSION_MAJOR DEC(__INTEL_COMPILER)
60 # define COMPILER_VERSION_MINOR DEC(__INTEL_COMPILER_UPDATE)
61 ! The third version component from --version is an update index,
62 ! but no macro is provided for it.
63 # define COMPILER_VERSION_PATCH DEC(0)
64 # endif
65 # if defined(__INTEL_COMPILER_BUILD_DATE)
66 # define COMPILER_VERSION_TWEAK DEC(__INTEL_COMPILER_BUILD_DATE)
67 # endif
68 #elif defined(__SUNPRO_F95)
69  print *, 'INFO:compiler[SunPro]'
70 # define COMPILER_VERSION_MAJOR HEX(__SUNPRO_F95>>8)
71 # define COMPILER_VERSION_MINOR HEX(__SUNPRO_F95>>4 & 0xF)
72 # define COMPILER_VERSION_PATCH HEX(__SUNPRO_F95 & 0xF)
73 #elif defined(__SUNPRO_F90)
74  print *, 'INFO:compiler[SunPro]'
75 # define COMPILER_VERSION_MAJOR HEX(__SUNPRO_F90>>8)
76 # define COMPILER_VERSION_MINOR HEX(__SUNPRO_F90>>4 & 0xF)
77 # define COMPILER_VERSION_PATCH HEX(__SUNPRO_F90 & 0xF)
78 #elif defined(_CRAYFTN)
79  print *, 'INFO:compiler[Cray]'
80 # define COMPILER_VERSION_MAJOR DEC(_RELEASE_MAJOR)
81 # define COMPILER_VERSION_MINOR DEC(_RELEASE_MINOR)
82 # if defined(_RELEASE_PATCHLEVEL)
83 # define COMPILER_VERSION_PATCH DEC(_RELEASE_PATCHLEVEL)
84 # endif
85 #elif defined(__G95__)
86  print *, 'INFO:compiler[G95]'
87 # define COMPILER_VERSION_MAJOR DEC(__G95__)
88 # define COMPILER_VERSION_MINOR DEC(__G95_MINOR__)
89 #elif defined(__PATHSCALE__)
90  print *, 'INFO:compiler[PathScale]'
91 # define COMPILER_VERSION_MAJOR DEC(__PATHCC__)
92 # define COMPILER_VERSION_MINOR DEC(__PATHCC_MINOR__)
93 # if defined(__PATHCC_PATCHLEVEL__)
94 # define COMPILER_VERSION_PATCH DEC(__PATHCC_PATCHLEVEL__)
95 # endif
96 #elif defined(__ABSOFT__)
97  print *, 'INFO:compiler[Absoft]'
98 #elif defined(__GNUC__)
99  print *, 'INFO:compiler[GNU]'
100 # define COMPILER_VERSION_MAJOR DEC(__GNUC__)
101 # define COMPILER_VERSION_MINOR DEC(__GNUC_MINOR__)
102 # if defined(__GNUC_PATCHLEVEL__)
103 # define COMPILER_VERSION_PATCH DEC(__GNUC_PATCHLEVEL__)
104 # endif
105 #elif defined(__IBMC__)
106 # if defined(__COMPILER_VER__)
107  print *, 'INFO:compiler[zOS]'
108 # elif __IBMC__ >= 800
109  print *, 'INFO:compiler[XL]'
110 # define COMPILER_VERSION_MAJOR DEC(__IBMC__/100)
111 # define COMPILER_VERSION_MINOR DEC(__IBMC__/10 % 10)
112 # define COMPILER_VERSION_PATCH DEC(__IBMC__ % 10)
113 # else
114  print *, 'INFO:compiler[VisualAge]'
115 # define COMPILER_VERSION_MAJOR DEC(__IBMC__/100)
116 # define COMPILER_VERSION_MINOR DEC(__IBMC__/10 % 10)
117 # define COMPILER_VERSION_PATCH DEC(__IBMC__ % 10)
118 # endif
119 #elif defined(__NVCOMPILER) || defined(__NVCOMPILER_LLVM__)
120  print *, 'INFO:compiler[NVHPC]'
121 # if defined(__NVCOMPILER_MAJOR__)
122 # define COMPILER_VERSION_MAJOR DEC(__NVCOMPILER_MAJOR__)
123 # else
124 # define COMPILER_VERSION_MAJOR DEC(__PGIC__)
125 # endif
126 # if defined(__NVCOMPILER_MINOR__)
127 # define COMPILER_VERSION_MINOR DEC(__NVCOMPILER_MINOR__)
128 # else
129 # define COMPILER_VERSION_MINOR DEC(__PGIC_MINOR__)
130 # endif
131 # if defined(__NVCOMPILER_PATCHLEVEL__)
132 # define COMPILER_VERSION_PATCH DEC(__NVCOMPILER_PATCHLEVEL__)
133 # elif defined(__PGIC_PATCHLEVEL__)
134 # define COMPILER_VERSION_PATCH DEC(__PGIC_PATCHLEVEL__)
135 # endif
136 #elif defined(__PGI)
137  print *, 'INFO:compiler[PGI]'
138 # define COMPILER_VERSION_MAJOR DEC(__PGIC__)
139 # define COMPILER_VERSION_MINOR DEC(__PGIC_MINOR__)
140 # if defined(__PGIC_PATCHLEVEL__)
141 # define COMPILER_VERSION_PATCH DEC(__PGIC_PATCHLEVEL__)
142 # endif
143 #elif defined(__FLANG)
144  print *, 'INFO:compiler[Flang]'
145 # define COMPILER_VERSION_MAJOR DEC(__FLANG_MAJOR__)
146 # define COMPILER_VERSION_MINOR DEC(__FLANG_MINOR__)
147 # if defined(__FLANG_PATCHLEVEL__)
148 # define COMPILER_VERSION_PATCH DEC(__FLANG_PATCHLEVEL__)
149 # endif
150 #elif defined(_AIX) || defined(__AIX) || defined(__AIX__) || defined(__aix) || defined(__aix__)
151  print *, 'INFO:compiler[VisualAge]'
152 #elif defined(__hpux) || defined(__hpux__)
153  print *, 'INFO:compiler[HP]'
154 #elif defined(NAGFOR)
155  print *, 'INFO:compiler[NAG]'
156 #define COMPILER_VERSION_MAJOR DEC(__NAG_COMPILER_RELEASE/10)
157 #define COMPILER_VERSION_MINOR DEC(__NAG_COMPILER_RELEASE % 10)
158 #define COMPILER_VERSION_PATCH DEC(__NAG_COMPILER_BUILD)
159 #elif defined(__FUJITSU)
160  print *, 'INFO:compiler[Fujitsu]'
161 # if defined(__FRT_major__)
162 # define COMPILER_VERSION_MAJOR DEC(__FRT_major__)
163 # define COMPILER_VERSION_MINOR DEC(__FRT_minor__)
164 # define COMPILER_VERSION_PATCH DEC(__FRT_patchlevel__)
165 # elif defined(__FRT_version__)
166  print *, 'INFO:compiler_version['//__frt_version__//']'
167 # endif
168 #else
169  print *, 'INFO:compiler[]'
170 #endif
171 #if defined(__CRAYXT_COMPUTE_LINUX_TARGET)
172  print *, 'INFO:compiler_wrapper[CrayPrgEnv]'
173 #endif
174 
175 #if 0
176 ! Identify the platform
177 #endif
178 #if defined(__linux) || defined(__linux__) || defined(linux)
179  print *, 'INFO:platform[Linux]'
180 #elif defined(__CYGWIN__)
181  print *, 'INFO:platform[Cygwin]'
182 #elif defined(__MINGW32__)
183  print *, 'INFO:platform[MinGW]'
184 #elif defined(__APPLE__)
185  print *, 'INFO:platform[Darwin]'
186 #elif defined(_WIN32) || defined(__WIN32__) || defined(WIN32)
187  print *, 'INFO:platform[Windows]'
188 #elif defined(__FreeBSD__) || defined(__FreeBSD)
189  print *, 'INFO:platform[FreeBSD]'
190 #elif defined(__NetBSD__) || defined(__NetBSD)
191  print *, 'INFO:platform[NetBSD]'
192 #elif defined(__OpenBSD__) || defined(__OPENBSD)
193  print *, 'INFO:platform[OpenBSD]'
194 #elif defined(__sun) || defined(sun)
195  print *, 'INFO:platform[SunOS]'
196 #elif defined(_AIX) || defined(__AIX) || defined(__AIX__) || defined(__aix) || defined(__aix__)
197  print *, 'INFO:platform[AIX]'
198 #elif defined(__hpux) || defined(__hpux__)
199  print *, 'INFO:platform[HP-UX]'
200 #elif defined(__HAIKU__)
201  print *, 'INFO:platform[Haiku]'
202 #elif defined(__BeOS) || defined(__BEOS__) || defined(_BEOS)
203  print *, 'INFO:platform[BeOS]'
204 #elif defined(__QNX__) || defined(__QNXNTO__)
205  print *, 'INFO:platform[QNX]'
206 #elif defined(__tru64) || defined(_tru64) || defined(__TRU64__)
207  print *, 'INFO:platform[Tru64]'
208 #elif defined(__riscos) || defined(__riscos__)
209  print *, 'INFO:platform[RISCos]'
210 #elif defined(__sinix) || defined(__sinix__) || defined(__SINIX__)
211  print *, 'INFO:platform[SINIX]'
212 #elif defined(__UNIX_SV__)
213  print *, 'INFO:platform[UNIX_SV]'
214 #elif defined(__bsdos__)
215  print *, 'INFO:platform[BSDOS]'
216 #elif defined(_MPRAS) || defined(MPRAS)
217  print *, 'INFO:platform[MP-RAS]'
218 #elif defined(__osf) || defined(__osf__)
219  print *, 'INFO:platform[OSF1]'
220 #elif defined(_SCO_SV) || defined(SCO_SV) || defined(sco_sv)
221  print *, 'INFO:platform[SCO_SV]'
222 #elif defined(__ultrix) || defined(__ultrix__) || defined(_ULTRIX)
223  print *, 'INFO:platform[ULTRIX]'
224 #elif defined(__XENIX__) || defined(_XENIX) || defined(XENIX)
225  print *, 'INFO:platform[Xenix]'
226 #else
227  print *, 'INFO:platform[]'
228 #endif
229 #if defined(_WIN32) && (defined(__INTEL_COMPILER) || defined(__ICC))
230 # if defined(_M_IA64)
231  print *, 'INFO:arch[IA64]'
232 # elif defined(_M_X64) || defined(_M_AMD64)
233  print *, 'INFO:arch[x64]'
234 # elif defined(_M_IX86)
235  print *, 'INFO:arch[X86]'
236 # endif
237 #endif
238 
239 #if 0
240 ! Encode compiler version digits
241 #endif
242 #define DEC_8(n) (((n) / 10000000) % 10)
243 #define DEC_7(n) (((n) / 1000000) % 10)
244 #define DEC_6(n) (((n) / 100000) % 10)
245 #define DEC_5(n) (((n) / 10000) % 10)
246 #define DEC_4(n) (((n) / 1000) % 10)
247 #define DEC_3(n) (((n) / 100) % 10)
248 #define DEC_2(n) (((n) / 10) % 10)
249 #define DEC_1(n) (((n) ) % 10)
250 #define HEX_8(n) ((n)>>28 & 0xF)
251 #define HEX_7(n) ((n)>>24 & 0xF)
252 #define HEX_6(n) ((n)>>20 & 0xF)
253 #define HEX_5(n) ((n)>>16 & 0xF)
254 #define HEX_4(n) ((n)>>12 & 0xF)
255 #define HEX_3(n) ((n)>>8 & 0xF)
256 #define HEX_2(n) ((n)>>4 & 0xF)
257 #define HEX_1(n) ((n) & 0xF)
258 
259 #if defined(COMPILER_VERSION_MAJOR)
260 # undef DEC
261 # undef HEX
262 # define DEC(n) DEC_1(n)
263 # define HEX(n) HEX_1(n)
264 # if COMPILER_VERSION_MAJOR == 0
265  print *, 'INFO:compiler_version_MAJOR_digit_1[0]'
266 # elif COMPILER_VERSION_MAJOR == 1
267  print *, 'INFO:compiler_version_MAJOR_digit_1[1]'
268 # elif COMPILER_VERSION_MAJOR == 2
269  print *, 'INFO:compiler_version_MAJOR_digit_1[2]'
270 # elif COMPILER_VERSION_MAJOR == 3
271  print *, 'INFO:compiler_version_MAJOR_digit_1[3]'
272 # elif COMPILER_VERSION_MAJOR == 4
273  print *, 'INFO:compiler_version_MAJOR_digit_1[4]'
274 # elif COMPILER_VERSION_MAJOR == 5
275  print *, 'INFO:compiler_version_MAJOR_digit_1[5]'
276 # elif COMPILER_VERSION_MAJOR == 6
277  print *, 'INFO:compiler_version_MAJOR_digit_1[6]'
278 # elif COMPILER_VERSION_MAJOR == 7
279  print *, 'INFO:compiler_version_MAJOR_digit_1[7]'
280 # elif COMPILER_VERSION_MAJOR == 8
281  print *, 'INFO:compiler_version_MAJOR_digit_1[8]'
282 # elif COMPILER_VERSION_MAJOR == 9
283  print *, 'INFO:compiler_version_MAJOR_digit_1[9]'
284 # endif
285 
286 # undef DEC
287 # undef HEX
288 # define DEC(n) DEC_2(n)
289 # define HEX(n) HEX_2(n)
290 # if COMPILER_VERSION_MAJOR == 0
291  print *, 'INFO:compiler_version_MAJOR_digit_2[0]'
292 # elif COMPILER_VERSION_MAJOR == 1
293  print *, 'INFO:compiler_version_MAJOR_digit_2[1]'
294 # elif COMPILER_VERSION_MAJOR == 2
295  print *, 'INFO:compiler_version_MAJOR_digit_2[2]'
296 # elif COMPILER_VERSION_MAJOR == 3
297  print *, 'INFO:compiler_version_MAJOR_digit_2[3]'
298 # elif COMPILER_VERSION_MAJOR == 4
299  print *, 'INFO:compiler_version_MAJOR_digit_2[4]'
300 # elif COMPILER_VERSION_MAJOR == 5
301  print *, 'INFO:compiler_version_MAJOR_digit_2[5]'
302 # elif COMPILER_VERSION_MAJOR == 6
303  print *, 'INFO:compiler_version_MAJOR_digit_2[6]'
304 # elif COMPILER_VERSION_MAJOR == 7
305  print *, 'INFO:compiler_version_MAJOR_digit_2[7]'
306 # elif COMPILER_VERSION_MAJOR == 8
307  print *, 'INFO:compiler_version_MAJOR_digit_2[8]'
308 # elif COMPILER_VERSION_MAJOR == 9
309  print *, 'INFO:compiler_version_MAJOR_digit_2[9]'
310 # endif
311 
312 # undef DEC
313 # undef HEX
314 # define DEC(n) DEC_3(n)
315 # define HEX(n) HEX_3(n)
316 # if COMPILER_VERSION_MAJOR == 0
317  print *, 'INFO:compiler_version_MAJOR_digit_3[0]'
318 # elif COMPILER_VERSION_MAJOR == 1
319  print *, 'INFO:compiler_version_MAJOR_digit_3[1]'
320 # elif COMPILER_VERSION_MAJOR == 2
321  print *, 'INFO:compiler_version_MAJOR_digit_3[2]'
322 # elif COMPILER_VERSION_MAJOR == 3
323  print *, 'INFO:compiler_version_MAJOR_digit_3[3]'
324 # elif COMPILER_VERSION_MAJOR == 4
325  print *, 'INFO:compiler_version_MAJOR_digit_3[4]'
326 # elif COMPILER_VERSION_MAJOR == 5
327  print *, 'INFO:compiler_version_MAJOR_digit_3[5]'
328 # elif COMPILER_VERSION_MAJOR == 6
329  print *, 'INFO:compiler_version_MAJOR_digit_3[6]'
330 # elif COMPILER_VERSION_MAJOR == 7
331  print *, 'INFO:compiler_version_MAJOR_digit_3[7]'
332 # elif COMPILER_VERSION_MAJOR == 8
333  print *, 'INFO:compiler_version_MAJOR_digit_3[8]'
334 # elif COMPILER_VERSION_MAJOR == 9
335  print *, 'INFO:compiler_version_MAJOR_digit_3[9]'
336 # endif
337 
338 # undef DEC
339 # undef HEX
340 # define DEC(n) DEC_4(n)
341 # define HEX(n) HEX_4(n)
342 # if COMPILER_VERSION_MAJOR == 0
343  print *, 'INFO:compiler_version_MAJOR_digit_4[0]'
344 # elif COMPILER_VERSION_MAJOR == 1
345  print *, 'INFO:compiler_version_MAJOR_digit_4[1]'
346 # elif COMPILER_VERSION_MAJOR == 2
347  print *, 'INFO:compiler_version_MAJOR_digit_4[2]'
348 # elif COMPILER_VERSION_MAJOR == 3
349  print *, 'INFO:compiler_version_MAJOR_digit_4[3]'
350 # elif COMPILER_VERSION_MAJOR == 4
351  print *, 'INFO:compiler_version_MAJOR_digit_4[4]'
352 # elif COMPILER_VERSION_MAJOR == 5
353  print *, 'INFO:compiler_version_MAJOR_digit_4[5]'
354 # elif COMPILER_VERSION_MAJOR == 6
355  print *, 'INFO:compiler_version_MAJOR_digit_4[6]'
356 # elif COMPILER_VERSION_MAJOR == 7
357  print *, 'INFO:compiler_version_MAJOR_digit_4[7]'
358 # elif COMPILER_VERSION_MAJOR == 8
359  print *, 'INFO:compiler_version_MAJOR_digit_4[8]'
360 # elif COMPILER_VERSION_MAJOR == 9
361  print *, 'INFO:compiler_version_MAJOR_digit_4[9]'
362 # endif
363 
364 # undef DEC
365 # undef HEX
366 # define DEC(n) DEC_5(n)
367 # define HEX(n) HEX_5(n)
368 # if COMPILER_VERSION_MAJOR == 0
369  print *, 'INFO:compiler_version_MAJOR_digit_5[0]'
370 # elif COMPILER_VERSION_MAJOR == 1
371  print *, 'INFO:compiler_version_MAJOR_digit_5[1]'
372 # elif COMPILER_VERSION_MAJOR == 2
373  print *, 'INFO:compiler_version_MAJOR_digit_5[2]'
374 # elif COMPILER_VERSION_MAJOR == 3
375  print *, 'INFO:compiler_version_MAJOR_digit_5[3]'
376 # elif COMPILER_VERSION_MAJOR == 4
377  print *, 'INFO:compiler_version_MAJOR_digit_5[4]'
378 # elif COMPILER_VERSION_MAJOR == 5
379  print *, 'INFO:compiler_version_MAJOR_digit_5[5]'
380 # elif COMPILER_VERSION_MAJOR == 6
381  print *, 'INFO:compiler_version_MAJOR_digit_5[6]'
382 # elif COMPILER_VERSION_MAJOR == 7
383  print *, 'INFO:compiler_version_MAJOR_digit_5[7]'
384 # elif COMPILER_VERSION_MAJOR == 8
385  print *, 'INFO:compiler_version_MAJOR_digit_5[8]'
386 # elif COMPILER_VERSION_MAJOR == 9
387  print *, 'INFO:compiler_version_MAJOR_digit_5[9]'
388 # endif
389 
390 # undef DEC
391 # undef HEX
392 # define DEC(n) DEC_6(n)
393 # define HEX(n) HEX_6(n)
394 # if COMPILER_VERSION_MAJOR == 0
395  print *, 'INFO:compiler_version_MAJOR_digit_6[0]'
396 # elif COMPILER_VERSION_MAJOR == 1
397  print *, 'INFO:compiler_version_MAJOR_digit_6[1]'
398 # elif COMPILER_VERSION_MAJOR == 2
399  print *, 'INFO:compiler_version_MAJOR_digit_6[2]'
400 # elif COMPILER_VERSION_MAJOR == 3
401  print *, 'INFO:compiler_version_MAJOR_digit_6[3]'
402 # elif COMPILER_VERSION_MAJOR == 4
403  print *, 'INFO:compiler_version_MAJOR_digit_6[4]'
404 # elif COMPILER_VERSION_MAJOR == 5
405  print *, 'INFO:compiler_version_MAJOR_digit_6[5]'
406 # elif COMPILER_VERSION_MAJOR == 6
407  print *, 'INFO:compiler_version_MAJOR_digit_6[6]'
408 # elif COMPILER_VERSION_MAJOR == 7
409  print *, 'INFO:compiler_version_MAJOR_digit_6[7]'
410 # elif COMPILER_VERSION_MAJOR == 8
411  print *, 'INFO:compiler_version_MAJOR_digit_6[8]'
412 # elif COMPILER_VERSION_MAJOR == 9
413  print *, 'INFO:compiler_version_MAJOR_digit_6[9]'
414 # endif
415 
416 # undef DEC
417 # undef HEX
418 # define DEC(n) DEC_7(n)
419 # define HEX(n) HEX_7(n)
420 # if COMPILER_VERSION_MAJOR == 0
421  print *, 'INFO:compiler_version_MAJOR_digit_7[0]'
422 # elif COMPILER_VERSION_MAJOR == 1
423  print *, 'INFO:compiler_version_MAJOR_digit_7[1]'
424 # elif COMPILER_VERSION_MAJOR == 2
425  print *, 'INFO:compiler_version_MAJOR_digit_7[2]'
426 # elif COMPILER_VERSION_MAJOR == 3
427  print *, 'INFO:compiler_version_MAJOR_digit_7[3]'
428 # elif COMPILER_VERSION_MAJOR == 4
429  print *, 'INFO:compiler_version_MAJOR_digit_7[4]'
430 # elif COMPILER_VERSION_MAJOR == 5
431  print *, 'INFO:compiler_version_MAJOR_digit_7[5]'
432 # elif COMPILER_VERSION_MAJOR == 6
433  print *, 'INFO:compiler_version_MAJOR_digit_7[6]'
434 # elif COMPILER_VERSION_MAJOR == 7
435  print *, 'INFO:compiler_version_MAJOR_digit_7[7]'
436 # elif COMPILER_VERSION_MAJOR == 8
437  print *, 'INFO:compiler_version_MAJOR_digit_7[8]'
438 # elif COMPILER_VERSION_MAJOR == 9
439  print *, 'INFO:compiler_version_MAJOR_digit_7[9]'
440 # endif
441 
442 # undef DEC
443 # undef HEX
444 # define DEC(n) DEC_8(n)
445 # define HEX(n) HEX_8(n)
446 # if COMPILER_VERSION_MAJOR == 0
447  print *, 'INFO:compiler_version_MAJOR_digit_8[0]'
448 # elif COMPILER_VERSION_MAJOR == 1
449  print *, 'INFO:compiler_version_MAJOR_digit_8[1]'
450 # elif COMPILER_VERSION_MAJOR == 2
451  print *, 'INFO:compiler_version_MAJOR_digit_8[2]'
452 # elif COMPILER_VERSION_MAJOR == 3
453  print *, 'INFO:compiler_version_MAJOR_digit_8[3]'
454 # elif COMPILER_VERSION_MAJOR == 4
455  print *, 'INFO:compiler_version_MAJOR_digit_8[4]'
456 # elif COMPILER_VERSION_MAJOR == 5
457  print *, 'INFO:compiler_version_MAJOR_digit_8[5]'
458 # elif COMPILER_VERSION_MAJOR == 6
459  print *, 'INFO:compiler_version_MAJOR_digit_8[6]'
460 # elif COMPILER_VERSION_MAJOR == 7
461  print *, 'INFO:compiler_version_MAJOR_digit_8[7]'
462 # elif COMPILER_VERSION_MAJOR == 8
463  print *, 'INFO:compiler_version_MAJOR_digit_8[8]'
464 # elif COMPILER_VERSION_MAJOR == 9
465  print *, 'INFO:compiler_version_MAJOR_digit_8[9]'
466 # endif
467 
468 #endif
469 #if defined(COMPILER_VERSION_MINOR)
470 # undef DEC
471 # undef HEX
472 # define DEC(n) DEC_1(n)
473 # define HEX(n) HEX_1(n)
474 # if COMPILER_VERSION_MINOR == 0
475  print *, 'INFO:compiler_version_MINOR_digit_1[0]'
476 # elif COMPILER_VERSION_MINOR == 1
477  print *, 'INFO:compiler_version_MINOR_digit_1[1]'
478 # elif COMPILER_VERSION_MINOR == 2
479  print *, 'INFO:compiler_version_MINOR_digit_1[2]'
480 # elif COMPILER_VERSION_MINOR == 3
481  print *, 'INFO:compiler_version_MINOR_digit_1[3]'
482 # elif COMPILER_VERSION_MINOR == 4
483  print *, 'INFO:compiler_version_MINOR_digit_1[4]'
484 # elif COMPILER_VERSION_MINOR == 5
485  print *, 'INFO:compiler_version_MINOR_digit_1[5]'
486 # elif COMPILER_VERSION_MINOR == 6
487  print *, 'INFO:compiler_version_MINOR_digit_1[6]'
488 # elif COMPILER_VERSION_MINOR == 7
489  print *, 'INFO:compiler_version_MINOR_digit_1[7]'
490 # elif COMPILER_VERSION_MINOR == 8
491  print *, 'INFO:compiler_version_MINOR_digit_1[8]'
492 # elif COMPILER_VERSION_MINOR == 9
493  print *, 'INFO:compiler_version_MINOR_digit_1[9]'
494 # endif
495 
496 # undef DEC
497 # undef HEX
498 # define DEC(n) DEC_2(n)
499 # define HEX(n) HEX_2(n)
500 # if COMPILER_VERSION_MINOR == 0
501  print *, 'INFO:compiler_version_MINOR_digit_2[0]'
502 # elif COMPILER_VERSION_MINOR == 1
503  print *, 'INFO:compiler_version_MINOR_digit_2[1]'
504 # elif COMPILER_VERSION_MINOR == 2
505  print *, 'INFO:compiler_version_MINOR_digit_2[2]'
506 # elif COMPILER_VERSION_MINOR == 3
507  print *, 'INFO:compiler_version_MINOR_digit_2[3]'
508 # elif COMPILER_VERSION_MINOR == 4
509  print *, 'INFO:compiler_version_MINOR_digit_2[4]'
510 # elif COMPILER_VERSION_MINOR == 5
511  print *, 'INFO:compiler_version_MINOR_digit_2[5]'
512 # elif COMPILER_VERSION_MINOR == 6
513  print *, 'INFO:compiler_version_MINOR_digit_2[6]'
514 # elif COMPILER_VERSION_MINOR == 7
515  print *, 'INFO:compiler_version_MINOR_digit_2[7]'
516 # elif COMPILER_VERSION_MINOR == 8
517  print *, 'INFO:compiler_version_MINOR_digit_2[8]'
518 # elif COMPILER_VERSION_MINOR == 9
519  print *, 'INFO:compiler_version_MINOR_digit_2[9]'
520 # endif
521 
522 # undef DEC
523 # undef HEX
524 # define DEC(n) DEC_3(n)
525 # define HEX(n) HEX_3(n)
526 # if COMPILER_VERSION_MINOR == 0
527  print *, 'INFO:compiler_version_MINOR_digit_3[0]'
528 # elif COMPILER_VERSION_MINOR == 1
529  print *, 'INFO:compiler_version_MINOR_digit_3[1]'
530 # elif COMPILER_VERSION_MINOR == 2
531  print *, 'INFO:compiler_version_MINOR_digit_3[2]'
532 # elif COMPILER_VERSION_MINOR == 3
533  print *, 'INFO:compiler_version_MINOR_digit_3[3]'
534 # elif COMPILER_VERSION_MINOR == 4
535  print *, 'INFO:compiler_version_MINOR_digit_3[4]'
536 # elif COMPILER_VERSION_MINOR == 5
537  print *, 'INFO:compiler_version_MINOR_digit_3[5]'
538 # elif COMPILER_VERSION_MINOR == 6
539  print *, 'INFO:compiler_version_MINOR_digit_3[6]'
540 # elif COMPILER_VERSION_MINOR == 7
541  print *, 'INFO:compiler_version_MINOR_digit_3[7]'
542 # elif COMPILER_VERSION_MINOR == 8
543  print *, 'INFO:compiler_version_MINOR_digit_3[8]'
544 # elif COMPILER_VERSION_MINOR == 9
545  print *, 'INFO:compiler_version_MINOR_digit_3[9]'
546 # endif
547 
548 # undef DEC
549 # undef HEX
550 # define DEC(n) DEC_4(n)
551 # define HEX(n) HEX_4(n)
552 # if COMPILER_VERSION_MINOR == 0
553  print *, 'INFO:compiler_version_MINOR_digit_4[0]'
554 # elif COMPILER_VERSION_MINOR == 1
555  print *, 'INFO:compiler_version_MINOR_digit_4[1]'
556 # elif COMPILER_VERSION_MINOR == 2
557  print *, 'INFO:compiler_version_MINOR_digit_4[2]'
558 # elif COMPILER_VERSION_MINOR == 3
559  print *, 'INFO:compiler_version_MINOR_digit_4[3]'
560 # elif COMPILER_VERSION_MINOR == 4
561  print *, 'INFO:compiler_version_MINOR_digit_4[4]'
562 # elif COMPILER_VERSION_MINOR == 5
563  print *, 'INFO:compiler_version_MINOR_digit_4[5]'
564 # elif COMPILER_VERSION_MINOR == 6
565  print *, 'INFO:compiler_version_MINOR_digit_4[6]'
566 # elif COMPILER_VERSION_MINOR == 7
567  print *, 'INFO:compiler_version_MINOR_digit_4[7]'
568 # elif COMPILER_VERSION_MINOR == 8
569  print *, 'INFO:compiler_version_MINOR_digit_4[8]'
570 # elif COMPILER_VERSION_MINOR == 9
571  print *, 'INFO:compiler_version_MINOR_digit_4[9]'
572 # endif
573 
574 # undef DEC
575 # undef HEX
576 # define DEC(n) DEC_5(n)
577 # define HEX(n) HEX_5(n)
578 # if COMPILER_VERSION_MINOR == 0
579  print *, 'INFO:compiler_version_MINOR_digit_5[0]'
580 # elif COMPILER_VERSION_MINOR == 1
581  print *, 'INFO:compiler_version_MINOR_digit_5[1]'
582 # elif COMPILER_VERSION_MINOR == 2
583  print *, 'INFO:compiler_version_MINOR_digit_5[2]'
584 # elif COMPILER_VERSION_MINOR == 3
585  print *, 'INFO:compiler_version_MINOR_digit_5[3]'
586 # elif COMPILER_VERSION_MINOR == 4
587  print *, 'INFO:compiler_version_MINOR_digit_5[4]'
588 # elif COMPILER_VERSION_MINOR == 5
589  print *, 'INFO:compiler_version_MINOR_digit_5[5]'
590 # elif COMPILER_VERSION_MINOR == 6
591  print *, 'INFO:compiler_version_MINOR_digit_5[6]'
592 # elif COMPILER_VERSION_MINOR == 7
593  print *, 'INFO:compiler_version_MINOR_digit_5[7]'
594 # elif COMPILER_VERSION_MINOR == 8
595  print *, 'INFO:compiler_version_MINOR_digit_5[8]'
596 # elif COMPILER_VERSION_MINOR == 9
597  print *, 'INFO:compiler_version_MINOR_digit_5[9]'
598 # endif
599 
600 # undef DEC
601 # undef HEX
602 # define DEC(n) DEC_6(n)
603 # define HEX(n) HEX_6(n)
604 # if COMPILER_VERSION_MINOR == 0
605  print *, 'INFO:compiler_version_MINOR_digit_6[0]'
606 # elif COMPILER_VERSION_MINOR == 1
607  print *, 'INFO:compiler_version_MINOR_digit_6[1]'
608 # elif COMPILER_VERSION_MINOR == 2
609  print *, 'INFO:compiler_version_MINOR_digit_6[2]'
610 # elif COMPILER_VERSION_MINOR == 3
611  print *, 'INFO:compiler_version_MINOR_digit_6[3]'
612 # elif COMPILER_VERSION_MINOR == 4
613  print *, 'INFO:compiler_version_MINOR_digit_6[4]'
614 # elif COMPILER_VERSION_MINOR == 5
615  print *, 'INFO:compiler_version_MINOR_digit_6[5]'
616 # elif COMPILER_VERSION_MINOR == 6
617  print *, 'INFO:compiler_version_MINOR_digit_6[6]'
618 # elif COMPILER_VERSION_MINOR == 7
619  print *, 'INFO:compiler_version_MINOR_digit_6[7]'
620 # elif COMPILER_VERSION_MINOR == 8
621  print *, 'INFO:compiler_version_MINOR_digit_6[8]'
622 # elif COMPILER_VERSION_MINOR == 9
623  print *, 'INFO:compiler_version_MINOR_digit_6[9]'
624 # endif
625 
626 # undef DEC
627 # undef HEX
628 # define DEC(n) DEC_7(n)
629 # define HEX(n) HEX_7(n)
630 # if COMPILER_VERSION_MINOR == 0
631  print *, 'INFO:compiler_version_MINOR_digit_7[0]'
632 # elif COMPILER_VERSION_MINOR == 1
633  print *, 'INFO:compiler_version_MINOR_digit_7[1]'
634 # elif COMPILER_VERSION_MINOR == 2
635  print *, 'INFO:compiler_version_MINOR_digit_7[2]'
636 # elif COMPILER_VERSION_MINOR == 3
637  print *, 'INFO:compiler_version_MINOR_digit_7[3]'
638 # elif COMPILER_VERSION_MINOR == 4
639  print *, 'INFO:compiler_version_MINOR_digit_7[4]'
640 # elif COMPILER_VERSION_MINOR == 5
641  print *, 'INFO:compiler_version_MINOR_digit_7[5]'
642 # elif COMPILER_VERSION_MINOR == 6
643  print *, 'INFO:compiler_version_MINOR_digit_7[6]'
644 # elif COMPILER_VERSION_MINOR == 7
645  print *, 'INFO:compiler_version_MINOR_digit_7[7]'
646 # elif COMPILER_VERSION_MINOR == 8
647  print *, 'INFO:compiler_version_MINOR_digit_7[8]'
648 # elif COMPILER_VERSION_MINOR == 9
649  print *, 'INFO:compiler_version_MINOR_digit_7[9]'
650 # endif
651 
652 # undef DEC
653 # undef HEX
654 # define DEC(n) DEC_8(n)
655 # define HEX(n) HEX_8(n)
656 # if COMPILER_VERSION_MINOR == 0
657  print *, 'INFO:compiler_version_MINOR_digit_8[0]'
658 # elif COMPILER_VERSION_MINOR == 1
659  print *, 'INFO:compiler_version_MINOR_digit_8[1]'
660 # elif COMPILER_VERSION_MINOR == 2
661  print *, 'INFO:compiler_version_MINOR_digit_8[2]'
662 # elif COMPILER_VERSION_MINOR == 3
663  print *, 'INFO:compiler_version_MINOR_digit_8[3]'
664 # elif COMPILER_VERSION_MINOR == 4
665  print *, 'INFO:compiler_version_MINOR_digit_8[4]'
666 # elif COMPILER_VERSION_MINOR == 5
667  print *, 'INFO:compiler_version_MINOR_digit_8[5]'
668 # elif COMPILER_VERSION_MINOR == 6
669  print *, 'INFO:compiler_version_MINOR_digit_8[6]'
670 # elif COMPILER_VERSION_MINOR == 7
671  print *, 'INFO:compiler_version_MINOR_digit_8[7]'
672 # elif COMPILER_VERSION_MINOR == 8
673  print *, 'INFO:compiler_version_MINOR_digit_8[8]'
674 # elif COMPILER_VERSION_MINOR == 9
675  print *, 'INFO:compiler_version_MINOR_digit_8[9]'
676 # endif
677 
678 #endif
679 #if defined(COMPILER_VERSION_PATCH)
680 # undef DEC
681 # undef HEX
682 # define DEC(n) DEC_1(n)
683 # define HEX(n) HEX_1(n)
684 # if COMPILER_VERSION_PATCH == 0
685  print *, 'INFO:compiler_version_PATCH_digit_1[0]'
686 # elif COMPILER_VERSION_PATCH == 1
687  print *, 'INFO:compiler_version_PATCH_digit_1[1]'
688 # elif COMPILER_VERSION_PATCH == 2
689  print *, 'INFO:compiler_version_PATCH_digit_1[2]'
690 # elif COMPILER_VERSION_PATCH == 3
691  print *, 'INFO:compiler_version_PATCH_digit_1[3]'
692 # elif COMPILER_VERSION_PATCH == 4
693  print *, 'INFO:compiler_version_PATCH_digit_1[4]'
694 # elif COMPILER_VERSION_PATCH == 5
695  print *, 'INFO:compiler_version_PATCH_digit_1[5]'
696 # elif COMPILER_VERSION_PATCH == 6
697  print *, 'INFO:compiler_version_PATCH_digit_1[6]'
698 # elif COMPILER_VERSION_PATCH == 7
699  print *, 'INFO:compiler_version_PATCH_digit_1[7]'
700 # elif COMPILER_VERSION_PATCH == 8
701  print *, 'INFO:compiler_version_PATCH_digit_1[8]'
702 # elif COMPILER_VERSION_PATCH == 9
703  print *, 'INFO:compiler_version_PATCH_digit_1[9]'
704 # endif
705 
706 # undef DEC
707 # undef HEX
708 # define DEC(n) DEC_2(n)
709 # define HEX(n) HEX_2(n)
710 # if COMPILER_VERSION_PATCH == 0
711  print *, 'INFO:compiler_version_PATCH_digit_2[0]'
712 # elif COMPILER_VERSION_PATCH == 1
713  print *, 'INFO:compiler_version_PATCH_digit_2[1]'
714 # elif COMPILER_VERSION_PATCH == 2
715  print *, 'INFO:compiler_version_PATCH_digit_2[2]'
716 # elif COMPILER_VERSION_PATCH == 3
717  print *, 'INFO:compiler_version_PATCH_digit_2[3]'
718 # elif COMPILER_VERSION_PATCH == 4
719  print *, 'INFO:compiler_version_PATCH_digit_2[4]'
720 # elif COMPILER_VERSION_PATCH == 5
721  print *, 'INFO:compiler_version_PATCH_digit_2[5]'
722 # elif COMPILER_VERSION_PATCH == 6
723  print *, 'INFO:compiler_version_PATCH_digit_2[6]'
724 # elif COMPILER_VERSION_PATCH == 7
725  print *, 'INFO:compiler_version_PATCH_digit_2[7]'
726 # elif COMPILER_VERSION_PATCH == 8
727  print *, 'INFO:compiler_version_PATCH_digit_2[8]'
728 # elif COMPILER_VERSION_PATCH == 9
729  print *, 'INFO:compiler_version_PATCH_digit_2[9]'
730 # endif
731 
732 # undef DEC
733 # undef HEX
734 # define DEC(n) DEC_3(n)
735 # define HEX(n) HEX_3(n)
736 # if COMPILER_VERSION_PATCH == 0
737  print *, 'INFO:compiler_version_PATCH_digit_3[0]'
738 # elif COMPILER_VERSION_PATCH == 1
739  print *, 'INFO:compiler_version_PATCH_digit_3[1]'
740 # elif COMPILER_VERSION_PATCH == 2
741  print *, 'INFO:compiler_version_PATCH_digit_3[2]'
742 # elif COMPILER_VERSION_PATCH == 3
743  print *, 'INFO:compiler_version_PATCH_digit_3[3]'
744 # elif COMPILER_VERSION_PATCH == 4
745  print *, 'INFO:compiler_version_PATCH_digit_3[4]'
746 # elif COMPILER_VERSION_PATCH == 5
747  print *, 'INFO:compiler_version_PATCH_digit_3[5]'
748 # elif COMPILER_VERSION_PATCH == 6
749  print *, 'INFO:compiler_version_PATCH_digit_3[6]'
750 # elif COMPILER_VERSION_PATCH == 7
751  print *, 'INFO:compiler_version_PATCH_digit_3[7]'
752 # elif COMPILER_VERSION_PATCH == 8
753  print *, 'INFO:compiler_version_PATCH_digit_3[8]'
754 # elif COMPILER_VERSION_PATCH == 9
755  print *, 'INFO:compiler_version_PATCH_digit_3[9]'
756 # endif
757 
758 # undef DEC
759 # undef HEX
760 # define DEC(n) DEC_4(n)
761 # define HEX(n) HEX_4(n)
762 # if COMPILER_VERSION_PATCH == 0
763  print *, 'INFO:compiler_version_PATCH_digit_4[0]'
764 # elif COMPILER_VERSION_PATCH == 1
765  print *, 'INFO:compiler_version_PATCH_digit_4[1]'
766 # elif COMPILER_VERSION_PATCH == 2
767  print *, 'INFO:compiler_version_PATCH_digit_4[2]'
768 # elif COMPILER_VERSION_PATCH == 3
769  print *, 'INFO:compiler_version_PATCH_digit_4[3]'
770 # elif COMPILER_VERSION_PATCH == 4
771  print *, 'INFO:compiler_version_PATCH_digit_4[4]'
772 # elif COMPILER_VERSION_PATCH == 5
773  print *, 'INFO:compiler_version_PATCH_digit_4[5]'
774 # elif COMPILER_VERSION_PATCH == 6
775  print *, 'INFO:compiler_version_PATCH_digit_4[6]'
776 # elif COMPILER_VERSION_PATCH == 7
777  print *, 'INFO:compiler_version_PATCH_digit_4[7]'
778 # elif COMPILER_VERSION_PATCH == 8
779  print *, 'INFO:compiler_version_PATCH_digit_4[8]'
780 # elif COMPILER_VERSION_PATCH == 9
781  print *, 'INFO:compiler_version_PATCH_digit_4[9]'
782 # endif
783 
784 # undef DEC
785 # undef HEX
786 # define DEC(n) DEC_5(n)
787 # define HEX(n) HEX_5(n)
788 # if COMPILER_VERSION_PATCH == 0
789  print *, 'INFO:compiler_version_PATCH_digit_5[0]'
790 # elif COMPILER_VERSION_PATCH == 1
791  print *, 'INFO:compiler_version_PATCH_digit_5[1]'
792 # elif COMPILER_VERSION_PATCH == 2
793  print *, 'INFO:compiler_version_PATCH_digit_5[2]'
794 # elif COMPILER_VERSION_PATCH == 3
795  print *, 'INFO:compiler_version_PATCH_digit_5[3]'
796 # elif COMPILER_VERSION_PATCH == 4
797  print *, 'INFO:compiler_version_PATCH_digit_5[4]'
798 # elif COMPILER_VERSION_PATCH == 5
799  print *, 'INFO:compiler_version_PATCH_digit_5[5]'
800 # elif COMPILER_VERSION_PATCH == 6
801  print *, 'INFO:compiler_version_PATCH_digit_5[6]'
802 # elif COMPILER_VERSION_PATCH == 7
803  print *, 'INFO:compiler_version_PATCH_digit_5[7]'
804 # elif COMPILER_VERSION_PATCH == 8
805  print *, 'INFO:compiler_version_PATCH_digit_5[8]'
806 # elif COMPILER_VERSION_PATCH == 9
807  print *, 'INFO:compiler_version_PATCH_digit_5[9]'
808 # endif
809 
810 # undef DEC
811 # undef HEX
812 # define DEC(n) DEC_6(n)
813 # define HEX(n) HEX_6(n)
814 # if COMPILER_VERSION_PATCH == 0
815  print *, 'INFO:compiler_version_PATCH_digit_6[0]'
816 # elif COMPILER_VERSION_PATCH == 1
817  print *, 'INFO:compiler_version_PATCH_digit_6[1]'
818 # elif COMPILER_VERSION_PATCH == 2
819  print *, 'INFO:compiler_version_PATCH_digit_6[2]'
820 # elif COMPILER_VERSION_PATCH == 3
821  print *, 'INFO:compiler_version_PATCH_digit_6[3]'
822 # elif COMPILER_VERSION_PATCH == 4
823  print *, 'INFO:compiler_version_PATCH_digit_6[4]'
824 # elif COMPILER_VERSION_PATCH == 5
825  print *, 'INFO:compiler_version_PATCH_digit_6[5]'
826 # elif COMPILER_VERSION_PATCH == 6
827  print *, 'INFO:compiler_version_PATCH_digit_6[6]'
828 # elif COMPILER_VERSION_PATCH == 7
829  print *, 'INFO:compiler_version_PATCH_digit_6[7]'
830 # elif COMPILER_VERSION_PATCH == 8
831  print *, 'INFO:compiler_version_PATCH_digit_6[8]'
832 # elif COMPILER_VERSION_PATCH == 9
833  print *, 'INFO:compiler_version_PATCH_digit_6[9]'
834 # endif
835 
836 # undef DEC
837 # undef HEX
838 # define DEC(n) DEC_7(n)
839 # define HEX(n) HEX_7(n)
840 # if COMPILER_VERSION_PATCH == 0
841  print *, 'INFO:compiler_version_PATCH_digit_7[0]'
842 # elif COMPILER_VERSION_PATCH == 1
843  print *, 'INFO:compiler_version_PATCH_digit_7[1]'
844 # elif COMPILER_VERSION_PATCH == 2
845  print *, 'INFO:compiler_version_PATCH_digit_7[2]'
846 # elif COMPILER_VERSION_PATCH == 3
847  print *, 'INFO:compiler_version_PATCH_digit_7[3]'
848 # elif COMPILER_VERSION_PATCH == 4
849  print *, 'INFO:compiler_version_PATCH_digit_7[4]'
850 # elif COMPILER_VERSION_PATCH == 5
851  print *, 'INFO:compiler_version_PATCH_digit_7[5]'
852 # elif COMPILER_VERSION_PATCH == 6
853  print *, 'INFO:compiler_version_PATCH_digit_7[6]'
854 # elif COMPILER_VERSION_PATCH == 7
855  print *, 'INFO:compiler_version_PATCH_digit_7[7]'
856 # elif COMPILER_VERSION_PATCH == 8
857  print *, 'INFO:compiler_version_PATCH_digit_7[8]'
858 # elif COMPILER_VERSION_PATCH == 9
859  print *, 'INFO:compiler_version_PATCH_digit_7[9]'
860 # endif
861 
862 # undef DEC
863 # undef HEX
864 # define DEC(n) DEC_8(n)
865 # define HEX(n) HEX_8(n)
866 # if COMPILER_VERSION_PATCH == 0
867  print *, 'INFO:compiler_version_PATCH_digit_8[0]'
868 # elif COMPILER_VERSION_PATCH == 1
869  print *, 'INFO:compiler_version_PATCH_digit_8[1]'
870 # elif COMPILER_VERSION_PATCH == 2
871  print *, 'INFO:compiler_version_PATCH_digit_8[2]'
872 # elif COMPILER_VERSION_PATCH == 3
873  print *, 'INFO:compiler_version_PATCH_digit_8[3]'
874 # elif COMPILER_VERSION_PATCH == 4
875  print *, 'INFO:compiler_version_PATCH_digit_8[4]'
876 # elif COMPILER_VERSION_PATCH == 5
877  print *, 'INFO:compiler_version_PATCH_digit_8[5]'
878 # elif COMPILER_VERSION_PATCH == 6
879  print *, 'INFO:compiler_version_PATCH_digit_8[6]'
880 # elif COMPILER_VERSION_PATCH == 7
881  print *, 'INFO:compiler_version_PATCH_digit_8[7]'
882 # elif COMPILER_VERSION_PATCH == 8
883  print *, 'INFO:compiler_version_PATCH_digit_8[8]'
884 # elif COMPILER_VERSION_PATCH == 9
885  print *, 'INFO:compiler_version_PATCH_digit_8[9]'
886 # endif
887 
888 #endif
889 #if defined(COMPILER_VERSION_TWEAK)
890 # undef DEC
891 # undef HEX
892 # define DEC(n) DEC_1(n)
893 # define HEX(n) HEX_1(n)
894 # if COMPILER_VERSION_TWEAK == 0
895  print *, 'INFO:compiler_version_TWEAK_digit_1[0]'
896 # elif COMPILER_VERSION_TWEAK == 1
897  print *, 'INFO:compiler_version_TWEAK_digit_1[1]'
898 # elif COMPILER_VERSION_TWEAK == 2
899  print *, 'INFO:compiler_version_TWEAK_digit_1[2]'
900 # elif COMPILER_VERSION_TWEAK == 3
901  print *, 'INFO:compiler_version_TWEAK_digit_1[3]'
902 # elif COMPILER_VERSION_TWEAK == 4
903  print *, 'INFO:compiler_version_TWEAK_digit_1[4]'
904 # elif COMPILER_VERSION_TWEAK == 5
905  print *, 'INFO:compiler_version_TWEAK_digit_1[5]'
906 # elif COMPILER_VERSION_TWEAK == 6
907  print *, 'INFO:compiler_version_TWEAK_digit_1[6]'
908 # elif COMPILER_VERSION_TWEAK == 7
909  print *, 'INFO:compiler_version_TWEAK_digit_1[7]'
910 # elif COMPILER_VERSION_TWEAK == 8
911  print *, 'INFO:compiler_version_TWEAK_digit_1[8]'
912 # elif COMPILER_VERSION_TWEAK == 9
913  print *, 'INFO:compiler_version_TWEAK_digit_1[9]'
914 # endif
915 
916 # undef DEC
917 # undef HEX
918 # define DEC(n) DEC_2(n)
919 # define HEX(n) HEX_2(n)
920 # if COMPILER_VERSION_TWEAK == 0
921  print *, 'INFO:compiler_version_TWEAK_digit_2[0]'
922 # elif COMPILER_VERSION_TWEAK == 1
923  print *, 'INFO:compiler_version_TWEAK_digit_2[1]'
924 # elif COMPILER_VERSION_TWEAK == 2
925  print *, 'INFO:compiler_version_TWEAK_digit_2[2]'
926 # elif COMPILER_VERSION_TWEAK == 3
927  print *, 'INFO:compiler_version_TWEAK_digit_2[3]'
928 # elif COMPILER_VERSION_TWEAK == 4
929  print *, 'INFO:compiler_version_TWEAK_digit_2[4]'
930 # elif COMPILER_VERSION_TWEAK == 5
931  print *, 'INFO:compiler_version_TWEAK_digit_2[5]'
932 # elif COMPILER_VERSION_TWEAK == 6
933  print *, 'INFO:compiler_version_TWEAK_digit_2[6]'
934 # elif COMPILER_VERSION_TWEAK == 7
935  print *, 'INFO:compiler_version_TWEAK_digit_2[7]'
936 # elif COMPILER_VERSION_TWEAK == 8
937  print *, 'INFO:compiler_version_TWEAK_digit_2[8]'
938 # elif COMPILER_VERSION_TWEAK == 9
939  print *, 'INFO:compiler_version_TWEAK_digit_2[9]'
940 # endif
941 
942 # undef DEC
943 # undef HEX
944 # define DEC(n) DEC_3(n)
945 # define HEX(n) HEX_3(n)
946 # if COMPILER_VERSION_TWEAK == 0
947  print *, 'INFO:compiler_version_TWEAK_digit_3[0]'
948 # elif COMPILER_VERSION_TWEAK == 1
949  print *, 'INFO:compiler_version_TWEAK_digit_3[1]'
950 # elif COMPILER_VERSION_TWEAK == 2
951  print *, 'INFO:compiler_version_TWEAK_digit_3[2]'
952 # elif COMPILER_VERSION_TWEAK == 3
953  print *, 'INFO:compiler_version_TWEAK_digit_3[3]'
954 # elif COMPILER_VERSION_TWEAK == 4
955  print *, 'INFO:compiler_version_TWEAK_digit_3[4]'
956 # elif COMPILER_VERSION_TWEAK == 5
957  print *, 'INFO:compiler_version_TWEAK_digit_3[5]'
958 # elif COMPILER_VERSION_TWEAK == 6
959  print *, 'INFO:compiler_version_TWEAK_digit_3[6]'
960 # elif COMPILER_VERSION_TWEAK == 7
961  print *, 'INFO:compiler_version_TWEAK_digit_3[7]'
962 # elif COMPILER_VERSION_TWEAK == 8
963  print *, 'INFO:compiler_version_TWEAK_digit_3[8]'
964 # elif COMPILER_VERSION_TWEAK == 9
965  print *, 'INFO:compiler_version_TWEAK_digit_3[9]'
966 # endif
967 
968 # undef DEC
969 # undef HEX
970 # define DEC(n) DEC_4(n)
971 # define HEX(n) HEX_4(n)
972 # if COMPILER_VERSION_TWEAK == 0
973  print *, 'INFO:compiler_version_TWEAK_digit_4[0]'
974 # elif COMPILER_VERSION_TWEAK == 1
975  print *, 'INFO:compiler_version_TWEAK_digit_4[1]'
976 # elif COMPILER_VERSION_TWEAK == 2
977  print *, 'INFO:compiler_version_TWEAK_digit_4[2]'
978 # elif COMPILER_VERSION_TWEAK == 3
979  print *, 'INFO:compiler_version_TWEAK_digit_4[3]'
980 # elif COMPILER_VERSION_TWEAK == 4
981  print *, 'INFO:compiler_version_TWEAK_digit_4[4]'
982 # elif COMPILER_VERSION_TWEAK == 5
983  print *, 'INFO:compiler_version_TWEAK_digit_4[5]'
984 # elif COMPILER_VERSION_TWEAK == 6
985  print *, 'INFO:compiler_version_TWEAK_digit_4[6]'
986 # elif COMPILER_VERSION_TWEAK == 7
987  print *, 'INFO:compiler_version_TWEAK_digit_4[7]'
988 # elif COMPILER_VERSION_TWEAK == 8
989  print *, 'INFO:compiler_version_TWEAK_digit_4[8]'
990 # elif COMPILER_VERSION_TWEAK == 9
991  print *, 'INFO:compiler_version_TWEAK_digit_4[9]'
992 # endif
993 
994 # undef DEC
995 # undef HEX
996 # define DEC(n) DEC_5(n)
997 # define HEX(n) HEX_5(n)
998 # if COMPILER_VERSION_TWEAK == 0
999  print *, 'INFO:compiler_version_TWEAK_digit_5[0]'
1000 # elif COMPILER_VERSION_TWEAK == 1
1001  print *, 'INFO:compiler_version_TWEAK_digit_5[1]'
1002 # elif COMPILER_VERSION_TWEAK == 2
1003  print *, 'INFO:compiler_version_TWEAK_digit_5[2]'
1004 # elif COMPILER_VERSION_TWEAK == 3
1005  print *, 'INFO:compiler_version_TWEAK_digit_5[3]'
1006 # elif COMPILER_VERSION_TWEAK == 4
1007  print *, 'INFO:compiler_version_TWEAK_digit_5[4]'
1008 # elif COMPILER_VERSION_TWEAK == 5
1009  print *, 'INFO:compiler_version_TWEAK_digit_5[5]'
1010 # elif COMPILER_VERSION_TWEAK == 6
1011  print *, 'INFO:compiler_version_TWEAK_digit_5[6]'
1012 # elif COMPILER_VERSION_TWEAK == 7
1013  print *, 'INFO:compiler_version_TWEAK_digit_5[7]'
1014 # elif COMPILER_VERSION_TWEAK == 8
1015  print *, 'INFO:compiler_version_TWEAK_digit_5[8]'
1016 # elif COMPILER_VERSION_TWEAK == 9
1017  print *, 'INFO:compiler_version_TWEAK_digit_5[9]'
1018 # endif
1019 
1020 # undef DEC
1021 # undef HEX
1022 # define DEC(n) DEC_6(n)
1023 # define HEX(n) HEX_6(n)
1024 # if COMPILER_VERSION_TWEAK == 0
1025  print *, 'INFO:compiler_version_TWEAK_digit_6[0]'
1026 # elif COMPILER_VERSION_TWEAK == 1
1027  print *, 'INFO:compiler_version_TWEAK_digit_6[1]'
1028 # elif COMPILER_VERSION_TWEAK == 2
1029  print *, 'INFO:compiler_version_TWEAK_digit_6[2]'
1030 # elif COMPILER_VERSION_TWEAK == 3
1031  print *, 'INFO:compiler_version_TWEAK_digit_6[3]'
1032 # elif COMPILER_VERSION_TWEAK == 4
1033  print *, 'INFO:compiler_version_TWEAK_digit_6[4]'
1034 # elif COMPILER_VERSION_TWEAK == 5
1035  print *, 'INFO:compiler_version_TWEAK_digit_6[5]'
1036 # elif COMPILER_VERSION_TWEAK == 6
1037  print *, 'INFO:compiler_version_TWEAK_digit_6[6]'
1038 # elif COMPILER_VERSION_TWEAK == 7
1039  print *, 'INFO:compiler_version_TWEAK_digit_6[7]'
1040 # elif COMPILER_VERSION_TWEAK == 8
1041  print *, 'INFO:compiler_version_TWEAK_digit_6[8]'
1042 # elif COMPILER_VERSION_TWEAK == 9
1043  print *, 'INFO:compiler_version_TWEAK_digit_6[9]'
1044 # endif
1045 
1046 # undef DEC
1047 # undef HEX
1048 # define DEC(n) DEC_7(n)
1049 # define HEX(n) HEX_7(n)
1050 # if COMPILER_VERSION_TWEAK == 0
1051  print *, 'INFO:compiler_version_TWEAK_digit_7[0]'
1052 # elif COMPILER_VERSION_TWEAK == 1
1053  print *, 'INFO:compiler_version_TWEAK_digit_7[1]'
1054 # elif COMPILER_VERSION_TWEAK == 2
1055  print *, 'INFO:compiler_version_TWEAK_digit_7[2]'
1056 # elif COMPILER_VERSION_TWEAK == 3
1057  print *, 'INFO:compiler_version_TWEAK_digit_7[3]'
1058 # elif COMPILER_VERSION_TWEAK == 4
1059  print *, 'INFO:compiler_version_TWEAK_digit_7[4]'
1060 # elif COMPILER_VERSION_TWEAK == 5
1061  print *, 'INFO:compiler_version_TWEAK_digit_7[5]'
1062 # elif COMPILER_VERSION_TWEAK == 6
1063  print *, 'INFO:compiler_version_TWEAK_digit_7[6]'
1064 # elif COMPILER_VERSION_TWEAK == 7
1065  print *, 'INFO:compiler_version_TWEAK_digit_7[7]'
1066 # elif COMPILER_VERSION_TWEAK == 8
1067  print *, 'INFO:compiler_version_TWEAK_digit_7[8]'
1068 # elif COMPILER_VERSION_TWEAK == 9
1069  print *, 'INFO:compiler_version_TWEAK_digit_7[9]'
1070 # endif
1071 
1072 # undef DEC
1073 # undef HEX
1074 # define DEC(n) DEC_8(n)
1075 # define HEX(n) HEX_8(n)
1076 # if COMPILER_VERSION_TWEAK == 0
1077  print *, 'INFO:compiler_version_TWEAK_digit_8[0]'
1078 # elif COMPILER_VERSION_TWEAK == 1
1079  print *, 'INFO:compiler_version_TWEAK_digit_8[1]'
1080 # elif COMPILER_VERSION_TWEAK == 2
1081  print *, 'INFO:compiler_version_TWEAK_digit_8[2]'
1082 # elif COMPILER_VERSION_TWEAK == 3
1083  print *, 'INFO:compiler_version_TWEAK_digit_8[3]'
1084 # elif COMPILER_VERSION_TWEAK == 4
1085  print *, 'INFO:compiler_version_TWEAK_digit_8[4]'
1086 # elif COMPILER_VERSION_TWEAK == 5
1087  print *, 'INFO:compiler_version_TWEAK_digit_8[5]'
1088 # elif COMPILER_VERSION_TWEAK == 6
1089  print *, 'INFO:compiler_version_TWEAK_digit_8[6]'
1090 # elif COMPILER_VERSION_TWEAK == 7
1091  print *, 'INFO:compiler_version_TWEAK_digit_8[7]'
1092 # elif COMPILER_VERSION_TWEAK == 8
1093  print *, 'INFO:compiler_version_TWEAK_digit_8[8]'
1094 # elif COMPILER_VERSION_TWEAK == 9
1095  print *, 'INFO:compiler_version_TWEAK_digit_8[9]'
1096 # endif
1097 
1098 #endif
1099 
1100  END
cmakefortrancompilerid
program cmakefortrancompilerid
Definition: CMakeFortranCompilerId.F:1