[llvm-commits] [llvm-gcc-4.2] r45366 - /llvm-gcc-4.2/trunk/gcc/fortran/trans-decl.c

[Anton Korobeynikov]

Author: asl
Date: Thu Dec 27 10:56:39 2007
New Revision: 45366

URL: http://llvm.org/viewvc/llvm-project?rev=45366&view=rev
Log:
Fix emission of bogus decls. This was commited to gcc mainline.

Modified:
    llvm-gcc-4.2/trunk/gcc/fortran/trans-decl.c

Modified: llvm-gcc-4.2/trunk/gcc/fortran/trans-decl.c
URL: http://llvm.org/viewvc/llvm-project/llvm-gcc-4.2/trunk/gcc/fortran/trans-decl.c?rev=45366&r1=45365&r2=45366&view=diff

==============================================================================
--- llvm-gcc-4.2/trunk/gcc/fortran/trans-decl.c (original)
+++ llvm-gcc-4.2/trunk/gcc/fortran/trans-decl.c Thu Dec 27 10:56:39 2007
@@ -1935,7 +1935,7 @@
   /* Create a list of the argument types.  */
   /* LLVM local begin */
   for (arglist = NULL_TREE, n = (nargs >= 0 ? nargs : -nargs - 1); n > 0; n--)
-   /* LLVM local end */
+  /* LLVM local end */
     {
       argtype = va_arg (p, tree);
       arglist = gfc_chainon_list (arglist, argtype);
@@ -2310,10 +2310,12 @@
 				     void_type_node, 2, pchar_type_node,
                                      gfc_int4_type_node);
 
+  /* LLVM begin mainline 4.3 */
   gfor_fndecl_select_string =
     gfc_build_library_function_decl (get_identifier (PREFIX("select_string")),
              pvoid_type_node, 5, pvoid_type_node, gfc_c_int_type_node,
                        pvoid_type_node, pchar_type_node, gfc_c_int_type_node);
+  /* LLVM end mainline 4.3 */
 
   gfor_fndecl_runtime_error =
     gfc_build_library_function_decl (get_identifier (PREFIX("runtime_error")),
@@ -2349,9 +2351,11 @@
         get_identifier (PREFIX("internal_pack")),
         pvoid_type_node, 1, pvoid_type_node);
 
+  /* LLVM begin mainline 4.3 */
   gfor_fndecl_in_unpack = gfc_build_library_function_decl (
         get_identifier (PREFIX("internal_unpack")),
         pvoid_type_node, 2, pvoid_type_node, pvoid_type_node);
+  /* LLVM end mainline 4.3 */
 
   gfor_fndecl_associated =
     gfc_build_library_function_decl (