15、Fortran 变量声明与属性详解

Fortran 变量声明与属性详解

1. 指针与目标属性

1.1 指针引用规则

指针在使用前必须关联到一个可引用或定义的目标。例如：

! 面向实体的指针声明
TYPE (NODE), POINTER :: CURRENT
REAL, POINTER :: X (:, :), Y (:)
PROCEDURE (), POINTER :: HANDLER

! 面向属性的指针声明
TYPE (NODE) CURRENT
REAL X (:, :), Y (:)
PROCEDURE () :: HANDLER
POINTER CURRENT, X, Y, HANDLER

1.2 目标属性（TARGET）

具有 TARGET 属性的对象可以在程序执行期间成为指针的目标。该属性有助于编译器生成高效代码。若对象没有 TARGET 属性，则不能通过指针访问其任何部分；若对象具有该属性，则其所有子对象也具有该属性。

TARGET 属性可以在类型声明语句或 TARGET 语句中指定。 TARGET 语句的形式为：

TARGET [ :: ] object-name [ ( array-spec ) ] &
[ , object-name [ ( array-spec ) ] ] ...