文字列宣言が一貫していません

一貫していないデータ宣言が見つかりました。

2 つのコンパイル単位で同じ名前の文字列が宣言されましたが、文字列のサイズが一致していません。

ID

問題箇所

説明

1

定義

1 つ目の宣言

2

定義

2 つ目の宣言


! Use the option /align:commons for this test.
!
subroutine mysub()
    character(7) :: s
    real :: a
    common /abc/ s,a
    print *,a,s
end

real :: a
character(5) :: s
common /abc/ s,a
! different size of "s" in "/abc/". See...
a = 3.14
s = "Hello"
call mysub()
end
        

© 2010 Intel Corporation. 無断での引用、転載を禁じます。