To: J3                                                     J3/26-132
From: Steve Lionel & JOR
Subject: UTI34 PROCEDURE_NAME in interface body
Date: 2026-March-30

Reference: 26-007r1

In UTI34, the Editor writes, "PROCEDURE_NAME is inadequately
defined for interface bodies." and suggests:

  ... that in the case of an interface body, PROCEDURE_NAME should
  return the name of the procedure whose interface is being declared,
  viz the subroutine-name or function-name in the SUBROUTINE or
  FUNCTION statement, and it should return that for CONTEXT=.TRUE. as well.

Edits are provided to address this deficiency.

Edits to 26-007r1
-----------------

[559:6+]. 17.10.2.29p5 PROCEDURE_NAME

For the set of cases when CONTEXT is absent or false, insert a new Case (i)
and renumber the existing cases as (ii) through (v):

Case (i): If the reference appears within an interface-body, the result
value is the subroutine-name or function-name of the procedure whose interface
is being declared.

(Note - this case must appear before the one for a subprogram.)

[559:7]

For the new case (ii), formerly (i), replace:

"If the reference"

with:

"Otherwise, if the reference"

[559:21+]

For the set of cases where CONTEXT is present and has the value true,
insert a new Case (i) and renumber the existing cases as (ii) through (vi).

Case (i): If the reference appears within an interface-body, the result
is as if CONTEXT was absent.

[559:22]

For the new case (ii), formerly (i), replace:

"If the reference"

with:

"Otherwise, if the reference"

[560:28+]

Remove Unresolved Technical Issue 34

--END--