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

(* File: PackedType.i3                                         *)
(* Last Modified On Sun Jul 23 11:01:36 1989 By kalsow         *)

INTERFACE PackedType;

IMPORT Type, Token;

PROCEDURE Parse (READONLY fail: Token.Set): Type.T;

PROCEDURE New (size: INTEGER;  base: Type.T): Type.T;

PROCEDURE Split (t: Type.T;  VAR size: INTEGER;  VAR base: Type.T): BOOLEAN;

PROCEDURE Strip (t: Type.T): Type.T;

END PackedType.