83b462af17
Adds a hint to the warning message to disable a warning and updates the tests to expect this. Also fixes a bug in the storage of canonical spelling of error flags so that they are not used after free.
13 lines
503 B
Fortran
13 lines
503 B
Fortran
! RUN: %python %S/test_errors.py %s %flang_fc1 -pedantic
|
|
!ERROR: Character in intrinsic function ichar must have length one
|
|
print *, ichar('')
|
|
!ERROR: Character in intrinsic function iachar must have length one
|
|
print *, iachar('')
|
|
print *, ichar('a')
|
|
print *, iachar('a')
|
|
!PORTABILITY: Character in intrinsic function ichar should have length one [-Wportability]
|
|
print *, ichar('ab')
|
|
!PORTABILITY: Character in intrinsic function iachar should have length one [-Wportability]
|
|
print *, iachar('ab')
|
|
end
|
|
|