From: Po Lu <luangruo@yahoo.com>
Date: Wed, 1 Mar 2023 06:28:04 +0000 (+0800)
Subject: Replace C++ comments with C style equivalents
X-Git-Tag: emacs-29.0.90~285
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7ef9a8210c9b6c2adf6094d8e85a50edd91e54e3;p=emacs.git

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!
---

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) */
 }