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.3 required=5.0 tests=BAYES_00,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,7c0437014cb20f71 X-Google-Attributes: gid103376,public From: jsanchor@my-dejanews.com Subject: Re: System.Address_to_Access_Conversions Date: 1998/07/15 Message-ID: <6oj1qi$n37$1@nnrp1.dejanews.com>#1/1 X-Deja-AN: 371755254 References: <6odddl$k94$1@nnrp1.dejanews.com> <35AB9C59.74E529E0@magic.fr> <6ofn8e$5ff$1@nnrp1.dejanews.com> <6ofqvs$alm@hacgate2.hac.com> <6ogieq$qlo@drn.newsguy.com> Organization: Deja News - The Leader in Internet Discussion X-Article-Creation-Date: Wed Jul 15 20:01:22 1998 GMT Newsgroups: comp.lang.ada X-Http-User-Agent: Mozilla/4.04 [en] (X11; U; SunOS 5.5.1 sun4u) Date: 1998-07-15T00:00:00+00:00 List-Id: > I notice also, that Jay's response to my 6ofqvs$alm@hacgate2.hac.com post > did not mention the tagged type problem at all, but did specify a tagged > type. > > David C. Hoos, Sr. > I am using tagged types to identify different data records that the author of each child package will create from my parent type Dummy_type'class, and store them in NVM. i.e type new_dummy_type is new my_package.dummy_type'class with record number : integer := 8; end record; new_dummy : aliased new_dummy_type; They will call a procedure declared in my package called Register(access_to_block : access Dummy_type'class). ex. my_package.Register(new_dummy'access); Register in my_package will get the TAG tmp : Ada.tags.tag; tmp := access_to_block'tag & the put in an array(plus, access type). And my package will poll through this array and update NVM if there are any change to RAM copy. (To put it simply) After reading all the comments from all who have responded I am worried because I also thought that the TAG was the first element in the record. I have tampered with my program ~100 times and it did stay there. (I am not saying you are wrong just pondering). Sincerely, Jay S. > -----== Posted via Deja News, The Leader in Internet Discussion ==----- http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum