Re: Objects in Fortran 2000

[bobduff@world.std.com (Robert A Duff)]

In article <5gs6ub$kb3@netline-fddi.jpl.nasa.gov>,
Van Snyder <vsnyder@gyre.jpl.nasa.gov> wrote:
>BTW, Robert, the Fortran proposal for exception/handler blocks, similar to
>the way Ada does it, foundered on the semantics of the combination of
>exceptions and parallelism.  Has the Ada community some insight/advice to
>offer concerning the semantics of exception blocks in the presence of
>parallelism?

Could you be more specific?  I don't know Fortran 90.  Are you talking
about parallel "for all" sorts of loops?  Anyway, if you have multiple
parallel threads of control raising exceptions, you can wait until they
are all synchronized in some way, and then raise a single exception --
for example, the way Ada deals with exceptions during task activation by
raising Program_Error.  (For normal exceptions raised by tasks, not
during activation, Ada says the exception is ignored.  I think that's a
bad thing.)  In Ada, if an exception is raised during a rendezvous, both
tasks get the exception.

- Bob