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.3 required=5.0 tests=BAYES_00,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,99180ce3a9e2c757 X-Google-Attributes: gid103376,public From: Gautier Subject: Re: Improving P2Ada (2) Date: 1999/08/27 Message-ID: <37C656A2.3E26678B@Maths.UniNe.CH>#1/1 X-Deja-AN: 517729120 Content-Transfer-Encoding: 7bit References: <37BC2499.9D2E6E77@Maths.UniNe.CH> <37C54799.C114B31C@Maths.UniNe.CH> <7q5cih$msg$1@scharff.fys.ku.dk> X-Accept-Language: en Content-Type: text/plain; charset=us-ascii MIME-Version: 1.0 Newsgroups: comp.lang.ada Date: 1999-08-27T00:00:00+00:00 List-Id: > >- outputs "WHEN others=> Null;" when no else part > I know this is the correct translation, but would it be > possible to have a flag that disables this feature? It is - by enclosing the Text_IO.Put(...) in pascal.y with an if flag then...end if; But is it not complicating uselessly the tool ? My arguments are: - it's easier to remove a "WHEN others=> Null;" than to add it - the cases when "WHEN others=> Null;" is needed are much more frequent than when it isn't -- Gautier -------- http://members.xoom.com/gdemont/