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.107.153.146 with SMTP id b140mr1257249ioe.30.1446100896583; Wed, 28 Oct 2015 23:41:36 -0700 (PDT) X-Received: by 10.50.131.196 with SMTP id oo4mr214797igb.5.1446100896565; Wed, 28 Oct 2015 23:41:36 -0700 (PDT) Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!feeder.eternal-september.org!news.glorb.com!i2no295544igv.0!news-out.google.com!fs1ni1662igb.0!nntp.google.com!i2no433221igv.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail Newsgroups: comp.lang.ada Date: Wed, 28 Oct 2015 23:41:35 -0700 (PDT) In-Reply-To: <87wpu6tx5w.fsf@jester.gateway.sonic.net> Complaints-To: groups-abuse@google.com Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=82.243.252.139; posting-account=zd4fUAoAAABZGnAfDxrdJ5Lpts-qUilv NNTP-Posting-Host: 82.243.252.139 References: <65e32e86-4e59-48d0-af00-99bd7898d4c1@googlegroups.com> <87wpu6tx5w.fsf@jester.gateway.sonic.net> User-Agent: G2/1.0 MIME-Version: 1.0 Message-ID: Subject: Re: Create in a root directory (Linux) From: comicfanzine@gmail.com Injection-Date: Thu, 29 Oct 2015 06:41:36 +0000 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Xref: news.eternal-september.org comp.lang.ada:28106 Date: 2015-10-28T23:41:35-07:00 List-Id: Le jeudi 29 octobre 2015 00:01:49 UTC+1, Paul Rubin a =E9crit=A0: > Simon Wright writes: > >> Create( MonFichier,Name =3D> " /clone.adb"); >=20 > The problem is the leading space before the / My fault i have not paste the code right , in fact the code whas without th= e space : [code]WITH Ada.Text_IO ; USE Ada.Text_IO ;=20 PROCEDURE TestFichier IS MonFichier : File_type ;=20 =20 BEGIN=20 Create( MonFichier,Name =3D> "/clone.adb"); if Is_Open (MonFichier) then Put (Item =3D> "Le fichier , ouvert ? : ", File =3D> MonFichier); end if; END TestFichier ;[code/] I got the error : raised ADA.IO_EXCEPTIONS.USE_ERROR : /clone.adb: Permiss= ion denied