blob: 367b0bc9f234ddf666c25b2195fa7c8f1cb0d491 [file] [edit]
! RUN: %python %S/test_errors.py %s %flang_fc1
character(len=20) :: a, b
if (sizeof(a) == sizeof(x=b)) then
print *, "pass"
else
print *, "fail"
end if
!ERROR: unknown keyword argument to intrinsic 'sizeof'
print *, sizeof(a=a)
end