OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR fortran/51842 (fortran fails if ssize_t is 32-bit on 64-bit host) 

2012-01-13  Tobias Burnus  <burnus@net-b.de>

        PR fortran/51842
        * fortran/trans-types.c (gfc_init_kinds): Use PTRDIFF_TYPE
        instead of a signed int of size POINTER_SIZE for
        gfc_index_integer_kind.

From-SVN: r183154
This commit is contained in:
Tobias Burnus 2012-01-13 16:41:13 +01:00 committed by Tobias Burnus
parent aabb90e5ad
commit 8395e28bbf
2 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gcc/fortran/ChangeLog
View File

@ -1,3 +1,10 @@
2012-01-13 Tobias Burnus <burnus@net-b.de>
PR fortran/51842
* fortran/trans-types.c (gfc_init_kinds): Use PTRDIFF_TYPE
instead of a signed int of size POINTER_SIZE for
gfc_index_integer_kind.
2012-01-12 Tobias Burnus <burnus@net-b.de>
PR fortran/36755

4
gcc/fortran/trans-types.c
View File

@ -576,8 +576,8 @@ gfc_init_kinds (void)
gfc_default_character_kind = gfc_character_kinds[0].kind;
gfc_character_storage_size = gfc_default_character_kind * 8;
/* Choose the integer kind the same size as "void*" for our index kind. */
gfc_index_integer_kind = POINTER_SIZE / 8;
gfc_index_integer_kind = get_int_kind_from_name (PTRDIFF_TYPE);
/* Pick a kind the same size as the C "int" type. */
gfc_c_int_kind = INT_TYPE_SIZE / 8;