aboutsummaryrefslogtreecommitdiffstats
path: root/src/doc.c
diff options
context:
space:
mode:
authorPip Cet2021-05-16 15:44:26 +0200
committerStefan Monnier2022-07-01 09:42:00 -0400
commit094fd7ded365434b08f5d7c8ff499d17d566d54b (patch)
tree40366419e9d899e48c26439f428fee7b741d307c /src/doc.c
parent3a4c408a7b6f3df5ca0eb4a406efbdb4899e9742 (diff)
downloademacs-scratch/no-purespace-2.tar.gz
emacs-scratch/no-purespace-2.zip
Remove purespace from Emacsscratch/no-purespace-2
Diffstat (limited to 'src/doc.c')
-rw-r--r--src/doc.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/src/doc.c b/src/doc.c
index 34b80d03aa9..09c44e48422 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -450,8 +450,6 @@ store_function_docstring (Lisp_Object obj, EMACS_INT offset)
450 { 450 {
451 tem = Fcdr (Fcdr (fun)); 451 tem = Fcdr (Fcdr (fun));
452 if (CONSP (tem) && FIXNUMP (XCAR (tem))) 452 if (CONSP (tem) && FIXNUMP (XCAR (tem)))
453 /* FIXME: This modifies typically pure hash-cons'd data, so its
454 correctness is quite delicate. */
455 XSETCAR (tem, make_fixnum (offset)); 453 XSETCAR (tem, make_fixnum (offset));
456 } 454 }
457 } 455 }
@@ -541,7 +539,6 @@ the same file name is found in the `doc-directory'. */)
541 int i = ARRAYELTS (buildobj); 539 int i = ARRAYELTS (buildobj);
542 while (0 <= --i) 540 while (0 <= --i)
543 Vbuild_files = Fcons (build_string (buildobj[i]), Vbuild_files); 541 Vbuild_files = Fcons (build_string (buildobj[i]), Vbuild_files);
544 Vbuild_files = Fpurecopy (Vbuild_files);
545 } 542 }
546 543
547 fd = emacs_open (name, O_RDONLY, 0); 544 fd = emacs_open (name, O_RDONLY, 0);