[FORTRAN PATCH] PR30400: ANY not accepted as FORALL mask

Paul Richard Thomas paul.richard.thomas@gmail.com
Sun Feb 18 18:10:00 GMT 2007


Tobi,

> This is ok.  I couldn't test it myself due to unrelated issues, but

Thank you very much.

> there's one corner case which I think we should put into a testcase: a
> mask expression which uses the '==' operator, something like "forall
> (j=1:5, j==2)"  The code in match_forall_iterator seems to be doing the
> right thing when it sees this, but it's worth making sure.

Will do.

> Please also
> cleanup the comment in front of the function, the part about the scalar
> mask is wrong.

You mean:


     <var> = <start>:<end>[:<stride>][, <scalar mask>]  */ ?

7.5.4.1

R747 forall-construct is forall-construct-stmt
[forall-body-construct ] ...
end-forall-stmt
R748 forall-construct-stmt is [forall-construct-name :] FORALL forall-header
R749 forall-header is (forall-triplet-spec-list [, scalar-mask-expr] )

It looks OK to me or am I missing something (wouldn't be the first time:))

Paul

-- 
Anon: "Ignorantibus veritatem dicere semper utile est."

Abraham Lincoln: "It is better to be thought a fool than to speak and
remove all doubt."



More information about the Fortran mailing list