Re: MPS: hash tables / obarrays

[Gerd Möllmann]

Helmut Eller <eller.helmut@gmail.com> writes:

> On Wed, May 29 2024, Gerd Möllmann wrote:
>
>> BTW, I've made another attempt to get a grip on the native build on
>> arm64/macOS. No success. Strangely, when I built with -lmps instead of
>> -lmps-debug that worked.
>>
>> Do you build with -lmps-debug?
>
> Yes, I always used the debug version.  Have you tried to the make the
> entire rdstack and the prstack ambiguous roots?  Or perhaps there's
> another simple way to rule out bugs with reading/printing?

I've made the specbindings and bytecode stack ambiguous roots in their
entirety with no effect whatsoever.

The rd and pr stacks I've left alone because they don't really fit what
little I could see. One example, native-compiled:

(defun byte-compile-eval (form)
  "Eval FORM and mark the functions defined therein.
Each function's symbol gets added to `byte-compile-noruntime-functions'."
  (let ((hist-orig load-history)
        (hist-nil-orig current-load-list))
    (prog1 (eval form lexical-binding)
      (when (byte-compile-warning-enabled-p 'noruntime)
        (let* ((hist-new
                ;; Get new `current-load-list' for the locally defined funs.
                (cons (butlast current-load-list
                               (length hist-nil-orig))
                      load-history)))

Here length found that the first cons of the hist-nil-orig has been
forwarded. And the C code generated for soeed 0 and 1 is almost
identical. 0 works, 1 doesn't. And to add to that when I pass -O1 plus
all the -fxy options -O1 says it consists of as -fno-xy it still fails.

And so on and so on :-/,

BTW, just saw an hour ago that SAFE_ALLOCA_LISP can xzalloc an array of
Lisp_Objects. Nice nice :-/. I guess I'll put an emacs_abort there. Not
that it will help.