2006-03-20 Thomas Koenig <Thomas.Koenig@online.de>

[pf3gnuchains/gcc-fork.git] / libgfortran / m4 / product.m4

diff --git a/libgfortran/m4/product.m4 b/libgfortran/m4/product.m4
index df77372..47ee25b 100644 (file)
--- a/libgfortran/m4/product.m4
+++ b/libgfortran/m4/product.m4
@@ -47,4 +47,6 @@ MASKED_ARRAY_FUNCTION(1,
 `  if (*msrc)
     result *= *src;')
 
+SCALAR_ARRAY_FUNCTION(1)
+
 #endif