BASED は、宣言された名前が基底付き変数であることを示すストレージ クラス属性です。形式は次のとおりです。
BASED[(r)]
オプションの r は、ロケーター変数またはロケーター値関数への参照であり、名前への修飾なしの参照に対するデフォルト (暗黙) のロケーター修飾子として機能します。