File: assign.fc3

package info (click to toggle)
ftnchek 3.1.2-2
  • links: PTS
  • area: main
  • in suites: woody
  • size: 6,436 kB
  • ctags: 5,393
  • sloc: ansic: 24,609; fortran: 5,565; yacc: 3,682; sh: 2,518; makefile: 772; lisp: 264; f90: 94; perl: 76
file content (122 lines) | stat: -rw-r--r-- 4,822 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

FTNCHEK Version 3.1 May 2001

File assign.f:
     10       c5 = 5Hhello
                   ^
Warning near line 10 col 12 file assign.f: hollerith constant may not be
 portable
                 ^
Error near line 10 col 10 file assign.f: type mismatch: holl*5 const 5Hhello 
 assigned to char*5 C5
     11       c5 = 11Hhello there
                   ^
Warning near line 11 col 12 file assign.f: hollerith constant may not be
 portable
                 ^
Error near line 11 col 10 file assign.f: type mismatch: holl*11 const 11Hhello
 there assigned to char*5 C5

Warning in module SIZEPROP in file assign.f: Variables declared but never
 referenced:
    C10 declared at line 4 file assign.f
    I declared at line 2 file assign.f (dummy argument)
    X declared at line 2 file assign.f (dummy argument)

Warning in module SIZEPROP in file assign.f: Variables may be used before set:
    C5 used at line 5 file assign.f
    C5 set at line 6 file assign.f
     31       i = m
                ^
Nonportable usage near line 31 col 9 file assign.f: mixed default and explicit 
 precision items: intg*4 M assigned to intg I
     34       i = i2
                ^
Nonportable usage near line 34 col 9 file assign.f: mixed default and explicit 
 precision items: intg*2 I2 assigned to intg I
     35       i = i4
                ^
Nonportable usage near line 35 col 9 file assign.f: mixed default and explicit 
 precision items: intg*4 I4 assigned to intg I
     36       i4 = i
                 ^
Nonportable usage near line 36 col 10 file assign.f: mixed default and
 explicit precision items: intg I assigned to intg*4 I4
     39       i = 4habcd
                  ^
Warning near line 39 col 11 file assign.f: hollerith constant may not be
 portable
                ^
Nonportable usage near line 39 col 9 file assign.f: mixed default and explicit 
 size items: holl*4 const 4Habcd assigned to intg I
     40       i = 8habcdefgh
                  ^
Warning near line 40 col 11 file assign.f: hollerith constant may not be
 portable
                ^
Nonportable usage near line 40 col 9 file assign.f: mixed default and explicit 
 size items: holl*8 const 8Habcdefgh assigned to intg I
     41       x = r4
                ^
Nonportable usage near line 41 col 9 file assign.f: mixed default and explicit 
 precision items: real*4 R4 assigned to real X
     42       x = r8
                ^
Nonportable usage near line 42 col 9 file assign.f: mixed default and explicit 
 precision items: real*8 R8 assigned to real X
     48       r16 = d
                  ^
Nonportable usage near line 48 col 11 file assign.f: mixed default and
 explicit precision items: dble D assigned to real*16 R16
     50       d = r4
                ^
Nonportable usage near line 50 col 9 file assign.f: mixed default and explicit 
 precision items: real*4 R4 assigned to dble D
     51       d = r8
                ^
Nonportable usage near line 51 col 9 file assign.f: mixed default and explicit 
 precision items: real*8 R8 assigned to dble D
     52       d = r16
                ^
Nonportable usage near line 52 col 9 file assign.f: mixed default and explicit 
 precision items: real*16 R16 assigned to dble D
     55       i = L4
                ^
Error near line 55 col 9 file assign.f: type mismatch: logl*4 L4 assigned to 
 intg I

Warning in module %MAIN in file assign.f: Variables declared but never
 referenced:
    C16 declared at line 29 file assign.f
    C32 declared at line 30 file assign.f
    J declared at line 13 file assign.f
    L declared at line 20 file assign.f
    L2 declared at line 21 file assign.f
    Y declared at line 17 file assign.f

Warning in module %MAIN in file assign.f: Variables used before set
    L4 used at line 55 file assign.f; never set
    R4 used at line 41 file assign.f; never set
    R8 used at line 42 file assign.f; never set

Warning in module %MAIN in file assign.f: Variables may be used before set:
    C used at line 43 file assign.f
    C set at line 53 file assign.f
    I2 used at line 34 file assign.f
    I2 set at line 38 file assign.f
    I4 used at line 35 file assign.f
    I4 set at line 36 file assign.f

 3 syntax errors detected in file assign.f
 21 warnings issued in file assign.f

Warning: Subprogram SIZEPROP argument data type mismatch at position 2:
    Dummy arg I in module SIZEPROP line 2 file assign.f is type intg
    Actual arg I2 in module %MAIN line 56 file assign.f is type intg*2
  and at position 3:
    Dummy arg X in module SIZEPROP line 2 file assign.f is type real
    Actual arg R16 in module %MAIN line 56 file assign.f is type real*16

Warning: Subprogram SIZEPROP argument usage mismatch at position 1:
    Dummy arg CADJ in module SIZEPROP line 2 file assign.f is modified
    Actual arg 'hello' in module %MAIN line 56 file assign.f is const or expr