File tree Expand file tree Collapse file tree 1 file changed +3
-0
lines changed Expand file tree Collapse file tree 1 file changed +3
-0
lines changed Original file line number Diff line number Diff line change @@ -11,11 +11,13 @@ subroutine s(var)
11
11
real :: realvar3 = 4.0Q6
12
12
! PORTABILITY: Explicit kind parameter together with non-'E' exponent letter is not standard
13
13
real :: realvar4 = 4.0D6_8
14
+ ! AIX_WARNING: underflow on REAL(10) to REAL(8) conversion
14
15
! WARNING: Explicit kind parameter on real constant disagrees with exponent letter 'q'
15
16
real :: realvar5 = 4.0Q6_10
16
17
! PORTABILITY: Explicit kind parameter together with non-'E' exponent letter is not standard
17
18
real :: realvar6 = 4.0Q6_16
18
19
real :: realvar7 = 4.0E6_8
20
+ ! AIX_WARNING: underflow on REAL(10) to REAL(8) conversion
19
21
real :: realvar8 = 4.0E6_10
20
22
real :: realvar9 = 4.0E6_16
21
23
! ERROR: Unsupported REAL(KIND=32)
@@ -29,6 +31,7 @@ subroutine s(var)
29
31
! PORTABILITY: Explicit kind parameter together with non-'E' exponent letter is not standard
30
32
double precision :: doublevar5 = 4.0Q6_16
31
33
double precision :: doublevar6 = 4.0E6_8
34
+ ! AIX_WARNING: underflow on REAL(10) to REAL(8) conversion
32
35
double precision :: doublevar7 = 4.0E6_10
33
36
double precision :: doublevar8 = 4.0E6_16
34
37
! ERROR: Unsupported REAL(KIND=32)
You can’t perform that action at this time.
0 commit comments