From bill@amber.ssd.csd.harris.com Wed Feb  2 12:22:56 1994
Received: from travis.csd.harris.com by dkuug.dk with SMTP id AA01258
  (5.65c8/IDA-1.4.4j for <sc22wg5@dkuug.dk>); Wed, 2 Feb 1994 23:23:31 +0100
Received: from amber.ssd.csd.harris.com by travis.csd.harris.com (5.61/harris-5.1)
	id AA19559; Wed, 2 Feb 94 17:22:59 -0500
Received: by amber (5.61/CX/UX-5.0)
	id AA16844; Wed, 2 Feb 94 17:22:56 -0500
Date: Wed, 2 Feb 94 17:22:56 -0500
From: bill@amber.ssd.csd.harris.com (Bill Leonard)
Message-Id: <9402022222.AA16844@amber>
To: jrbd@craycos.com
Cc: schmitt@edvz.tuwien.ac.at, sc22wg5@dkuug.dk
In-Reply-To: <9402022041.AA20146@copper> (jrbd@craycos.com)
Subject: Re:  (SC22WG5.493) Re: Comp.lang.fortran comments on evoluti
X-Charset: ASCII
X-Char-Esc: 29

>  Date: Wed, 2 Feb 94 13:41:43 MST
>  From: jrbd@craycos.com (James Davies)

>  I believe the entire problem with mixing CHARACTER with non-CHARACTER in
>  common blocks or equivalences is defining how many characters there are
>  in one integer or real, etc.  2, 4, 8, 10, ... ?  I believe that the
>  standard would have to define this in order for (especially) EQUIVALENCE
>  to be portable, and there are obvious differences in current practice that
>  couldn't be reconciled.

No, you simply disallow equivalences between CHARACTER and non-CHARACTER
data.  You can still allow the two to be mixed in COMMON, as long as all
the CHARACTER entities are matched with CHARACTER entities in other
declarations of the COMMON.

This is already allowed in F90, with SEQUENCE structures.  There is no
_technical_ problem with extending the concept to COMMON.

Bill Leonard
Harris Computer Systems Division
2101 W. Cypress Creek Road
Fort Lauderdale, FL  33309
bill@ssd.csd.harris.com

These opinions and statements are my own and do not necessarily reflect the
opinions or positions of Harris Corporation.

------------------------------------------------------------------------------
"Governments, like individuals, spend money for any or all of three
reasons: because they want to, because they have to, or because they have
it to spend."
                                                  Rex Stout
------------------------------------------------------------------------------
