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,FREEMAIL_FROM autolearn=unavailable autolearn_force=no version=3.4.4 X-Received: by 10.182.236.74 with SMTP id us10mr6680177obc.36.1392500138759; Sat, 15 Feb 2014 13:35:38 -0800 (PST) X-Received: by 10.140.26.47 with SMTP id 44mr15074qgu.9.1392500138733; Sat, 15 Feb 2014 13:35:38 -0800 (PST) Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!news.eternal-september.org!news.eternal-september.org!feeder.eternal-september.org!news.glorb.com!uq10no22511801igb.0!news-out.google.com!s3ni20101qas.0!nntp.google.com!f11no21192788qae.1!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail Newsgroups: comp.lang.ada Date: Sat, 15 Feb 2014 13:35:38 -0800 (PST) In-Reply-To: <8200939f-9bbd-44dd-848c-00c663f37121@googlegroups.com> Complaints-To: groups-abuse@google.com Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=201.95.3.197; posting-account=TRgI1QoAAABSsYi-ox3Pi6N-JEKKU0cu NNTP-Posting-Host: 201.95.3.197 References: <215f6df2-a7ec-42f4-ac82-656d5b12bf61@googlegroups.com> <8383f5d6-3f66-415b-ab3f-8801fa377a6b@googlegroups.com> <8200939f-9bbd-44dd-848c-00c663f37121@googlegroups.com> User-Agent: G2/1.0 MIME-Version: 1.0 Message-ID: <1e41e2d6-7ff8-445d-9c14-14c49b244bcf@googlegroups.com> Subject: Re: Best representation for spares From: "Rego, P." Injection-Date: Sat, 15 Feb 2014 21:35:38 +0000 Content-Type: text/plain; charset=ISO-8859-1 Xref: news.eternal-september.org comp.lang.ada:18590 Date: 2014-02-15T13:35:38-08:00 List-Id: On Saturday, February 15, 2014 6:25:27 PM UTC-2, Rego, P. wrote: > type Zero_Bit is new Boolean; > type Zero_Bits is array (Positive range <>) of Zero_Bit; > for Zero_Bits'Component_Size use 1; > type Auxiliary_Interrupt_Status_Type is > record > Mini_Uart_IRQ : Boolean; > SPI_1_IRQ : Boolean; > SPI_2_IRQ : Boolean; > Spare : Zero_Bits (3 .. 31) := (3 .. 31 => 0); > end record; The only thing when I use this approach, in Auxiliary_Peripherals_Register_Map : Auxiliary_Peripherals_Register_Map_Type; for Auxiliary_Peripherals_Register_Map'Address use System'To_Address (16#7E21_5000#); I get from compiler the warnings > default initialization of "Auxiliary_Peripherals_Register_Map" may modify overlaid storage > use pragma Import for "Auxiliary_Peripherals_Register_Map" to suppress initialization (RM B.1(24)) But in this case I do not want to suppress initialization. What to do to eliminate this warning?