[Bug fortran/50937] STAT option with ALLOCATE statement on large arrays

["fwi at inducks dot org" <gcc-bugzilla at gcc dot gnu dot org>]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=50937

--- Comment #2 from fwi at inducks dot org 2011-10-31 18:15:57 UTC ---
With "E=1.0D0" instead of "E(N,N,N,N)=1.0D0"

$ gfortran test.f90; for i in `seq -w 10 10 400`; do LANG=C ./a.out $i; done
 Sucesfully allocated array of size           10 **4
 Sucesfully allocated array of size           20 **4
 Sucesfully allocated array of size           30 **4
 Sucesfully allocated array of size           40 **4
 Sucesfully allocated array of size           50 **4
 Sucesfully allocated array of size           60 **4
 Sucesfully allocated array of size           70 **4
 Sucesfully allocated array of size           80 **4
 Sucesfully allocated array of size           90 **4
 Sucesfully allocated array of size          100 **4
 Sucesfully allocated array of size          110 **4
 Sucesfully allocated array of size          120 **4
 Could not allocate array of size          130 **4, error code=        5014
 Could not allocate array of size          140 **4, error code=        5014
 Could not allocate array of size          150 **4, error code=        5014
 Sucesfully allocated array of size          160 **4
Erreur de segmentation
 Could not allocate array of size          170 **4, error code=        5014
 Could not allocate array of size          180 **4, error code=        5014
 Sucesfully allocated array of size          190 **4
Erreur de segmentation
 Could not allocate array of size          200 **4, error code=        5014
 Could not allocate array of size          210 **4, error code=        5014
 Sucesfully allocated array of size          220 **4
Erreur de segmentation
 Sucesfully allocated array of size          230 **4
Erreur de segmentation
 Sucesfully allocated array of size          240 **4
Erreur de segmentation
 Sucesfully allocated array of size          250 **4
Erreur de segmentation
 Could not allocate array of size          260 **4, error code=        5014
 Could not allocate array of size          270 **4, error code=        5014
 Sucesfully allocated array of size          280 **4
Erreur de segmentation
 Sucesfully allocated array of size          290 **4
Erreur de segmentation
 Sucesfully allocated array of size          300 **4
Erreur de segmentation
 Sucesfully allocated array of size          310 **4
Erreur de segmentation
 Could not allocate array of size          320 **4, error code=        5014
 Sucesfully allocated array of size          330 **4
Erreur de segmentation
 Could not allocate array of size          340 **4, error code=        5014
 Could not allocate array of size          350 **4, error code=        5014
 Sucesfully allocated array of size          360 **4
Erreur de segmentation
 Could not allocate array of size          370 **4, error code=        5014
 Could not allocate array of size          380 **4, error code=        5014
 Sucesfully allocated array of size          390 **4
Erreur de segmentation
 Could not allocate array of size          400 **4, error code=        5014

(Excuse the non-English words, "Erreur de segmentation" really means
"Segmentation fault").

I am using Ubuntu 10.04.3 LTS (32-bit) with:

$ cat /proc/cpuinfo
processor    : 0
vendor_id    : GenuineIntel
cpu family    : 6
model        : 23
model name    : 
stepping    : 10
cpu MHz        : 2493.666
cache size    : 1024 KB
physical id    : 0
siblings    : 2
core id        : 0
cpu cores    : 2
apicid        : 0
initial apicid    : 0
fdiv_bug    : no
hlt_bug        : no
f00f_bug    : no
coma_bug    : no
fpu        : yes
fpu_exception    : yes
cpuid level    : 13
wp        : yes
flags        : fpu vme de pse tsc msr pae mce cx8 apic sep mtrr pge mca cmov
pat pse36 clflush dts acpi mmx fxsr sse sse2 ss ht tm pbe nx lm constant_tsc
arch_perfmon pebs bts aperfmperf pni dtes64 monitor ds_cpl vmx est tm2 ssse3
cx16 xtpr pdcm xsave lahf_lm tpr_shadow vnmi flexpriority
bogomips    : 4987.33
clflush size    : 64
cache_alignment    : 64
address sizes    : 36 bits physical, 48 bits virtual