Hosted by
-- $Date: 2004/02/25 07:05:37 $ -- $Revision: 1.2 $ -- $Author: jcrocholl $ with Collectors; use Collectors; package Parts.Output is procedure Add (To : access Collector'Class; This : access Part); end Parts.Output;