summaryrefslogtreecommitdiff
path: root/test-suite/standalone/test-gh.c
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/standalone/test-gh.c')
-rw-r--r--test-suite/standalone/test-gh.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/test-suite/standalone/test-gh.c b/test-suite/standalone/test-gh.c
index 78cf87fa5..b273b4499 100644
--- a/test-suite/standalone/test-gh.c
+++ b/test-suite/standalone/test-gh.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1999,2000,2001,2003, 2006 Free Software Foundation, Inc.
+/* Copyright (C) 1999,2000,2001,2003, 2006, 2008 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
@@ -17,8 +17,8 @@
/* some bits originally by Jim Blandy <jimb@red-bean.com> */
-#include "libguile.h"
-#include "libguile/gh.h"
+#include <libguile.h>
+#include <libguile/gh.h>
#include <assert.h>
#include <string.h>
@@ -31,7 +31,7 @@ string_equal (SCM str, char *lit)
int len = strlen (lit);
int result;
- result = ((scm_i_string_length (str) == len)
+ result = ((scm_c_string_length (str) == len)
&& (!memcmp (scm_i_string_chars (str), lit, len)));
scm_remember_upto_here_1 (str);
return result;