]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/m4/product.m4
Update copyright years.
[thirdparty/gcc.git] / libgfortran / m4 / product.m4
index 669b106e0c255e1f0d959d1ccb621435596506cc..7dedc8a72aa90e79010243cbe9e36fffa1bd0cf7 100644 (file)
@@ -1,8 +1,8 @@
 `/* Implementation of the PRODUCT intrinsic
-   Copyright 2002, 2007, 2009 Free Software Foundation, Inc.
+   Copyright (C) 2002-2023 Free Software Foundation, Inc.
    Contributed by Paul Brook <paul@nowt.org>
 
-This file is part of the GNU Fortran 95 runtime library (libgfortran).
+This file is part of the GNU Fortran runtime library (libgfortran).
 
 Libgfortran is free software; you can redistribute it and/or
 modify it under the terms of the GNU General Public
@@ -23,9 +23,7 @@ a copy of the GCC Runtime Library Exception along with this program;
 see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
 <http://www.gnu.org/licenses/>.  */
 
-#include "libgfortran.h"
-#include <stdlib.h>
-#include <assert.h>'
+#include "libgfortran.h"'
 
 include(iparm.m4)dnl
 include(ifunction.m4)dnl
@@ -34,7 +32,7 @@ include(ifunction.m4)dnl
 
 ARRAY_FUNCTION(1,
 `  result = 1;',
-`  result *= *src;')
+`  result *= *src;', `')
 
 MASKED_ARRAY_FUNCTION(1,
 `  result = 1;',