]> git.eshelyaron.com Git - emacs.git/commitdiff
Pure storage removal: Remove docstring hack
authorPip Cet <pipcet@protonmail.com>
Tue, 20 Aug 2024 19:08:33 +0000 (19:08 +0000)
committerEshel Yaron <me@eshelyaron.com>
Mon, 3 Feb 2025 10:24:40 +0000 (11:24 +0100)
This should no longer be needed.

* src/eval.c (Fautoload): Don't try to work around pure storage bug.

(cherry picked from commit 69fea4f29a1390912e4140a3ebacc50b7338db6f)

src/eval.c

index f724d6d8052de9be982cbc261452fe4138910b13..f83633c52c80de315c1cd59d363c56b10e838459 100644 (file)
@@ -2317,12 +2317,6 @@ this does nothing and returns nil.  */)
       && !AUTOLOADP (XSYMBOL (function)->u.s.function))
     return Qnil;
 
-  if (!NILP (Vpurify_flag) && BASE_EQ (docstring, make_fixnum (0)))
-    /* `read1' in lread.c has found the docstring starting with "\
-       and assumed the docstring will be provided by Snarf-documentation, so it
-       passed us 0 instead.  But that leads to accidental sharing in purecopy's
-       hash-consing, so we use a (hopefully) unique integer instead.  */
-    docstring = make_ufixnum (XHASH (function));
   return Fdefalias (function,
                    list5 (Qautoload, file, docstring, interactive, type),
                    Qnil);