! { dg-do compile }
! PR32360 Won't compile 'data ptr1 /null ()/' when ptr1 has pointer attribute.
integer, pointer :: ptr1
data ptr1 /NULL()/
end