code.ossystems Code Review - openembedded-core.git/blob

   1 From 7a43b3a2e2c0d9cf557ac45577cc42c6d72e0065 Mon Sep 17 00:00:00 2001
   2 From: baldrick <baldrick@138bc75d-0d04-0410-961f-82ee72b054a4>
   3 Date: Tue, 5 Apr 2011 08:13:16 +0000
   4 Subject: [PATCH 067/200] The parameters for functions from the frexp family were the wrong way
   5  round.  Swap them.
   6
   7 git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/gcc-4_6-branch@171972 138bc75d-0d04-0410-961f-82ee72b054a4
   8
   9 index 3340dc4..728b631 100644
  10 --- a/gcc/fortran/f95-lang.c
  11 +++ b/gcc/fortran/f95-lang.c
  12 @@ -695,10 +695,9 @@ build_builtin_fntypes (tree *fntype, tree type)
  13                                          type, integer_type_node, NULL_TREE);
  14    /* type (*) (void) */
  15    fntype[3] = build_function_type_list (type, NULL_TREE);
  16 -  /* type (*) (&int, type) */
  17 -  fntype[4] = build_function_type_list (type,
  18 +  /* type (*) (type, &int) */
  19 +  fntype[4] = build_function_type_list (type, type,
  20                                          build_pointer_type (integer_type_node),
  21 -                                        type,
  22                                          NULL_TREE);
  23    /* type (*) (int, type) */
  24    fntype[5] = build_function_type_list (type,
  25 --
  26 1.7.0.4
  27