(j3.2006) Public Comment J32034
dick.hendrickson at att.net
dick.hendrickson
Thu Jul 17 11:47:10 EDT 2008
-------------- Original message from Robert Corbett <Robert.Corbett at Sun.COM>: --------------
> Van Snyder wrote:
> > On Wed, 2008-07-16 at 19:28 -0600, Jim Giles wrote:
> >
> >>ASSOCIATE isn't a new consruct, so I didn't comment on it at all.
> >>Actually I find it appalling.
> >
> >
> > It's just an inline internal procedure. What's appalling about that?
>
> In what sense is the ASSOCIATE construct an inline internal procedure?
> It is more like an assignment to a simple variable, with references
> to that variable in the body of the construct than an internal
> procedure. If the selector is a variable, it is like a pointer
> assignment, otherwise, it is like an ordinary assignment.
>
> > It's a degenerate case of SELECT TYPE, with prettier and less confusing
> > spelling than
> >
> > SELECT TYPE ( A => )
> > CLASS DEFAULT
> > stuff involving A instead of
> > END SELECT
> >
> > We really did find SELECT TYPE to be indispensible to a complete
> > object-oriented programming system.
> >
> > In both cases, the is modeled on a dummy argument, and
> > the relationship between the and the is
> > modeled on argument association.
>
> OK. In what sense is that like an inline internal procedure?
I think because if you have something like
ASSOCIATE ( A => <messy designator> )
stuff involving A instead of <messy designator>
END ASSOCIATE
it is similar to
call internal sub(<messy designator>)
...
contains
subroutine internal_sub(A)
decl for A
stuff involving A instead of <messy designator>
END internal_sub
As Van said, the associate works much like argument
association.
Dick Hendrickson
>
> Bob Corbett
> _______________________________________________
> J3 mailing list
> J3 at j3-fortran.org
> http://j3-fortran.org/mailman/listinfo/j3
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://j3-fortran.org/pipermail/j3/attachments/20080717/4bf9c4d3/attachment-0001.html
More information about the J3
mailing list