关于数组指针变量的问题
这个问题的来源是来自于彭国伦《fotran95程序设计》中第十章的EX1009.F90。这部分主要的知识点是想要说明对自定义类型的交换，指针交换比变量交换更加节省空间。
但是在程序交换的过程中我发现了如下问题。
type(person),pointer::p(:)
type(person),target::pp(5)=(/此处赋值省略/)
p=>pp
在子程序中有这么一段交换
type pperson
type(person),pointer::p
end type
if(p(i)%p%height<p(j)%p%height) then
temp=p(i)
p(i)=p(j)
p(j)=temp
end if
但是为了简化，我尝试着不设置pperson这一自定义变量，于是就有开始的声明，因此我的交换语句就变成如下：
if(p(i)%height<p(j)%height) then
temp=>p(i)
p(i)=>p(j)
p(j)=>temp
end if
之后就报错：access violation
经过调试，错误首先发现在 p(i)=>p(j) 这一语句中，也就说明指针数组中的指针不可以进行二次指向。
请问这是什么原因？ Fortran 没有指针数组，只有指向数组的指针。
页:
[1]