[7847] in Athena Bugs
decmips 7.2R: f77
daemon@ATHENA.MIT.EDU (ellis@ATHENA.MIT.EDU)
Wed Jul 31 12:08:19 1991
From: ellis@ATHENA.MIT.EDU
To: bugs@ATHENA.MIT.EDU
Date: Wed, 31 Jul 91 12:08:17 EDT
System name: m33-222-7
Type and version: KN01 7.2R
Display type: PM-MONO
What were you trying to do?
Initialize a large character array in a block data statement
Example code:
block data testda
implicit character*1 (a-d)
c
common /steve/ a(8000),b(4000)
data a /'1',7999*'2'/
data b /'2',3999*'2'/
c
end
What's wrong:
The compile dies with the following message
out of swap space, pid 26307, proc ugen2.1
ugen: internal : line 0 : symbol.p, line 251
Insufficiant memory
What should have happened:
The code should compile.
Please describe any relevant documentation references:
Fortran language reference manual.
