diff options
| author | Po Lu <luangruo@yahoo.com> | 2023-03-01 14:28:04 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2023-03-01 14:29:24 +0800 |
| commit | 7ef9a8210c9b6c2adf6094d8e85a50edd91e54e3 (patch) | |
| tree | 59b9d195cf2db62dd8137c45826db864ef722065 | |
| parent | ec1dea7b43f159ec58bc4f18db5a900cac655925 (diff) | |
| download | emacs-7ef9a8210c9b6c2adf6094d8e85a50edd91e54e3.tar.gz | |
Replace C++ comments with C style equivalents
* src/alloc.c (Fmake_byte_code, purecopy):
* src/bytecode.c (exec_byte_code):
* src/xdisp.c (face_at_pos): Do not use C++-style comments!
| -rw-r--r-- | src/alloc.c | 5 | ||||
| -rw-r--r-- | src/bytecode.c | 4 | ||||
| -rw-r--r-- | src/xdisp.c | 2 |
3 files changed, 6 insertions, 5 deletions
diff --git a/src/alloc.c b/src/alloc.c index f7a0a4a80c8..05a19f0b7e9 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -3542,7 +3542,8 @@ usage: (make-byte-code ARGLIST BYTE-CODE CONSTANTS DEPTH &optional DOCSTRING INT && FIXNATP (args[COMPILED_STACK_DEPTH]))) error ("Invalid byte-code object"); - pin_string (args[COMPILED_BYTECODE]); // Bytecode must be immovable. + /* Bytecode must be immovable. */ + pin_string (args[COMPILED_BYTECODE]); /* We used to purecopy everything here, if purify-flag was set. This worked OK for Emacs-23, but with Emacs-24's lexical binding code, it can be @@ -5687,7 +5688,7 @@ purecopy (Lisp_Object obj) memcpy (vec, objp, nbytes); for (i = 0; i < size; i++) vec->contents[i] = purecopy (vec->contents[i]); - // Byte code strings must be pinned. + /* Byte code strings must be pinned. */ if (COMPILEDP (obj) && size >= 2 && STRINGP (vec->contents[1]) && !STRING_MULTIBYTE (vec->contents[1])) pin_string (vec->contents[1]); diff --git a/src/bytecode.c b/src/bytecode.c index 124348e5b35..74a94859aba 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -789,10 +789,10 @@ exec_byte_code (Lisp_Object fun, ptrdiff_t args_template, Lisp_Object template; Lisp_Object bytecode; if (COMPILEDP (call_fun) - // Lexical binding only. + /* Lexical binding only. */ && (template = AREF (call_fun, COMPILED_ARGLIST), FIXNUMP (template)) - // No autoloads. + /* No autoloads. */ && (bytecode = AREF (call_fun, COMPILED_BYTECODE), !CONSP (bytecode))) { diff --git a/src/xdisp.c b/src/xdisp.c index b64f1d35cbc..6219bb9ec6e 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -4583,7 +4583,7 @@ face_at_pos (const struct it *it, enum lface_attribute_index attr_filter) &next_stop, base_face_id, false, attr_filter); - } // !STRINGP (it->string)) + } /* !STRINGP (it->string) */ } |