From 894f306554ef358eee977e111041e7a9f1f2e2e5 Mon Sep 17 00:00:00 2001 From: jixiuf Date: Sun, 11 Aug 2019 12:04:10 +0800 Subject: rename string_length to length --- elisp.c | 4 ++-- elisp.h | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/elisp.c b/elisp.c index 4f2f106..0fe608a 100644 --- a/elisp.c +++ b/elisp.c @@ -28,7 +28,7 @@ int string_bytes(emacs_env *env, emacs_value string) { return size; } -emacs_value string_length(emacs_env *env, emacs_value string) { +emacs_value length(emacs_env *env, emacs_value string) { return env->funcall(env, Flength, 1, (emacs_value[]){string}); } @@ -39,7 +39,7 @@ emacs_value list(emacs_env *env, emacs_value elements[], ptrdiff_t len) { void put_text_property(emacs_env *env, emacs_value string, emacs_value property, emacs_value value) { emacs_value start = env->make_integer(env, 0); - emacs_value end = string_length(env, string); + emacs_value end = length(env, string); env->funcall(env, Fput_text_property, 5, (emacs_value[]){start, end, property, value, string}); diff --git a/elisp.h b/elisp.h index 5420728..73fc4ec 100644 --- a/elisp.h +++ b/elisp.h @@ -55,7 +55,7 @@ void bind_function(emacs_env *env, const char *name, emacs_value Sfun); void provide(emacs_env *env, const char *feature); emacs_value symbol_value(emacs_env *env, emacs_value symbol); int string_bytes(emacs_env *env, emacs_value string); -emacs_value string_length(emacs_env *env, emacs_value string); +emacs_value length(emacs_env *env, emacs_value string); emacs_value list(emacs_env *env, emacs_value elements[], ptrdiff_t len); void put_text_property(emacs_env *env, emacs_value string, emacs_value property, emacs_value value); -- cgit v1.0