comp.lang.ada
 help / color / mirror / Atom feed
From: s9406722@yallara.cs.rmit.OZ.AU (Hylton Raymond Peimer)
Subject: saving variant records in sequential files
Date: 13 Oct 1994 02:53:09 GMT
Date: 1994-10-13T02:53:09+00:00	[thread overview]
Message-ID: <37i7el$4gd@goanna.cs.rmit.oz.au> (raw)

Hi you cool Ada programmer. Take a look at this:

with sequential_io;

procedure test is

type data (info : integer) is record
  case info is
    when 1 => 
      a : integer;
      b : float;
      c : natural;
    when 2 =>
      z : float;
    when others => null;
  end case;
end record;

package dat_file is new sequential_io(data); -- (1)

begin
  null;
end test; 

The package I created on line (1) wont compile under Meridian Ada compiler.
It is because I haven't constrained it as:

    package dat_file is new sequential_io(data(1));

or something similar.

Is Meridian wrong or is this an Ada83/9X feature?
--
   Hylton Peimer  --  s9406722@yallara.cs.rmit.edu.au  --  Team Ada!



             reply	other threads:[~1994-10-13  2:53 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1994-10-13  2:53 Hylton Raymond Peimer [this message]
1994-10-13 10:46 ` saving variant records in sequential files Tucker Taft
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox