diff options
author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2010-09-12 12:57:52 +0000 |
---|---|---|
committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2010-09-12 12:57:52 +0000 |
commit | 075abad5eeda59a71431e749ff167e15f7904962 (patch) | |
tree | 4ab8ffee705f2ca0901692b18931ce1a5436125f /libgfortran/intrinsics/cshift0.c | |
parent | 457e68e7b23a336d0e4ff2f127d7136690761a52 (diff) | |
download | gcc-075abad5eeda59a71431e749ff167e15f7904962.zip gcc-075abad5eeda59a71431e749ff167e15f7904962.tar.gz gcc-075abad5eeda59a71431e749ff167e15f7904962.tar.bz2 |
pack_generic.c (pack): Add missing return and fix whitespace.
* intrinsics/pack_generic.c (pack): Add missing return and fix whitespace.
* intrinsics/cshift0.c (cshift0): Fix whitespace.
* intrinsics/unpack_generic.c (unpack1, unpack0): Fix whitespace.
From-SVN: r164230
Diffstat (limited to 'libgfortran/intrinsics/cshift0.c')
-rw-r--r-- | libgfortran/intrinsics/cshift0.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/intrinsics/cshift0.c b/libgfortran/intrinsics/cshift0.c index b765803..3ba2b37 100644 --- a/libgfortran/intrinsics/cshift0.c +++ b/libgfortran/intrinsics/cshift0.c @@ -218,7 +218,7 @@ cshift0 (gfc_array_char * ret, const gfc_array_char * array, cshift0_c4 ((gfc_array_c4 *) ret, (gfc_array_c4 *) array, shift, which); - return; + return; } else { @@ -242,7 +242,7 @@ cshift0 (gfc_array_char * ret, const gfc_array_char * array, cshift0_c8 ((gfc_array_c8 *) ret, (gfc_array_c8 *) array, shift, which); - return; + return; } else { |