Re: Why both "with" and "use"?

["Jean-Pierre Rosen" <rosen.adalog@wanadoo.fr>]

robert_dewar@my-dejanews.com a �crit dans le message
<7afue4$8ed$1@nnrp1.dejanews.com>...
>In article <7af68r$52o$1@platane.wanadoo.fr>,
>  "Jean-Pierre Rosen" <rosen.adalog@wanadoo.fr> wrote:
>> My personal religion is to apply the use to the smallest
>> region where it is necessary.
>
>I very much dislike this style, I think this kind of very
>local use obfuscates the code, especially if you go so far
>as to create blocks just for the purpose of including a use
>clause. I would hate to see
>
>    declare
>       use Text_IO;
>    begin
>       Put (A);
>       Put (B);
>       Put_Line (C);
>    end;
>
>I don't see that as helpful.
Of course, this is an abuse and common sense applies. My example was
rather:
exception
   when Occur : others =>
      declare
          use Ada.Exceptions;
      begin
           Put_Line ("Oops" & Exception_Name (Occur));
           Raise_Exception (My_Exception'Identity, Message =>
Exception_Message (Occur));
      end;

Here, I wouldn't like a use clause applying to the whole subprogram
when I really need it only in the exception part.

>This does not mean of course that local use is always a bad
>idea, but I am suspicious of any "religeon" in this area.
>Better to have a completely non-religeous viewpoint, and
>use whatever makes best sense in each particular situation.
OK, I should have put a IMHO instead - some people are so religious
about religions :-)
---------------------------------------------------------
           J-P. Rosen (Rosen.Adalog@wanadoo.fr)
Visit Adalog's web site at http://perso.wanadoo.fr/adalog