blob: cd3d8bf3fb00c18e0a6ed2aad62f00f2528ffb30 (
plain)
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
|
Author: Ole Streicher <olebole@debian.org>
Description: Fix size of MADRID array in test
When gfortran-6 is called with an optimization (-O1 or higher), arrays with a
length 1 seem to be converted to a scalar and assumed to always return the same
value.
.
This fails with the MADRID array, which is a placeholder for an array.
Specifically ftoc_commf.for fails then, which leads to a missing ftoc_comm.h.
.
The simple workaround is to use a size > 1 here.
.
Note that the MADRID array is defined with a length=1 in ~350 places all over
eso-midas. They are not changed yet since the verification succeeds. If we get
strange bugreports, this may be considered as the problem.
--- a/system/ftoc-new/ftoc_commf.for
+++ b/system/ftoc-new/ftoc_commf.for
@@ -34,7 +34,7 @@
C
PROGRAM F2CCOM
C
- INTEGER MADRID(1)
+ INTEGER MADRID(3)
INTEGER VALUE(3)
INTEGER STAT,MANY,NOPIX,NOBYT
INTEGER*8 PNTR
|