package Zoom.Records is type Rec is private; -- Waiting for outcome of discussions on this class -- In the mean time provide 'Render' to allow -- 'Hello World' example -- procedure Render (This : Rec); private type Rec is null record; end Zoom.Records;