summaryrefslogtreecommitdiff
path: root/libgfortran/intrinsics/string_intrinsics.c
diff options
context:
space:
mode:
authorDaniel Kraft <d@domob.eu>2009-03-28 16:18:59 +0100
committerDaniel Kraft <domob@gcc.gnu.org>2009-03-28 16:18:59 +0100
commitbc6600ab2aeff09a928a28d2f74288ffcb5ad839 (patch)
treeedcb71475fc72529d3a9569925700265df2ab20f /libgfortran/intrinsics/string_intrinsics.c
parent6f1873a1cffee3fc59a1a0f479b58b8a82bc4e2c (diff)
downloadgcc-bc6600ab2aeff09a928a28d2f74288ffcb5ad839.tar.gz
string_intrinsics.c: #include <assert.h>
2009-03-28 Daniel Kraft <d@domob.eu> * intrinsics/string_intrinsics.c: #include <assert.h> * intrinsics/string_intrinsics_inc.c (string_trim): Use string_len_trim instead of calculating the length directly. (string_len_trim): For KIND=1, speed search up. 2009-03-28 Daniel Kraft <d@domob.eu> * gfortran.dg/trim_1.f90: New test. From-SVN: r145192
Diffstat (limited to 'libgfortran/intrinsics/string_intrinsics.c')
-rw-r--r--libgfortran/intrinsics/string_intrinsics.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/intrinsics/string_intrinsics.c b/libgfortran/intrinsics/string_intrinsics.c
index f6d9663f0ba..491b45e21df 100644
--- a/libgfortran/intrinsics/string_intrinsics.c
+++ b/libgfortran/intrinsics/string_intrinsics.c
@@ -39,6 +39,7 @@ Boston, MA 02110-1301, USA. */
#include <stdlib.h>
#include <string.h>
+#include <assert.h>
/* Helper function to set parts of wide strings to a constant (usually