[4584] in Athena Bugs
vax 6.4R: fortran compiler
daemon@ATHENA.MIT.EDU (ellis@ATHENA.MIT.EDU)
Wed Mar 21 10:54:05 1990
From: ellis@ATHENA.MIT.EDU
To: bugs@ATHENA.MIT.EDU
Date: Wed, 21 Mar 90 10:53:50 EST
System name: E40-369-2
Type and version: CVAXSTAR 6.4R
Display type: SM
What were you trying to do?
compile the following fortran program:
c ***DECLARATIONS***
10 character*(48) A(12)
c
c ***INTENSITY PROFILE ARRAY***
A(1)=' * '
A(2)=' * *'
A(3)=' * * *'
A(4)=' * * * *'
A(5)=' * * * * *'
A(6)=' * * * * * *'
A(7)=' * * * * * * *'
A(8)=' * * * * * * * *'
A(9)=' * * * * * * * * *'
A(10)=' * * * * * * * * * *'
A(11)=' * * * * * * * * * * *'
A(12)=' * * * * * * * * * * * *'
if (i .ne. 0) then
go to 10
endif
end
What's wrong:
The compilation of this program gives:
f77 assign3.f
assign3.f:
MAIN:
Undefined:
L11
What should have happened:
The "go to 10" is illegal since the label 10 is not on an
executable statement. Compiler should give error message.
Note that some variations of the above program such as:
c ***DECLARATIONS***
10 character*1 a(10)
a(1) = 'y'
if ( i .eq. 1) then
go to 10
endif
end
give slightly different messages, e.g.
f77 assign3.f
assign3.f:
MAIN:
Assembler:
"/tmp/fort28939.s", line 43: WARNING: brb: destination label is external
Undefined:
L11
Please describe any relevant documentation references:
Para. 3-4 ANSI X3.9-1978 Programming Language Fortran
