问题描述
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 (将#修改为@)