Don't warn about pure-space overflow

* lisp/startup.el (command-line-1): Don't warn about
pure-space overflow if we were dumped with pdumper.
(Bug#38492)

diff --git a/lisp/startup.el b/lisp/startup.el
index efd1ae9a4fcde7202cd1441e616caff483ff5221..04a37bf59e92ae7a4000b02a16152b3e4139d857 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -2324,7 +2324,11 @@ A fancy display is used on graphic displays, normal otherwise."
   "A subroutine of `command-line'."
   (display-startup-echo-area-message)
   (when (and pure-space-overflow
-            (not noninteractive))
+            (not noninteractive)
+             ;; If we were dumped with pdumper, we don't care about
+             ;; pure-space overflow.
+             (or (not (fboundp 'pdumper-stats))
+                 (null (pdumper-stats))))
     (display-warning
      'initialization
      "Building Emacs overflowed pure space.\