File: comclash.fcl

package info (click to toggle)
ftnchek 2.11.2-2
  • links: PTS
  • area: main
  • in suites: potato
  • size: 5,392 kB
  • ctags: 2,790
  • sloc: ansic: 21,570; fortran: 2,921; yacc: 2,794; sh: 1,623; makefile: 693; lisp: 264; awk: 163
file content (129 lines) | stat: -rw-r--r-- 3,111 bytes parent folder | download
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129

FTNCHEK Version 2.11 July 1999

File comclash.f:

      1 	common /abc/ x,y,z
      2 	abc = 5
      3 	x = abc
      4 	end

Module %MAIN: prog

Common blocks referenced:

       ABC         

Variables:
 
      Name Type Dims     Name Type Dims     Name Type Dims     Name Type Dims
       ABC real*            X real*            Y real*            Z real*  

* Variable not declared. Type has been implicitly defined.



      5 	subroutine sub1
      6 	common /abc/ x,y,z
      7 	real abc(5)
      8 	x = abc(1)
      9 	call sub2(x,y)
     10 	call sub2(1.0,2)
     11 	end

Module SUB1: subr

External subprograms referenced:

      SUB2: subr   

Common blocks referenced:

       ABC         

Variables:
 
      Name Type Dims     Name Type Dims     Name Type Dims     Name Type Dims
       ABC real  1          X real*            Y real*            Z real*  

* Variable not declared. Type has been implicitly defined.


Warning: Variables used before set:
       ABC         


     12 	subroutine sub2(a,b)
     13 	common /abc/ x,i,z
     14 	x = abc(1)
     15 	end

Module SUB2: subr

External subprograms referenced:

       ABC: real*  

Common blocks referenced:

       ABC         

Variables:
 
      Name Type Dims     Name Type Dims     Name Type Dims     Name Type Dims
         A real*            B real*            I intg*            X real*  
         Z real*  

* Variable not declared. Type has been implicitly defined.


Warning: Variables declared but never referenced:
         A*                 B*        
  * Dummy argument


     16 	function abc(n)
     17 	abc = n*n
     18 	end

Module ABC: func: real*

Variables:
 
      Name Type Dims     Name Type Dims     Name Type Dims     Name Type Dims
       ABC real*            N intg*  

* Variable not declared. Type has been implicitly defined.



Nonportable usage: File contains tabs

 0 syntax errors detected in file comclash.f
 7 warnings issued in file comclash.f

Common block ABC:
  Elements never used, never set: Z
Warning: Common block and subprogram have same name (nonstandard)
    Common block ABC declared in module SUB2 line 13 file comclash.f
    Subprogram ABC declared in module ABC line 16 file comclash.f
Common block ABC: data type mismatch
  at position 2:
    Variable Y has type real in module %MAIN line 1 file comclash.f
    Variable I has type intg in module SUB2 line 13 file comclash.f
Subprogram SUB1 never invoked
    defined in module SUB1 line 5 file comclash.f
Subprogram SUB2 never invoked
    defined in module SUB2 line 12 file comclash.f
Subprogram SUB2:  argument usage mismatch
  at position 1:
    Dummy arg A in module SUB2 line 12 file comclash.f
      is aliased to common block ABC var #1 X which is modified
    Actual arg X in module SUB1 line 9 file comclash.f
      is in common block ABC
Subprogram SUB2:  argument data type mismatch
  at position 2:
    Dummy arg B is type real  in module SUB2 line 12 file comclash.f
    Actual arg 2 is type intg  in module SUB1 line 10 file comclash.f
Subprogram ABC never invoked
    defined in module ABC line 16 file comclash.f