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.3 required=5.0 tests=BAYES_00,FREEMAIL_FROM,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,a072745e2e39f048,start
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-11-09 06:11:14 PST
Path: 
 archiver1.google.com!news2.google.com!fu-berlin.de!uni-berlin.de!dedd8.d.pppool.DE!not-for-mail
From: Stefan Soos <stefan.soos@gmx.de>
Newsgroups: comp.lang.ada
Subject: Different initial values for derived type?
Date: Sun, 9 Nov 2003 15:10:06 +0100
Message-ID: <urhlob.092.ln@ID-soos.user.dfncis.de>
Reply-To: stefan.soos@gmx.de
NNTP-Posting-Host: dedd8.d.pppool.de (80.184.237.216)
X-Trace: news.uni-berlin.de 1068387072 45423592 80.184.237.216 (16 [16707])
X-Orig-Path: ID-soos.user.dfncis.de!nobody
User-Agent: slrn/0.9.7.4 (Linux)
Xref: archiver1.google.com comp.lang.ada:2280
Date: 2003-11-09T15:10:06+01:00
List-Id: <comp.lang.ada>

Hello,

I've got the following type definition

     type Object_Type is tagged 
	  record
		Name  : Character := '?';
		Score : Natural   := 0;
		X	: Positive  := 1;
		Y     : Positive  := 1;
	  end record;
Now I'd like to have a derived type with the same components
but with different initial Values. Do I have to use discriminants for
all of my components or can I say something like

    type Derived_Type is new Object_Type with ( Name  => '!', 
					        Score => 10); 
I know, I can't because it doesn't compile, but is there a
similar approach?


Thanks in advance,
Stefan

--