(* Copyright (C) 1989, Digital Equipment Corporation *) (* All rights reserved. *) (* See the file COPYRIGHT for a full description. *) (* File: BitSize.i3 *) (* Last Modified On Thu Jul 27 17:14:08 1989 By muller *) (* Modified On Tue Jun 27 13:40:31 1989 By kalsow *) INTERFACE BitSize; IMPORT Text, Expr, Temp; PROCEDURE Initialize (); PROCEDURE CheckArg (name: Text.T; args: Expr.List); PROCEDURE Gen (e: Expr.T; unit: INTEGER): Temp.T; PROCEDURE GetSize (e: Expr.T; unit: INTEGER): Expr.T; END BitSize.