INTERFACE BuffOWrDotT; FROM BuffOWr IMPORT B; IMPORT OWr; PROCEDURE NewB (self: B; wr: OWr.T; size: CARDINAL := 0): B; END BuffOWrDotT.