diff options
| author | baldrick <baldrick@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-04-05 07:40:27 +0000 |
|---|---|---|
| committer | baldrick <baldrick@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-04-05 07:40:27 +0000 |
| commit | 3ad50d13616068d84b356156ef72b72a7f16ea84 (patch) | |
| tree | a12043559de7a2c5c18074fffe63078259c60a82 | |
| parent | 6e193e6f7bd5b09660292d638a8a379dc147ea7d (diff) | |
| download | ppe42-gcc-3ad50d13616068d84b356156ef72b72a7f16ea84.tar.gz ppe42-gcc-3ad50d13616068d84b356156ef72b72a7f16ea84.zip | |
The parameters for functions from the frexp family were the wrong way
round. Swap them.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@171971 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/fortran/f95-lang.c | 5 |
2 files changed, 6 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 40b84dc04ab..5d3a799075e 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2011-04-05 Duncan Sands <baldrick@free.fr> + + * f95-lang.c (build_builtin_fntypes): Swap frexp parameter types. + 2010-04-04 Thomas Koenig <tkoenig@gcc.gnu.org> * frontend-passes: (optimize_lexical_comparison): New function. diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c index 3340dc4ee24..728b6311a97 100644 --- a/gcc/fortran/f95-lang.c +++ b/gcc/fortran/f95-lang.c @@ -695,10 +695,9 @@ build_builtin_fntypes (tree *fntype, tree type) type, integer_type_node, NULL_TREE); /* type (*) (void) */ fntype[3] = build_function_type_list (type, NULL_TREE); - /* type (*) (&int, type) */ - fntype[4] = build_function_type_list (type, + /* type (*) (type, &int) */ + fntype[4] = build_function_type_list (type, type, build_pointer_type (integer_type_node), - type, NULL_TREE); /* type (*) (int, type) */ fntype[5] = build_function_type_list (type, |
