aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.6/libgfortran/intrinsics/string_intrinsics_inc.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.6/libgfortran/intrinsics/string_intrinsics_inc.c')
-rw-r--r--gcc-4.6/libgfortran/intrinsics/string_intrinsics_inc.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc-4.6/libgfortran/intrinsics/string_intrinsics_inc.c b/gcc-4.6/libgfortran/intrinsics/string_intrinsics_inc.c
index 64f5cd7..8335a38 100644
--- a/gcc-4.6/libgfortran/intrinsics/string_intrinsics_inc.c
+++ b/gcc-4.6/libgfortran/intrinsics/string_intrinsics_inc.c
@@ -90,7 +90,7 @@ compare_string (gfc_charlen_type len1, const CHARTYPE *s1,
gfc_charlen_type len;
int res;
- res = memcmp (s1, s2, ((len1 < len2) ? len1 : len2) * sizeof (CHARTYPE));
+ res = MEMCMP (s1, s2, ((len1 < len2) ? len1 : len2));
if (res != 0)
return res;