--- Comment #7 from jvdelisle at gcc dot gnu dot org 2007-05-19 02:07
---
Subject: Bug 31964
Author: jvdelisle
Date: Sat May 19 01:07:41 2007
New Revision: 124847
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124847
Log:
2007-05-18 Jerry DeLisle <[EMAIL PROTECTED]>
--- Comment #6 from jvdelisle at gcc dot gnu dot org 2007-05-19 02:04
---
Subject: Bug 31964
Author: jvdelisle
Date: Sat May 19 01:04:03 2007
New Revision: 124846
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124846
Log:
2007-05-18 Jerry DeLisle <[EMAIL PROTECTED]>
--- Comment #5 from jvdelisle at gcc dot gnu dot org 2007-05-18 06:53
---
A patch for this bug has been submitted for approval.
http://gcc.gnu.org/ml/fortran/2007-05/msg00314.html
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31964
--- Comment #4 from jvdelisle at gcc dot gnu dot org 2007-05-17 04:00
---
The patch in comment #3 is incorrect. I have the correct patch coming and will
post to list for approval.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31964
--- Comment #3 from jvdelisle at gcc dot gnu dot org 2007-05-17 01:49
---
I think we have an off by one when setting mask. I want to do some testing and
double check on all this. Here is a patch:
Index: ishftc.c
===
***
--- Comment #2 from jvdelisle at gcc dot gnu dot org 2007-05-17 01:30
---
$ gfc shifter.f90
$ ./a.out
32
2
1
1
$ ifort shifter.f90
$ ./a.out
32
2
2
2
$
--
jvdelisle at gcc dot gnu dot org change
--- Comment #1 from kargl at gcc dot gnu dot org 2007-05-17 00:51 ---
What output were you expecting?
write(*,*) ishftc(aint,1)
write(*,*) ishftc(aint,1,32)
write(*,*) ishftc(aint,1,BIT_SIZE(aint))
All three of these statements are shifting the 32-bit representation of
of 1 to l
