From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <elfutils-devel-return-7501-listarch-elfutils-devel=sourceware.org@sourceware.org>
Received: (qmail 119198 invoked by alias); 2 May 2019 15:51:39 -0000
Mailing-List: contact elfutils-devel-help@sourceware.org; run by ezmlm
Precedence: bulk
List-Id: <elfutils-devel.sourceware.org>
List-Post: <mailto:elfutils-devel@sourceware.org>
List-Help: <mailto:elfutils-devel-help@sourceware.org>
List-Subscribe: <mailto:elfutils-devel-subscribe@sourceware.org>
Sender: elfutils-devel-owner@sourceware.org
Received: (qmail 119164 invoked by uid 48); 2 May 2019 15:51:36 -0000
From: "tromey at sourceware dot org" <sourceware-bugzilla@sourceware.org>
To: elfutils-devel@sourceware.org
Subject: [Bug tools/24509] eu-readelf does not know how to dissect DW_AT_discr_list
Date: Thu, 02 May 2019 15:51:00 -0000
X-Bugzilla-Reason: CC
X-Bugzilla-Type: changed
X-Bugzilla-Watch-Reason: None
X-Bugzilla-Product: elfutils
X-Bugzilla-Component: tools
X-Bugzilla-Version: unspecified
X-Bugzilla-Keywords:
X-Bugzilla-Severity: normal
X-Bugzilla-Who: tromey at sourceware dot org
X-Bugzilla-Status: NEW
X-Bugzilla-Resolution:
X-Bugzilla-Priority: P2
X-Bugzilla-Assigned-To: unassigned at sourceware dot org
X-Bugzilla-Target-Milestone: ---
X-Bugzilla-Flags:
X-Bugzilla-Changed-Fields:
Message-ID: <bug-24509-10460-zaX8YNTAiQ@http.sourceware.org/bugzilla/>
In-Reply-To: <bug-24509-10460@http.sourceware.org/bugzilla/>
References: <bug-24509-10460@http.sourceware.org/bugzilla/>
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
X-Bugzilla-URL: http://sourceware.org/bugzilla/
Auto-Submitted: auto-generated
MIME-Version: 1.0
X-SW-Source: 2019-q2/txt/msg00058.txt.bz2

https://sourceware.org/bugzilla/show_bug.cgi?id=3D24509

--- Comment #2 from Tom Tromey <tromey at sourceware dot org> ---
Here's one that uses both ranges and discrete elements:

package Rng is

   type Rec (I : Integer) is record
      case I is
         when Positive =3D>
            C : Character;
            case I is
               when 1..15 | 17 | 23 =3D>
                  null;
               when others =3D>
                  N : Natural;
            end case;
         when others =3D>
            S : String (1 .. 10);
      end case;
   end record;

   R : Rec (1);

end Rng;



And here's one that uses unsigned types:

package Urng is

   type Unsigned is mod 65536;
   type Rec (I : Unsigned) is record
      case I is
         when 17 | 23 | 32768..65535 =3D>
            null;
         when others =3D>
            S : String (1 .. 10);
      end case;
   end record;

   R : Rec (1);

end Urng;

--=20
You are receiving this mail because:
You are on the CC list for the bug.