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-Thread: a07f3367d7,461d464a39a7a30a
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,UTF8
X-Received: by 10.180.20.105 with SMTP id m9mr2887319wie.5.1367665391636;
        Sat, 04 May 2013 04:03:11 -0700 (PDT)
Path: 
 hg5ni66812wib.1!nntp.google.com!feeder1.cambriumusenet.nl!82.197.223.103.MISMATCH!feeder3.cambriumusenet.nl!82.197.223.108.MISMATCH!feeder2.cambriumusenet.nl!feed.tweaknews.nl!194.109.133.87.MISMATCH!newsfeed.xs4all.nl!newsfeed1.news.xs4all.nl!xs4all!newspeer1.nac.net!border4.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!newsfeed.news.ucla.edu!nrc-news.nrc.ca!News.Dal.Ca!news.litech.org!news.stack.nl!eternal-september.org!feeder.eternal-september.org!mx05.eternal-september.org!.POSTED!not-for-mail
From: Simon Wright <simon@pushface.org>
Newsgroups: comp.lang.ada
Subject: Re: GNAT not generating any code for =?utf-8?Q?sub=E2=80=91progra?=
 =?utf-8?Q?m=3A?= known bug?
Date: Sun, 28 Apr 2013 21:46:40 +0100
Organization: A noiseless patient Spider
Message-ID: <lyzjwiqt73.fsf@pushface.org>
References: <op.wv7w02pwule2fv@cardamome> <op.wv70f3m3ule2fv@cardamome>
	<lyhairrus0.fsf@pushface.org> <op.wv9ilgizule2fv@cardamome>
	<op.wv9mzwv5ule2fv@cardamome>
Mime-Version: 1.0
Injection-Info: mx05.eternal-september.org;
 posting-host="abea7aea1fa87bdeaf110ddb7626f1db";
	logging-data="32380"; mail-complaints-to="abuse@eternal-september.org";
	posting-account="U2FsdGVkX19KL0PO/ynrm06zI56AjTevviwj6twva1s="
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.2 (darwin)
Cancel-Lock: sha1:Lv2jb8eQ3P3RB3dcwl4zfWfh7d0=
	sha1:4NJutV+PjumMOZaSAkxlGgcrlaw=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
Date: 2013-04-28T21:46:40+01:00
List-Id: <comp.lang.ada>

"Yannick Duchêne (Hibou57)" <yannick_duchene@yahoo.fr> writes:

> 1) In the archive linked in this thread, if I change `Volatile =>
> False` into `Volatile => True`, it works, without even a need to use
> Clobber`. Thus, the initial case is solved.

Or you could, less satisfactorily, say

   procedure Write (Item : in String) is
      Status : Integer with Volatile;