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.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD, FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4 X-Google-Thread: 103376,799bdb14b530ce1d,start X-Google-NewGroupId: yes X-Google-Attributes: gida07f3367d7,domainid0,public,usenet X-Google-Language: ENGLISH,ASCII-7-bit Received: by 10.66.85.137 with SMTP id h9mr2494994paz.16.1349453145902; Fri, 05 Oct 2012 09:05:45 -0700 (PDT) Received: by 10.68.219.198 with SMTP id pq6mr3291148pbc.0.1349453145885; Fri, 05 Oct 2012 09:05:45 -0700 (PDT) Path: t10ni23613332pbh.0!nntp.google.com!kt20no11062354pbb.1!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail Newsgroups: comp.lang.ada Date: Fri, 5 Oct 2012 09:05:45 -0700 (PDT) Complaints-To: groups-abuse@google.com Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=69.20.190.126; posting-account=lJ3JNwoAAAAQfH3VV9vttJLkThaxtTfC NNTP-Posting-Host: 69.20.190.126 User-Agent: G2/1.0 MIME-Version: 1.0 Message-ID: <99b6ed38-0a44-4649-82b7-0b724fa5e68f@googlegroups.com> Subject: Odd subtyping error. From: Shark8 Injection-Date: Fri, 05 Oct 2012 16:05:45 +0000 Content-Type: text/plain; charset=ISO-8859-1 Date: 2012-10-05T09:05:45-07:00 List-Id: I'm making a new OpenGL binding taking advantage of Ada 2012 and have come across several interesting errors, including a compiler-bug... but this one is by far the oddest: Type Pixel_Storage is ( UNPACK_SWAP_BYTES, UNPACK_LSB_FIRST, UNPACK_ROW_LENGTH, UNPACK_SKIP_ROWS, UNPACK_SKIP_PIXELS, UNPACK_ALIGNMENT, PACK_SWAP_BYTES, PACK_LSB_FIRST, PACK_ROW_LENGTH, PACK_SKIP_ROWS, PACK_SKIP_PIXELS, PACK_ALIGNMENT, PACK_SKIP_IMAGES, PACK_IMAGE_HEIGHT, UNPACK_SKIP_IMAGES, UNPACK_IMAGE_HEIGHT ) with Size => Enum'Size; SubType Pixel_Packing is Pixel_Storage Range PACK_SWAP_BYTES..PACK_IMAGE_HEIGHT; Unless I'm just completely misunderstanding the above should be perfectly fine, yet it generates a few errors: warning: no more representation items for type "Pixel_Storage" defined at line 625 representation item appears too late [private section representation-clause]