[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Skipping unexec via a big .elc file

From: Ken Raeburn
Subject: Re: Skipping unexec via a big .elc file
Date: Thu, 12 Jan 2017 03:17:40 -0500

On Jan 11, 2017, at 01:32, Ken Raeburn <address@hidden> wrote:
> Indeed, looking at dumped.elc, I see:
>  (#35# '#5646# '#218#)
> where 35 is set-default, 5646 is backquote-unquote-symbol, and 218 is 
> ,’set-window-parameter thanks to "#218=,’#897=set-window-parameter" being 
> read from dumped.elc.  I suspect 218 was supposed to be just the comma, but 
> the special printing of comma forms was still applied but is not compatible 
> with the #N# handling, so comma and related symbols should just be excluded 
> from that hack.

There were other instances that made it clear that “#218#” was being printed 
where “,” was intended, including with the lack of space before whatever 
followed that’s normal for a comma (e.g., “#218##219#” where #219# referred to 
some ordinary symbol).

I’ve just uploaded a workaround for that (including a comma-dot sequence that 
I’m not familiar with, but which seems to get the same treatment as comma and 
comma-at), and a bug fix I found relating to one of my earlier changes.

Now, with your patch to avoid unexec, it’s successfully compiling in the lisp 
directory but fails in leim, which I haven’t dug into yet:

make[2]: Entering directory '/home/raeburn/dev/emacs/s/lisp'
make -C ../leim all EMACS="../src/emacs"
make[3]: Entering directory '/home/raeburn/dev/emacs/s/leim'
/bin/mkdir -p ../lisp/leim/ja-dic
  GEN      ../lisp/leim/ja-dic/ja-dic.el
Loading ../src/dumped.elc...
Reading file "/home/raeburn/dev/emacs/s/leim/SKK-DIC/SKK-JISYO.L" ...
Processing OKURI-ARI entries ...
Debugger entered--Lisp error: (search-failed "^\\cH")
  (let ((from (point)) to) (search-forward ";; okuri-nasi") (beginning-of-line) 
(setq to (point)) (narrow-to-region from to) (skkdic-convert-okuri-ari skkbuf 
buf) (widen) (goto-char to) (forward-line 1) (setq from (point)) 
(re-search-forward "^\\cH") (setq to (match-beginning 0)) (narrow-to-region 
from to) (skkdic-convert-postfix skkbuf buf) (widen) (goto-char to) 
(skkdic-convert-prefix skkbuf buf) (skkdic-collect-okuri-nasi) 
(skkdic-convert-okuri-nasi skkbuf buf) (save-current-buffer (set-buffer buf) 
(goto-char (point-max)) (insert ";;\n(provide 'ja-dic)\n\n" ";; Local 
Variables:\n" ";; version-control: never\n" ";; no-update-autoloads: t\n" ";; 
coding: utf-8\n" ";; End:\n\n" ";;; ja-dic.el ends here\n")))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]