From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on ip-172-31-74-118.ec2.internal X-Spam-Level: X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00 autolearn=ham autolearn_force=no version=3.4.5-pre1 Path: eternal-september.org!reader02.eternal-september.org!.POSTED!not-for-mail From: "J-P. Rosen" Newsgroups: comp.lang.ada Subject: Re: Attempting to create file i task Date: Wed, 17 Mar 2021 13:49:21 +0100 Organization: Adalog Message-ID: References: <6aad7864-7b88-4e73-b4fe-f4cd30673b28n@googlegroups.com> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8; format=flowed Content-Transfer-Encoding: 8bit Injection-Date: Wed, 17 Mar 2021 12:49:21 -0000 (UTC) Injection-Info: reader02.eternal-september.org; posting-host="bed399b7516929081e3c6c41e823ad94"; logging-data="19868"; mail-complaints-to="abuse@eternal-september.org"; posting-account="U2FsdGVkX19pSGSVhO1Nbm+6KRki42Tc" User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:78.0) Gecko/20100101 Thunderbird/78.8.1 Cancel-Lock: sha1:xmUltixzrkCmQp0SHajppzHhGzY= In-Reply-To: <6aad7864-7b88-4e73-b4fe-f4cd30673b28n@googlegroups.com> Content-Language: fr Xref: reader02.eternal-september.org comp.lang.ada:61580 List-Id: Le 17/03/2021 à 13:39, reinert a écrit : > Hello, > > Assume task A starts subsequentially two times sub-sequentially (but not overlapping in time). It creates and closes a file: > > define > my_file : File_Type; > begin > Create (File => my_file, Mode => Out_File, Name => my_file_name); > ..some statements... > Close(my_file); > end; > > I now have the strange experience that task A overwrites the file > created the first time? Any idea where to look for the error? > Create always "creates" the file, i.e. if it exists, it is overwritten. What would you expect? -- J-P. Rosen Adalog 2 rue du Docteur Lombard, 92441 Issy-les-Moulineaux CEDEX Tel: +33 1 45 29 21 52, Fax: +33 1 45 29 25 00 http://www.adalog.fr