From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.8 required=5.0 tests=BAYES_00,INVALID_DATE,
	MSGID_SHORT autolearn=no autolearn_force=no version=3.4.4
Path: utzoo!dptcdc!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!cs.utexas.edu!uunet!pyrdc!gmu90x!mcragg
From: mcragg@gmu90x.UUCP (Maureen Cragg)
Newsgroups: comp.lang.ada
Subject: instantiating io for variant records
Keywords: help
Message-ID: <1923@gmu90x.UUCP>
Date: 17 Apr 89 18:32:56 GMT
Organization: George Mason University, Fairfax, Va.
List-Id: <comp.lang.ada>

i have a variant record type defined, something like this:

type field_type is (id, date, text);
type record_type(field : field_type);
type rec_ptr is access record_type;
type record_type(field : field_type) is
   record
     previous : rec_ptr := null;
     next     : rec_ptr := null;
     case field is
        when id =>
           id : integer;
        when date =>
           date : calendar.time;
        when text =>
           line : string(1..80);
     end case;
   end record;

for the purpose of storing different types of info in the same record,
as well as varying numbers of the same type(the text is used to store
free-format data, entered via an text editor:can be any number of lines).

so how does one instantiate sequential_io for this record_type? this:

package rec_io is new sequential_io(record_type);

gives the error msg: "generic package/subprogram spec/body requires
                       a constrained type"

adTHANXvance for any suggestions.
the air drummer