(COMPILED): Rename to CLOSURE

In preparation for the use of `PVEC_COMPILED` objects for
interpreted functions, rename them to use a more neutral name.

* src/lisp.h (enum pvec_type): Rename `PVEC_COMPILED` to `PVEC_CLOSURE`.
(enum Lisp_Compiled): Use `CLOSURE_` prefix i.s.o `COMPILED_`.
Also use `CODE` rather than `BYTECODE`.
(CLOSUREP): Rename from `COMPILEDP`.
(enum Lisp_Closure): Rename from `Lisp_Compiled`.

* src/alloc.c, src/bytecode.c, src/comp.c, src/data.c, src/eval.c,
* src/fns.c, src/lisp.h, src/lread.c, src/pdumper.c, src/print.c,
* src/profiler.c: Rename all uses accordingly.
* src/.gdbinit (xclosure): Rename from `xcompiled`.
(xcompiled): New obsolete alias.
(xpr): Adjust accordingly.  Also adjust to new PVEC_CLOSURE tag name.

1 files changed, 4 insertions, 4 deletions

diff --git a/src/doc.c b/src/doc.c
index 10afda73458..b698591f704 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -519,15 +519,15 @@ store_function_docstring (Lisp_Object obj, EMACS_INT offset)
   /* Lisp_Subrs have a slot for it.  */
   if (SUBRP (fun))
     XSUBR (fun)->doc = offset;
-  else if (COMPILEDP (fun))
+  else if (CLOSUREP (fun))
     {
       /* This bytecode object must have a slot for the docstring, since
          we've found a docstring for it.  */
-      if (PVSIZE (fun) > COMPILED_DOC_STRING
+      if (PVSIZE (fun) > CLOSURE_DOC_STRING
           /* Don't overwrite a non-docstring value placed there, such as
              the symbols used for Oclosures.  */
-          && VALID_DOCSTRING_P (AREF (fun, COMPILED_DOC_STRING)))
-        ASET (fun, COMPILED_DOC_STRING, make_fixnum (offset));
+          && VALID_DOCSTRING_P (AREF (fun, CLOSURE_DOC_STRING)))
+        ASET (fun, CLOSURE_DOC_STRING, make_fixnum (offset));
       else
         {
           AUTO_STRING (format, "No doc string slot for compiled: %S");