comp.lang.ada
 help / color / mirror / Atom feed
From: Shark8 <onewingedshark@gmail.com>
Subject: Re: Odd subtyping error.
Date: Fri, 5 Oct 2012 14:00:52 -0700 (PDT)
Date: 2012-10-05T14:00:52-07:00	[thread overview]
Message-ID: <5e6b8e61-50c5-4398-9407-60276a070f4f@googlegroups.com> (raw)
In-Reply-To: <99b6ed38-0a44-4649-82b7-0b724fa5e68f@googlegroups.com>

    Package Subtype_Error is
	Type Base_Type is (
		   Item_1, Item_2, Item_3, Item_4, Item_5
		   ) with Size => Integer'Size;

	SubType Derived_Type is Base_Type Range Item_2..Item_4;
    Private
	For Base_Type Use
	  (
		Item_1	=> 18,
		Item_2	=> 21,
		Item_3	=> 22,
		Item_4	=> 25,
		Item_5	=> 28
   	  );
    End Subtype_Error;



  parent reply	other threads:[~2012-10-05 21:00 UTC|newest]

Thread overview: 11+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2012-10-05 16:05 Odd subtyping error Shark8
2012-10-05 18:12 ` Niklas Holsti
2012-10-05 18:44   ` Adam Beneschan
2012-10-05 21:08   ` Shark8
2012-10-05 21:00 ` Shark8 [this message]
2012-10-05 22:11   ` Adam Beneschan
2012-10-05 22:19     ` Shark8
2012-10-06  3:08       ` Adam Beneschan
2012-10-06  4:40         ` Shark8
2012-10-06 21:21       ` sbelmont700
2012-10-06 22:08         ` Shark8
replies disabled

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