1 !RUN: %flang_fc1 -fdebug-dump-symbols %s | FileCheck %s
2 !Resolve names in legacy data initializers
5 integer, parameter :: bar
= 1
6 integer foo(bar
) /bar
*2/ !CHECK: foo (InDataStmt) size=4 offset=4: ObjectEntity type: INTEGER(4) shape: 1_8:1_8 init:[INTEGER(4)::2_4]