Re: Child package: private type and IO

[sparre@cats.nbi.dk]

John <johnjohn@triceratops.com> wrote:

> I'm trying to write two separate packages, one for a private
> type and constructor, and the other an IO package.  House
> rules. :(

Good rules!

I would have been nice if you posted more code (and told us that you are using
GNAT :-).

GNAT has some rather strict rules for the names of source files. If you are in
doubt about them, run "gnatchop" on your individual source files, and see how
it splits the source up and names the files.

A parent-client package example:

   --  file: parent.ads

   package Parent is

      type Object is ...;

      function Initialise return Object;

   end Parent;

   --  file: parent-child.ads

   with Ada.Text_IO;

   package Parent.Child is

      procedure Put (File : in     Ada.Text_IO.File_Type;
                     Item : in     Object);

      procedure Get (File : in     Ada.Text_IO.File_Type;
                     Item :    out Object);

   end Parent.Child;

You will of cause also need implementations (package bodies) for these
specifications.

Jacob Sparre Andersen

-- Have you played with your LEGO today?

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/   Now offering spam-free web-based newsreading