MODULE AST_Name;

IMPORT Fmt;

PROCEDURE Null(n: NODE): TEXT RAISES {}=
  BEGIN
    RETURN "no name for node with typecode " & Fmt.Int(TYPECODE(n));
  END Null;

BEGIN

END AST_Name.