[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#46387: 28.0.50; Compiled code making a variable dynamic stopped work
From: |
Michael Heerdegen |
Subject: |
bug#46387: 28.0.50; Compiled code making a variable dynamic stopped working |
Date: |
Mon, 08 Feb 2021 18:29:56 +0100 |
Hello,
the latest changes in byte-opt.el seem to have broken some of my code.
It worked since yesterday, and it still works when interpreted, but the
compiled code raises this error today:
#+begin_src emacs-lisp
Debugger entered--Lisp error: (void-variable number)
bbdb-anniv-diary-entries()
alarm-clock-diary-list-entries-hook-fun-to-alarm-clock(bbdb-anniv-diary-entries
#f(compiled-function (dt) #<bytecode 0x10302b42caa2d23>) #f(compiled-function
(&rest args2) #<bytecode -0x159ba228e7b687fb>))
#f(compiled-function () #<bytecode -0xe7267f5f0b223bb>)()
[...]
#+end_src
`alarm-clock-diary-list-entries-hook-fun-to-alarm-clock' has this
definition:
#+begin_src emacs-lisp
(defun alarm-clock-diary-list-entries-hook-fun-to-alarm-clock (fun &optional
date-fun filter-return)
;; For functions to put in `diary-list-entries-hook',
;; e.g. `bbdb-anniv-diary-entries'
(require 'calendar)
(require 'diary-lib)
(with-suppressed-warnings ((lexical date original-date number))
(defvar date)
(defvar original-date)
(defvar number))
(defvar diary-entries-list)
(let* ((date (funcall (or date-fun #'identity) (calendar-current-date)))
(original-date date)
(diary-entries-list '())
(number 1))
(funcall fun)
(dolist (to-add (funcall (or filter-return #'identity)
(mapcar #'substring-no-properties (mapcar #'cadr
diary-entries-list))))
(alarm-clock-add-automatically-maybe
to-add (list (alarm-clock-last-midnight))
nil '((origin . diary-list-entries-hook-fun))))))
#+end_src
FUN is bound to `bbdb-anniv-diary-entries'. `number' should be bound
dynamically when that function is `funcall'ed.
TIA,
Michael.
In GNU Emacs 28.0.50 (build 34, x86_64-pc-linux-gnu, GTK+ Version 3.24.24,
cairo version 1.16.0)
of 2021-02-08 built on drachen
Repository revision: f0afbebe7c423ec8b1003f88af11122dfec28dd1
Repository branch: master
Windowing system distributor 'The X.Org Foundation', version 11.0.12010000
System Description: Debian GNU/Linux bullseye/sid
- bug#46387: 28.0.50; Compiled code making a variable dynamic stopped working,
Michael Heerdegen <=