diff options
| author | Paul Eggert | 2011-06-19 11:44:58 -0700 |
|---|---|---|
| committer | Paul Eggert | 2011-06-19 11:44:58 -0700 |
| commit | f3e92b69d2fa865d82793ac41370045a85beb269 (patch) | |
| tree | f81999e2a07c63d125e8a0041b61fa0234dcfb00 /src/data.c | |
| parent | 1bfdaf108fd83f2c673a50eb069e29556e2e3ca6 (diff) | |
| download | emacs-f3e92b69d2fa865d82793ac41370045a85beb269.tar.gz emacs-f3e92b69d2fa865d82793ac41370045a85beb269.zip | |
* data.c (Fsubr_name): Rewrite to avoid a strlen call.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/data.c b/src/data.c index cf01d38036d..6b4ea32ac9e 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -703,7 +703,7 @@ SUBR must be a built-in function. */) | |||
| 703 | const char *name; | 703 | const char *name; |
| 704 | CHECK_SUBR (subr); | 704 | CHECK_SUBR (subr); |
| 705 | name = XSUBR (subr)->symbol_name; | 705 | name = XSUBR (subr)->symbol_name; |
| 706 | return make_string (name, strlen (name)); | 706 | return build_string (name); |
| 707 | } | 707 | } |
| 708 | 708 | ||
| 709 | DEFUN ("interactive-form", Finteractive_form, Sinteractive_form, 1, 1, 0, | 709 | DEFUN ("interactive-form", Finteractive_form, Sinteractive_form, 1, 1, 0, |