RE: WITH in Pascal

RE: WITH in Pascal

[MARTIN%SCRANTON.BITNET]

Eric Gustafson writes:

>     In the process of translating Pascal, Turbo 5.5, code to Ada, Meridan, I
>and the other members of my class group found that there was no equalivent to
>the pascal WITH statement.  After some discussion we could not think of any
>reason why the facility would cause *bad* programming practices.

The WITH allows the variable name to be significantly separated from the
operations done to its fields.  This is a bad programming practice.

>... what was the method used .. in Ada.

the aggregate assignment (ref: Cohen _Ada as a Second Language_, pp 206..):

>Example ( In Pascal ):
>..
>Type
>  PersonRec  = Record
>                 Name : String;
>                 Age  : Integer;
>                 ID   : Integer;
>               end; { PersonRec }
>..
>Var
>  Person     : PersonRec;
>..
>  WITH Person do
>  begin
>    Name := 'Asdfg';
>    Age  := 24;
>    ID   := 123930;
>  end; { with person }
>..

In Ada:
Person := (
        Name => "Asdfg",
        Age => 24,
        ID => 123930);

                ....Dennis Martin