Syntax:
pragma Psect_Object (
     [Internal =>] LOCAL_NAME,
  [, [External =>] EXTERNAL_SYMBOL]
  [, [Size     =>] EXTERNAL_SYMBOL]);
EXTERNAL_SYMBOL ::=
  IDENTIFIER
| static_string_EXPRESSION
This pragma is identical in effect to pragma Common_Object.