Re: [Stephen.Berman@gmx.net: Emacs hangs while edebugging recentf.el]

[David PONCE <david.ponce@wanadoo.fr>]

Hi,

> It could be a bug in prin1-to-string.  What is the value
> of print-circle at that time?

It is t.  It is let-bound by the function `edebug-safe-prin1-to-string'
that wraps the built-in `prin1-to-string'.  Here are the relevant parts
of edebug code:

...

(defcustom edebug-print-length 50
  "*Default value of `print-length' for printing results in Edebug."
  :type 'integer
  :group 'edebug)
(defcustom edebug-print-level 50
  "*Default value of `print-level' for printing results in Edebug."
  :type 'integer
  :group 'edebug)
(defcustom edebug-print-circle t
  "*Default value of `print-circle' for printing results in Edebug."
  :type 'boolean
  :group 'edebug)

...

;; Define here in case they are not already defined.
(defvar print-level nil)
(defvar print-circle nil)
(defvar print-readably) ;; defined by lemacs
;; Alternatively, we could change the definition of
;; edebug-safe-prin1-to-string to only use these if defined.

(defun edebug-safe-prin1-to-string (value)
  (let ((print-escape-newlines t)
	(print-length (or edebug-print-length print-length))
	(print-level (or edebug-print-level print-level))
	(print-circle (or edebug-print-circle print-circle))
	(print-readably nil)) ;; lemacs uses this.
    (edebug-prin1-to-string value)))

...

`edebug-prin1-to-string' is an alias for `prin1-to-string'.

Sincerely,
David