~ubuntu-branches/ubuntu/edgy/ftnchek/edgy

« back to all changes in this revision

Viewing changes to test/Okay/autoarray.fcl

  • Committer: Bazaar Package Importer
  • Author(s): Mark Brown
  • Date: 2002-03-28 10:49:50 UTC
  • Revision ID: james.westby@ubuntu.com-20020328104950-kssfxlf8u0qsfelr
Tags: upstream-3.1.2
ImportĀ upstreamĀ versionĀ 3.1.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
 
 
2
FTNCHEK Version 3.1 May 2001
 
3
 
 
4
File autoarray.f:
 
5
 
 
6
      1       program main
 
7
      2       call test(100)
 
8
      3       end
 
9
 
 
10
Module MAIN: prog
 
11
 
 
12
External subprograms referenced:
 
13
 
 
14
      TEST: subr   
 
15
 
 
16
 
 
17
 
 
18
      4       subroutine test(n)
 
19
      5       integer n
 
20
      6 C the following local array cannot have variable bounds.
 
21
      7       integer auto(n)
 
22
                           ^
 
23
Warning near line 7 col 20: Nonstandard syntax: local array cannot have
 
24
 variable size
 
25
      8       auto(1) = 5
 
26
      9       auto(2) = auto(1)*2
 
27
     10       end
 
28
 
 
29
Module TEST: subr
 
30
 
 
31
Variables:
 
32
 
 
33
      Name Type Dims     Name Type Dims     Name Type Dims     Name Type Dims
 
34
      AUTO intg  1          N intg   
 
35
 
 
36
 
 
37
 
 
38
 
 
39
 0 syntax errors detected in file autoarray.f
 
40
 1 warning issued in file autoarray.f
 
41