comp.lang.ada
 help / color / mirror / Atom feed
From: tmoran@acm.org
Subject: Re: Disriminant question
Date: Fri, 07 Mar 2003 17:59:08 GMT
Date: 2003-03-07T17:59:08+00:00	[thread overview]
Message-ID: <M55aa.373$6b3.5392@rwcrnsc51.ops.asp.att.net> (raw)
In-Reply-To: slrnb6h038.nt.lutz@taranis.iks-jena.de

>  Put_Line ("disk1'Size =" & Natural'Image (disk1'Size));
The original question was whether you could change the discriminant.
Replacing all occurrences of "'Size" with ".some_disc" in program t
results in:
disk1.some_disc = 1
disk3.some_disc = 3
disk.some_disc = 1
disk.some_disc = 3
d.some_disc = 1
d.some_disc = 2
d.some_disc = 3
d.some_disc = 4
d.some_disc = 5
e.some_disc = 1
e.some_disc = 2
e.some_disc = 3
e.some_disc = 4
e.some_disc = 5
  So the discriminant does change correctly.  If you want to change
the 'Size of a record, that's a different question.



  reply	other threads:[~2003-03-07 17:59 UTC|newest]

Thread overview: 9+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-03-07  7:09 Disriminant question prashna
2003-03-07  8:01 ` tmoran
2003-03-07 11:20   ` Lutz Donnerhacke
2003-03-07 17:59     ` tmoran [this message]
2003-03-07 22:32       ` Lutz Donnerhacke
2003-03-07 11:17 ` Lutz Donnerhacke
2003-03-07 16:46   ` Matthew Heaney
2003-03-12  9:25     ` Disriminant question - Waiting desperately for solution :-( prashna
2003-03-12 16:12       ` Gautier
replies disabled

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