diff options
| author | Po Lu | 2023-07-20 16:01:34 +0800 |
|---|---|---|
| committer | Po Lu | 2023-07-20 16:01:34 +0800 |
| commit | 3af27a4b815906c2ee38cbaf3a765289b3df061a (patch) | |
| tree | d607179dacce685b9ad627d2085ac4e0caa48c2d /src | |
| parent | 5de5e4b4d0a0d90240ca055d29f264be39831e16 (diff) | |
| download | emacs-3af27a4b815906c2ee38cbaf3a765289b3df061a.tar.gz emacs-3af27a4b815906c2ee38cbaf3a765289b3df061a.zip | |
Improve commentary in nsfns.m
* src/nsfns.m (lispString): Avoid C++ comment and make the
commentary actually relevant to the reason `make_string' is
used.
Diffstat (limited to 'src')
| -rw-r--r-- | src/nsfns.m | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/nsfns.m b/src/nsfns.m index 5ae2cc77bb2..fe565a423aa 100644 --- a/src/nsfns.m +++ b/src/nsfns.m | |||
| @@ -3829,7 +3829,11 @@ all_nonzero_ascii (unsigned char *str, ptrdiff_t n) | |||
| 3829 | /* Make a Lisp string from an NSString. */ | 3829 | /* Make a Lisp string from an NSString. */ |
| 3830 | - (Lisp_Object)lispString | 3830 | - (Lisp_Object)lispString |
| 3831 | { | 3831 | { |
| 3832 | // make_string behaves predictably and correctly with UTF-8 input. | 3832 | /* `make_string' creates a string with a given length, instead of |
| 3833 | searching for a trailing NULL byte to determine its end. This is | ||
| 3834 | important because this function is called to convert NSString | ||
| 3835 | objects containing clipboard data, which can contain NUL bytes, | ||
| 3836 | into Lisp strings. (bug#64697) */ | ||
| 3833 | return make_string ([self UTF8String], | 3837 | return make_string ([self UTF8String], |
| 3834 | [self lengthOfBytesUsingEncoding: NSUTF8StringEncoding]); | 3838 | [self lengthOfBytesUsingEncoding: NSUTF8StringEncoding]); |
| 3835 | } | 3839 | } |