diff options
author | Michael Gran <spk121@yahoo.com> | 2009-08-19 21:24:23 -0700 |
---|---|---|
committer | Michael Gran <spk121@yahoo.com> | 2009-08-19 22:15:22 -0700 |
commit | f8ba2bb9117d75c93503fe3dde9054f5ff92c51c (patch) | |
tree | 53a7a6c9132d0ad7208e00bd677418578a4ae21c /libguile/strings.c | |
parent | 1c7b216f848fd454db15881709ed766323cdeed3 (diff) | |
download | guile-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.c | 4 |
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)) |