什么是未初始化的指针指向,我可以在fortran中检测到此状态

问题描述

system:
Mac OSX 15.something
gfortran 10.2.0

考虑以下程序及其输出

program main
  character(len=256),target :: c
  character(len=256),pointer :: p
  c = "foo bar"
  print *,associated(p)
  ! print *,p  -> gives segfault of course
  p => c
  print *,associated(p)
  print *,trim(p)
  nullify(p)
  print *,associated(p)
end program main
>>> ./a.out
T
T
foo bar
F

为什么p在第一次检查中显示它是关联的?它与什么相关?是否有可能检测到尚未初始化但仍表明已关联的指针?

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)