Re: LLQ: -1 a valid boolean?

[Robert Dewar <robert_dewar@my-deja.com>]

In article <8ggq7i$dad$1@nnrp1.deja.com>,
  Ted Dennison <dennison@telepath.com> wrote:
> I figured that since Boolean'Size=1, then the check ought to
> work

I really can't imagine what you are thinking here. Boolean'Size
being 1 affects precisely two things, the behavior of unchecked
conversion, and the effect of component packing, nothing else
at all. If it does something else, then you have a
misunderstanding of some kind.

> even
> if assiging the value causes Constraint_Error.

Assigning the value is of course erroneous, so it might cause
CE indeed.

> in this instance I was right.

Not at all odd, because it simply means that the check
checked for zero/non-zero which is certainly legal (and
somewhat expected since it is more efficient than explicitly
checking for equality with 1).

> But if the comparison
> itself is erronious, then this is not the way to do it.

Indeed, since this behavior is not guaranteed.

Does the compiler you are using support Fortran.Logical? It
should if it claims to support Annex G, since Annex G expects
interface to Fortran to be implemented if fortran is available.


Sent via Deja.com http://www.deja.com/
Before you buy.