1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-07 06:50:23 -08:00

Fix instrumenting code with propertized strings in Edebug

* lisp/emacs-lisp/edebug.el (edebug-read-function): Allow
'read' to decide what is and isn't a syntax error.  (Bug#25068)
This commit is contained in:
Gemini Lasswell 2017-02-10 11:35:20 +02:00 committed by Eli Zaretskii
parent 2d284db5c9
commit c48f8fa51b

View file

@ -880,11 +880,9 @@ Maybe clear the markers and delete the symbol's edebug property?"
(list
(edebug-storing-offsets (- (point) 2) 'function)
(edebug-read-storing-offsets stream)))
((memq (following-char) '(?: ?B ?O ?X ?b ?o ?x ?1 ?2 ?3 ?4 ?5 ?6
?7 ?8 ?9 ?0))
(t
(backward-char 1)
(read stream))
(t (edebug-syntax-error "Bad char after #"))))
(read stream))))
(defun edebug-read-list (stream)
(forward-char 1) ; skip \(