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=unavailable autolearn_force=no version=3.4.4 Path: buffer2.nntp.dca1.giganews.com!border2.nntp.dca1.giganews.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!newspeer1.nac.net!feeder.erje.net!eu.feeder.erje.net!eternal-september.org!feeder.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail From: Simon Clubley Newsgroups: comp.lang.ada Subject: Re: Forcing GNAT to use 32-bit load/store instructions on ARM? Date: Tue, 1 Jul 2014 20:08:42 +0000 (UTC) Organization: A noiseless patient Spider Message-ID: References: <0e0b9ac2-e793-4cc5-8d8d-d3441ca28a58@googlegroups.com> <1j7b0m3yptffy$.1cztnkty8elrv$.dlg@40tude.net> Injection-Date: Tue, 1 Jul 2014 20:08:42 +0000 (UTC) Injection-Info: mx05.eternal-september.org; posting-host="e458ff8b81bc0c159989eb0e36c6e372"; logging-data="4073"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX1/VGobrJ8NFhXTPPqLPVTOxqCcaq9zW71A=" User-Agent: slrn/0.9.8.1 (VMS/Multinet) Cancel-Lock: sha1:J96fVshmgAWopcWVJHs0sNYkJCM= Xref: number.nntp.dca.giganews.com comp.lang.ada:187317 Date: 2014-07-01T20:08:42+00:00 List-Id: On 2014-07-01, Dmitry A. Kazakov wrote: > On Tue, 1 Jul 2014 17:00:45 +0000 (UTC), Simon Clubley wrote: >> If for some reason the compiler could not generate a 32-bit str opcode >> instead of an 8-bit strb opcode, the pragma Atomic should have caused >> an error during compilation. > > Well, pragmas are permitted to be ignored. Atomic should never be a pragma. > I thought that only applied to unrecognised pragmas. OTOH, going back a couple of versions to the Ada 95 RM (the version I have to hand and also the pragma only days), C.6(10) makes it clear that an Atomic pragma is illegal if the implementation cannot support the indivisible accesses required. Simon. -- Simon Clubley, clubley@remove_me.eisner.decus.org-Earth.UFP Microsoft: Bringing you 1980s technology to a 21st century world