Posix.String_List question

[stef@heron.cfmu.eurocontrol.be (Stef Van Vlierberghe)]

I recently reported a "bug" (Alsys 5.5.2 on HP9000/700), but the actual
code is so aggressive that I'm not sure who really is to blame. I see a
choice of the appliction, the vendor, POSIX1003.5 definition, or Ada.

The relevant code is :

  BYPASS_COPY_BACK : exception;

  procedure TRY_BREAK_IT (  LIST : in out POSIX_STRING_LIST ) is
  begin
    MAKE_EMPTY(LIST);
    raise BYPASS_COPY_BACK;
    -- if LIST is by copy the caller won't see we emptied it
  end;

  -- Make a LIST

  begin
    TRY_BREAK_IT ( LIST );
  exception
    when BYPASS_COPY_BACK => null;
  end;

  -- Make other list

  MAKE_EMPTY(LIST);
  -- This will free the dangling reference again (can be in use).

  -- Add to other list

After quite a while this code gets the heap corrupted.

Evidently the relevant piece of LRM is 6.2(7) : The execution of a
program is erroneous if its effect depends on which mechanism is selected
by the implementation.

But from there to blaming the appliction seems an awkward reasoning. Most
of all, application will often call cleanup code in exception handlers,
so if we blame the application then we should start looking for some *very*
skilled programmers.

The POSIX interface heavily suggests that we are dealing with an abstract
data type (i.e. we shouldn't care about implementation). But it isn't
explicit about the issue above.

The compiler vendor would probably know how to force a type to be
passed-by-reference... but perhaps one should not expect this to be done
if it isn't required ?

Hopefully a 9X compiler would use controlled types to implement the
Posix.String_List type, but even then, if the specification just sais
"[limited] private", an application might not be portable if it relied
on this implementation.

Perhaps a 9X update of 1003.5 might require call by reference semantics, or
even specifically non-limited controlled implementation (such that we can
copy without minding memory leaks).
--
Stef VAN VLIERBERGHE            Eurocontrol - Central Flow Management Unit
stef@cfmu.eurocontrol.be        Avenue des Arts 19H
Tel: +32 2 729 33 42            B-1040 BRUSSELS
Fax: +32 2 729 32 16            Belgium