comp.lang.ada
 help / color / mirror / Atom feed
From: cis.ohio-state.edu!zaphod.mps.ohio-state.edu!howland.reston.ans.net!darwi
Subject: Help!!  (discriminated records)
Date: 1 May 93 22:51:51 GMT	[thread overview]
Message-ID: <1ruuu7$4s9@dekalb.DC.PeachNet.EDU> (raw)

I would appreciate it greatly if someone would give me some help
with a problem I'm having..

The type declaration looks like this:

subtype Length_Range is Integer range 0..21;
private
   type Token(Length : Length_Range := 0) is
    record
       Text: String(1..Length);
    end record;
 Tok : Token;

I'm trying to assign a string called temp which contains ("THIS") 
to text...

I've tried:
            Tok(4).Text := temp;
            Tok(4).Text(1..4) := temp;
            Tok(4).Text(1..4) := temp(1..4);
            Tok.Text := temp;
              
  Unfortunately this is the Prof's specifications so I can't change
  anything....

  I'm using the Meridian 4.1.4 compiler..
 I would greatly appreciate it if someone/anyone could help....


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~
                                Melonie Bennett  
                    	  melonie@bullen.gatech.edu
                       melonie@dekalb.dc.peachnet.edu 
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~

                 reply	other threads:[~1993-05-01 22:51 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed
replies disabled

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