Summary

###########################################################################

	File:     procname.icn

	Subject:  Procedure to produce name of procedure

	Author:   Ralph E. Griswold

	Date:     May 2, 2001

###########################################################################

   This file is in the public domain.

###########################################################################

  procname(p, x) produces the name of a procedure from a procedure value.
  Here, the term "procedure" includes functions, operators, and
  record constructors.

  If x is null, the result is derived from image() is a relatively
  straightforward way.  In the case of operators, the number of
  arguments is appended to the operator symbol.

  If x is nonnull, the result is put in a form that resembles an Icon
  expression.

  procname() fails if p is not of type procedure.

###########################################################################

This file is part of the (main) package.

procname(p, x)