(* Copyright (C) 1990, Digital Equipment Corporation           *)
(* All rights reserved.                                        *)
(* See the file COPYRIGHT for a full description.              *)

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.