https://gcc.gnu.org/bugzilla/show_bug.cgi?id=106557
Bug ID: 106557
Summary: nesting intrinsics ibset and transfer gives wrong
result
Product: gcc
Version: 12.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: mscfd at gmx dot net
Target Milestone: ---
Created attachment 53425
--> https://gcc.gnu.org/bugzilla/attachment.cgi?id=53425&action=edit
ibset_transfer.f90
Nesting ibset and transfer gives a wrong result. In the attached program the
value in variable k is wrong.
With an additional int(..,8), which should do nothing as it is already
integer(8), the correct value will be computed.
(Note that the code assumes that 0.0_8 is represented by the same bit pattern
as 0_8.)