Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!usc!cs.utexas.edu!uunet!weyrich!orville
From: orville@weyrich.UUCP (Orville R. Weyrich)
Newsgroups: comp.lang.fortran
Subject: Re: More on EQUIVALENCE (and CHARACTER)
Message-ID: <1991Jun9.082025.3104@weyrich.UUCP>
Date: 9 Jun 91 08:20:25 GMT
References: <1991Jun7.022834.898@weyrich.UUCP> <1991Jun7.144220.16691@alchemy.chem.utoronto.ca> <91159.121142FC138001@ysub.ysu.edu>
Reply-To: orville@weyrich.UUCP (Orville R. Weyrich)
Distribution: na
Organization: Weyrich Computer Consulting
Lines: 28

In article <91159.121142FC138001@ysub.ysu.edu> Phil Munro <FC138001@ysub.ysu.edu> writes:
>
>  The above discussion raises questions for me.  Will the following code
>be portable?  Might it cause problems on some compilers when trying to
>pick off part of whole and overlay storage?  I know in the case of the
>VS compiler that character storage allows this sort of thing.
>
>      character*14 whole
>      character*4  part
>      data whole /'part and so on'/
>      equivalence (whole,part)
>

The first release of the IBM FORTRAN-VS compiler was [I think] standard-
conforming in the way it treated character strings, but it broke a lot of
code written for other compilers [E.g. WATFIV].  IBM made some major
changes in the way FORTRAN-VS handled characters in their next release.

I don't recall the details. I am sure that parameter-passing was one of the
problems. I am not sure about other forms of storage association.


--------------------------------------           ******************************
Orville R. Weyrich, Jr., Ph.D.                   Certified Systems Professional
Internet: orville%weyrich@uunet.uu.net             Weyrich Computer Consulting
Voice:    (602) 391-0821                         POB 5782, Scottsdale, AZ 85261
Fax:      (602) 391-0023                              (Yes! I'm available)
--------------------------------------           ******************************