From: Katsumi Yamaoka <yamaoka@jpl.org>
To: npostavs@users.sourceforge.net
Cc: 27340@debbugs.gnu.org
Subject: bug#27340: 26.0.50; byte-compile-delete-errors value changes unexpectedly
Date: Thu, 15 Jun 2017 17:49:49 +0900 [thread overview]
Message-ID: <b4mpoe5ocsy.fsf@jpl.org> (raw)
In-Reply-To: <b4mk24hqyzw.fsf@jpl.org>
On Mon, 12 Jun 2017 07:12:24 -0400, npostavs@users.sourceforge.net wrote:
> It's because of the 'cl-declaim' around that 'cl-defstruct':
> (progn
> ;; Arrange for field access not to bother checking if the access is indeed
> ;; made to an eieio--class object.
> (cl-declaim (optimize (safety 0)))
> (cl-defstruct (eieio--class
> ...
> )
> ;; Set it back to the default value.
> (cl-declaim (optimize (safety 1))))
> The problem is that the default (safety 1) value is not default with
> respect to byte-compile-delete-errors:
I see both (cl-declaim..) forms set `byte-compile-delete-errors'
to t. Thanks. Then I tried this:
--8<---------------cut here---------------start------------->8---
--- eieio-core.el~ 2017-04-19 22:03:44.676418700 +0000
+++ eieio-core.el 2017-06-15 08:46:36.995604500 +0000
@@ -82,5 +82,7 @@
(defvar eieio-default-superclass nil)
-(progn
+(require 'bytecomp)
+(require 'cl-macs)
+(let ((byte-compile-delete-errors byte-compile-delete-errors))
;; Arrange for field access not to bother checking if the access is indeed
;; made to an eieio--class object.
--8<---------------cut here---------------end--------------->8---
This solves the problem, though I'm not sure it is the right way.
Loading bytecomp is necessary for `byte-compile-delete-errors',
and cl-macs is necessary not to defer performing cl-declaim,
i.e., to perform cl-declaim while `byte-compile-delete-errors'
is let-bound.
Regards,
next prev parent reply other threads:[~2017-06-15 8:49 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2017-06-12 10:30 bug#27340: 26.0.50; byte-compile-delete-errors value changes unexpectedly Katsumi Yamaoka
2017-06-12 11:12 ` npostavs
2017-06-15 8:49 ` Katsumi Yamaoka [this message]
2017-06-16 11:37 ` npostavs
2017-06-19 9:23 ` Katsumi Yamaoka
2017-06-24 14:19 ` npostavs
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=b4mpoe5ocsy.fsf@jpl.org \
--to=yamaoka@jpl.org \
--cc=27340@debbugs.gnu.org \
--cc=npostavs@users.sourceforge.net \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.