指向派生类型的指针大小问题

kyra

Fortran的指针不能用 sizeof() 函数查看其本身的大小。

注意：fortran中，指针 a，只能访问它指向的内容，而不能访问指针本身。
也就是说，a 就是 C语言中的 *a。

如果你真的要知道指针的大小，可以这样做：

[Fortran] 纯文本查看 复制代码

type ss
  type(bigdata),pointer:: p
end type ss
type(ss) :: pss
print*,sizeof(pss)

你会发现，指向任何数据类型的指针，本身都是4字节（或64位系统的8字节）
而指向数组的指针，就比较大，通常一维数组会在30字节，二维数组更大一些（不同编译器结果不同）

这是因为，Fortran的指向数组的指针，除了C指针拥有的数组内容的首地址之外，还拥有这个数组的维度，大小，上下限等信息。