aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas Koenig <tkoenig@gcc.gnu.org>2008-03-19 16:56:22 +0000
committerThomas Koenig <tkoenig@gcc.gnu.org>2008-03-19 16:56:22 +0000
commit2f3b8279bf70fcd8c74b911c9d6d953bc1edd06e (patch)
tree89c0168b7e11782cdcd71b4e636f8c55b42329d7
parent8e1d7686de136571f68185066dec9bcb28019a8d (diff)
downloadgcc-2f3b8279bf70fcd8c74b911c9d6d953bc1edd06e.zip
gcc-2f3b8279bf70fcd8c74b911c9d6d953bc1edd06e.tar.gz
gcc-2f3b8279bf70fcd8c74b911c9d6d953bc1edd06e.tar.bz2
re PR libfortran/32972 (performance of pack/unpack)
2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32972 * runtime/in_pack_generic.c (internal_pack): Fix typo in last commit. From-SVN: r133345
-rw-r--r--libgfortran/ChangeLog6
-rw-r--r--libgfortran/runtime/in_pack_generic.c2
2 files changed, 7 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index baa99e2..6a1865e 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,6 +1,12 @@
2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/32972
+ * runtime/in_pack_generic.c (internal_pack): Fix typo in
+ last commit.
+
+2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
+
+ PR libfortran/32972
* Makefile.am (in_pack_c): Add in_pack_i1.c, in_pack_i2.c,
in_pack_r4.c, in_pack_r8.c, in_pack_r10.c and in_pack_r16.c.
(in_unpack_c): Add in_unpack_i1.c, in_unpack_i2.c,
diff --git a/libgfortran/runtime/in_pack_generic.c b/libgfortran/runtime/in_pack_generic.c
index ff02ec1..067cd28 100644
--- a/libgfortran/runtime/in_pack_generic.c
+++ b/libgfortran/runtime/in_pack_generic.c
@@ -81,7 +81,7 @@ internal_pack (gfc_array_char * source)
#if defined(HAVE_GFC_INTEGER_16)
case sizeof (GFC_INTEGER_16):
- return internal_pack_16 (gfc_array_i16 *) source);
+ return internal_pack_16 ((gfc_array_i16 *) source);
#endif
}
break;