https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96911
--- Comment #6 from zhen...@compiler-dev.com ---
(In reply to kargl from comment #2)
> (In reply to zhen.xu from comment #0)
> > Dealing with Intrinsic shifta/shiftl/shiftr, gfortran refuses proper numbers
> > in the code below an
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96911
--- Comment #5 from zhen...@compiler-dev.com ---
(In reply to kargl from comment #2)
> (In reply to zhen.xu from comment #0)
> > Dealing with Intrinsic shifta/shiftl/shiftr, gfortran refuses proper numbers
> > in the code below an
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96911
--- Comment #4 from zhen...@compiler-dev.com ---
(In reply to kargl from comment #2)
> (In reply to zhen.xu from comment #0)
> > Dealing with Intrinsic shifta/shiftl/shiftr, gfortran refuses proper numbers
> > in the code below an
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96911
--- Comment #3 from zhen...@compiler-dev.com ---
(In reply to anlauf from comment #1)
> Error: Integer too big for its kind at (1). This check can be disabled with
> the option '-fno-range-check'
>
> Why don't you re
Assignee: unassigned at gcc dot gnu.org
Reporter: zhen...@compiler-dev.com
Target Milestone: ---
Dealing with Intrinsic shifta/shiftl/shiftr, gfortran refuses proper numbers in
the code below and throws "Error: Integer too big for its kind".
The code is checked
Assignee: unassigned at gcc dot gnu.org
Reporter: zhen...@compiler-dev.com
Target Milestone: ---
I got wrong answer with iall, only when all 3 parameters ARRAY/DIM/MASK are all
present and the rank of array >1.
---test code---
prog
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96859
--- Comment #4 from zhen...@compiler-dev.com ---
(In reply to kargl from comment #2)
> gfortran appears to be correct. Writing an actual program with your
> examples, I have
>
> program foo
>print '(I0,1X,I0)', &am
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=96859
--- Comment #3 from zhen...@compiler-dev.com ---
(In reply to Dominique d'Humieres from comment #1)
> What results do you expect?
merge_bits(32767_2, o'1234567', 32767_2)
merge_bits(o'1234567', 32767_2, o'123456
Assignee: unassigned at gcc dot gnu.org
Reporter: zhen...@compiler-dev.com
Target Milestone: ---
wrong result with compiled code such as:
merge_bits(32767_2, o'1234567', 32767_2)
merge_bits(o'1234567', 32767_2, o'1234567')
merge_bits(32767_2, o&#
