summaryrefslogtreecommitdiff
path: root/libguile/strings.c
diff options
context:
space:
mode:
authorMichael Gran <spk121@yahoo.com>2009-08-19 21:24:23 -0700
committerMichael Gran <spk121@yahoo.com>2009-08-19 22:15:22 -0700
commitf8ba2bb9117d75c93503fe3dde9054f5ff92c51c (patch)
tree53a7a6c9132d0ad7208e00bd677418578a4ae21c /libguile/strings.c
parent1c7b216f848fd454db15881709ed766323cdeed3 (diff)
downloadguile-f8ba2bb9117d75c93503fe3dde9054f5ff92c51c.tar.gz
Rename string-width to string-bytes-per-char
* libguile/strings.h: rename scm_string_width to scm_string_bytes_per_char * libguile/strings.c (scm_string_width): renamed to scm_string_bytes_per_char (scm_string_bytes_per_char): renamed from scm_string_width * module/language/assembly/compile-bytecode.scm (write-bytecode): string-width -> string-bytes-per-char * module/language/glil/compile-assembly.scm (dump-object): string-width -> string-bytes-per-char
Diffstat (limited to 'libguile/strings.c')
-rw-r--r--libguile/strings.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/strings.c b/libguile/strings.c
index 50adee817..7ae100d8c 100644
--- a/libguile/strings.c
+++ b/libguile/strings.c
@@ -1098,11 +1098,11 @@ SCM_DEFINE (scm_string_length, "string-length", 1, 0, 0,
}
#undef FUNC_NAME
-SCM_DEFINE (scm_string_width, "string-width", 1, 0, 0,
+SCM_DEFINE (scm_string_bytes_per_char, "string-bytes-per-char", 1, 0, 0,
(SCM string),
"Return the bytes used to represent a character in @var{string}."
"This will return 1 or 4.")
-#define FUNC_NAME s_scm_string_width
+#define FUNC_NAME s_scm_string_bytes_per_char
{
SCM_VALIDATE_STRING (1, string);
if (!scm_i_is_narrow_string (string))