diff options
| author | Koen Kooi <koen@openembedded.org> | 2007-09-19 09:46:23 +0000 |
|---|---|---|
| committer | Koen Kooi <koen@openembedded.org> | 2007-09-19 09:46:23 +0000 |
| commit | 3c9b8fa0dc7f1d5c279d345492b067630dcd02c7 (patch) | |
| tree | 8e23d43903ceb7d9d6a43ad1892ff8d99db691d0 /packages/gcc/files | |
| parent | 6a6501daef5e3f23f6e86b40f81f0d2133d60e2b (diff) | |
gcc(-cross): enable fortran for arm/EABI, thanks to Alain for showing and testing the patch
Diffstat (limited to 'packages/gcc/files')
| -rw-r--r-- | packages/gcc/files/.mtn2git_empty | 0 | ||||
| -rw-r--r-- | packages/gcc/files/gfortran.patch | 40 |
2 files changed, 40 insertions, 0 deletions
diff --git a/packages/gcc/files/.mtn2git_empty b/packages/gcc/files/.mtn2git_empty new file mode 100644 index 0000000000..e69de29bb2 --- /dev/null +++ b/packages/gcc/files/.mtn2git_empty diff --git a/packages/gcc/files/gfortran.patch b/packages/gcc/files/gfortran.patch new file mode 100644 index 0000000000..96905e5d7d --- /dev/null +++ b/packages/gcc/files/gfortran.patch @@ -0,0 +1,40 @@ +The patch below fixes a crash building libgfortran on arm-linux-gnueabi. + +This target doesn't really have a 128-bit integer type, however it does use +TImode to represent the return value of certain special ABI defined library +functions. This results in type_for_size(TImode) being called. + +Because TImode deosn't correspond to any gfortran integer kind +gfc_type_for_size returns NULL and we segfault shortly after. + +The patch below fixes this by making gfc_type_for_size handle TImode in the +same way as the C frontend. + +Tested on x86_64-linux and arm-linux-gnueabi. +Applied to trunk. + +Paul + +2007-05-15 Paul Brook <paul@codesourcery.com> + + gcc/fortran/ + * trans-types.c (gfc_type_for_size): Handle signed TImode. + +Index: gcc-4.2.1/gcc/fortran/trans-types.c +=================================================================== +--- gcc-4.2.1/gcc/fortran/trans-types.c (revision 170435) ++++ gcc-4.2.1/gcc/fortran/trans-types.c (working copy) +@@ -1800,6 +1800,13 @@ gfc_type_for_size (unsigned bits, int un + if (type && bits == TYPE_PRECISION (type)) + return type; + } ++ ++ /* Handle TImode as a special case because it is used by some backends ++ (eg. ARM) even though it is not available for normal use. */ ++#if HOST_BITS_PER_WIDE_INT >= 64 ++ if (bits == TYPE_PRECISION (intTI_type_node)) ++ return intTI_type_node; ++#endif + } + else + { |