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=-1.9 required=5.0 tests=BAYES_00 autolearn=ham autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,335f67c75a2a5d5 X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 2000-12-29 06:32:07 PST Path: supernews.google.com!sn-xit-02!supernews.com!router1.news.adelphia.net!cyclone.news.idirect.com.MISMATCH!newsfeed.direct.ca!look.ca!news1.tor.metronet.ca!news.storm.ca!nnrp1.tor.metronet.ca!not-for-mail Message-ID: <3A4C9FBF.298B097@home.com> From: "Warren W. Gay VE3WWG" X-Mailer: Mozilla 4.75 [en] (Windows NT 5.0; U) X-Accept-Language: en MIME-Version: 1.0 Newsgroups: comp.lang.ada Subject: Re: Ada0x Enhancement? Was: Tags.Internal_Tag(String'Input(Stream)) ?? References: <3A4C2098.5137C8D0@home.com> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Date: Fri, 29 Dec 2000 14:32:05 GMT NNTP-Posting-Host: 198.96.47.195 NNTP-Posting-Date: Fri, 29 Dec 2000 07:32:05 MDT Organization: MetroNet Communications Group Inc. Xref: supernews.google.com comp.lang.ada:3451 Date: 2000-12-29T14:32:05+00:00 List-Id: tmoran@acm.org wrote: > > >upon String'Input() to read in the tag (which is the problem > >here). String'Input() insists on reading dope info that describes > >how long the tag string is (the array bounds actually). > Ah, now I understand why you said the dope vector came before the > tag. You were refering to the dope vector of the external tag itself. > > >Additionally, Microsoft's stupid Wave format often provides ... > MS's bmp file format has some of the same delightful characteristics. > Claw.Bitmaps.Root_DIBitmap_Type'Class'Input reads the bmp header, > then does a series of > elsif (header says it's a VGA type 256 color bitmap) > declare > Result : Claw.Bitmaps.VGA_DIBitmap_Type(Height=> ... > It's tedious and unpleasant to code, but the end result is worthwhile. It also turns out that there are some advantages to doing it this way. There is a whole group of chunks that can be contained within one tagged record type ( LIST(INFO) member chunks for example ). Doing it the other way, I'd have to define 23 different tagged records with matching tags, but with the exact same structure. -- Warren W. Gay VE3WWG http://members.home.net/ve3wwg