diff options
Diffstat (limited to 'src/doc.c')
| -rw-r--r-- | src/doc.c | 3 |
1 files changed, 0 insertions, 3 deletions
| @@ -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); |