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:
parent
aabb90e5ad
commit
8395e28bbf
|
@ -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
|
||||
|
|
|
@ -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;
|
||||
|
||||
|
|
Loading…
Reference in New Issue