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

(* File: EnumElt.i3                                            *)
(* Last Modified On Wed Jul  5 09:50:14 1989 By kalsow         *)

INTERFACE EnumElt;

IMPORT Type, String, Value;

PROCEDURE New (name: String.T;  value: INTEGER;  parent: Type.T): Value.T;

PROCEDURE OrdValue (enum: Value.T): INTEGER;

END EnumElt.