(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