unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list
@ 2020-02-26 21:33 No Wayman
  2020-02-27  1:38 ` Noam Postavsky
  0 siblings, 1 reply; 6+ messages in thread
From: No Wayman @ 2020-02-26 21:33 UTC (permalink / raw)
  To: 39805


While developing a package that utilizes circular lists, I ran 
into a bug when trying to describe-variable
a variable that contains circular lists. I've hewed it down to the 
following:

** Minimal Reproducible Case
#+begin_src emacs-lisp :results raw h replace
(condition-case-unless-debug err
    (with-temp-buffer
      (insert "(#9=() :key val)")
      (pp-buffer)
      nil)
  (error err)))
#+end_src
*** Throws
(scan-error Containing expression ends prematurely 1 1)
*** Expected
nil
*** Additional Info
- My hunch is that the problem lies in syntax.c's scan_lists, but 
  I have not had time to look deeply into it.

- The error is not thrown when the string contains only one of the 
  "#" or ":" characters.
For example: "(9=() :key val)" or "(#9=() key val)".

- Issue exists when running "emacs -Q" as far back as v25.3.2 
  (have not tested earlier versions)

**** backtrace
#+begin_src emacs-lisp
Debugger entered--Lisp error: (scan-error "Containing expression 
ends prematurely" 1 1)
  scan-sexps(3 -1)
  forward-sexp(-1)
  calculate-lisp-indent((1 1 5 nil nil nil 0 nil nil (1) nil))
  lisp-indent-calc-next(#s(lisp-indent-state :stack (nil) :ppss (0 
  nil nil nil nil nil 0 nil nil nil nil) :ppss-point 1))
  indent-sexp()
  pp-buffer()
  (progn (insert "(#9=() :key val)") (pp-buffer) nil)
  (unwind-protect (progn (insert "(#9=() :key val)") (pp-buffer) 
  nil) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect 
  (progn (insert "(#9=() :key val)") (pp-buffer) nil) (and 
  (buffer-name temp-buffer) (kill-buffer temp-buffer))))
  (with-current-buffer temp-buffer (unwind-protect (progn (insert 
  "(#9=() :key val)") (pp-buffer) nil) (and (buffer-name 
  temp-buffer) (kill-buffer temp-buffer))))
  (let ((temp-buffer (generate-new-buffer " *temp*"))) 
  (with-current-buffer temp-buffer (unwind-protect (progn (insert 
  "(#9=() :key val)") (pp-buffer) nil) (and (buffer-name 
  temp-buffer) (kill-buffer temp-buffer)))))
  (with-temp-buffer (insert "(#9=() :key val)") (pp-buffer) nil)
  (condition-case err (with-temp-buffer (insert "(#9=() :key 
  val)") (pp-buffer) nil) ((debug error) err))
  (condition-case-unless-debug err (with-temp-buffer (insert 
  "(#9=() :key val)") (pp-buffer) nil) (error err))
  (progn (condition-case-unless-debug err (with-temp-buffer 
  (insert "(#9=() :key val)") (pp-buffer) nil) (error err)))
  eval((progn (condition-case-unless-debug err (with-temp-buffer 
  (insert "(#9=() :key val)") (pp-buffer) nil) (error err))) nil)
  org-babel-execute:emacs-lisp("(condition-case-unless-debug err\n 
  (with-temp-buffer\n      (insert \"(#9=() :key val)\")\n 
  (pp-buffer)\n      nil)\n  (error err)))" ((:colname-names) 
  (:rowname-names) (:result-params "raw" "h" "replace") 
  (:result-type . value) (:results . "raw h replace") (:exports . 
  "code") (:session . "none") (:cache . "no") (:noweb . "no") 
  (:hlines . "no") (:tangle . "no") (:lexical . "no")))
  org-babel-execute-src-block(nil ("emacs-lisp" 
  "(condition-case-unless-debug err\n    (with-temp-buffer\n 
  (insert \"(#9=() :key val)\")\n      (pp-buffer)\n      nil)\n 
  (error err)))" ((:colname-names) (:rowname-names) 
  (:result-params "replace" "h" "raw") (:result-type . value) 
  (:results . "replace h raw") (:exports . "code") (:lexical . 
  "no") (:tangle . "no") (:hlines . "no") (:noweb . "no") (:cache 
  . "no") (:session . "none")) "" nil 47 "(ref:%s)"))
  org-ctrl-c-ctrl-c(nil)
  funcall-interactively(org-ctrl-c-ctrl-c nil)
  call-interactively(org-ctrl-c-ctrl-c nil nil)
  command-execute(org-ctrl-c-ctrl-c)
#+end_src

If any additional information would be useful or testing needs to 
be done, I'm happy to help. Thank you.


In GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, X toolkit, 
cairo version 1.17.3, Xaw3d scroll bars)
 of 2020-02-23 built on arch
Repository revision: eb34c108e234c3195ae75f14ec6c5b0964f022ad
Repository branch: master
Windowing system distributor 'The X.Org Foundation', version 
11.0.12007000
System Description: Arch Linux

Recent messages:
[mu4e] Indexing completed; processed 1623, updated 0, cleaned-up 0
Auto-saving...done
Mark set
evil-line-move: End of buffer
Mark set [4 times]
evil-line-move: Beginning of buffer [11 times]
Mark set [3 times]
Error in post-command-hook (flyspell-post-command-hook): 
(search-failed "
  Basics")
user-error: No window right from selected window
evil-line-move: Beginning of buffer
Configured using:
 'configure --prefix=/usr --sysconfdir=/etc --libexecdir=/usr/lib
 --localstatedir=/var --mandir=/usr/share/man 
 --with-gameuser=:games
 --with-sound=alsa --with-modules --without-gconf 
 --without-gsettings
 --enable-link-time-optimization --with-x-toolkit=lucid --with-xft
 --with-xaw3d --without-m17n-flt --with-cairo 
 --without-compress-install
 'CFLAGS=-march=x86-64 -mtune=generic -O2 -pipe 
 -fstack-protector-strong
 -fno-plt -g -flto -fuse-linker-plugin -s -fuse-ld=gold'
 CPPFLAGS=-D_FORTIFY_SOURCE=2
 LDFLAGS=-Wl,-O1,--sort-common,--as-needed,-z,relro,-z,now'
Configured features:
XAW3D XPM JPEG TIFF GIF PNG RSVG CAIRO SOUND GPM DBUS GLIB NOTIFY
INOTIFY ACL GNUTLS LIBXML2 FREETYPE HARFBUZZ LIBOTF ZLIB
TOOLKIT_SCROLL_BARS LUCID X11 XDBE XIM MODULES THREADS LIBSYSTEMD 
JSON
PDUMPER LCMS2 GMP
Important settings:
  value of $LANG: en_US.UTF-8
  locale-coding-system: utf-8-unix

Major mode: Org

Minor modes in effect:
  writegood-mode: t
  org-better-repeat-mode: t
  org-bullets-mode: t
  org-fancy-priorities-mode: t
  org-indent-mode: t
  dimmer-mode: t
  global-auto-revert-mode: t
  savehist-mode: t
  show-paren-mode: t
  global-skip-buffers-mode: t
  recentf-mode: t
  helm-flx-mode: t
  helm-mode: t
  helm--remap-mouse-mode: t
  doom-modeline-mode: t
  which-key-mode: t
  display-time-mode: t
  async-bytecomp-package-mode: t
  general-override-mode: t
  global-evil-collection-unimpaired-mode: t
  evil-collection-unimpaired-mode: t
  global-undo-tree-mode: t
  undo-tree-mode: t
  flyspell-mode: t
  shell-dirtrack-mode: t
  evil-mode: t
  evil-local-mode: t
  override-global-mode: t
  straight-use-package-mode: t
  straight-package-neutering-mode: t
  tooltip-mode: t
  global-eldoc-mode: t
  eldoc-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  tool-bar-mode: t
  prettify-symbols-mode: t
  tab-bar-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: (only . t)

Load-path shadows:
/home/n/.emacs.d/straight/build/org-plus-contrib/org-lint hides 
/home/n/.emacs.d/straight/build/org/org-lint
/home/n/.emacs.d/straight/build/org-plus-contrib/org-duration 
hides /home/n/.emacs.d/straight/build/org/org-duration
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-shell hides 
/home/n/.emacs.d/straight/build/org/ob-shell
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-docview hides 
/home/n/.emacs.d/straight/build/org/ol-docview
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-exp hides 
/home/n/.emacs.d/straight/build/org/ob-exp
/home/n/.emacs.d/straight/build/org-plus-contrib/org-plot hides 
/home/n/.emacs.d/straight/build/org/org-plot
/home/n/.emacs.d/straight/build/org-plus-contrib/org-colview hides 
/home/n/.emacs.d/straight/build/org/org-colview
/home/n/.emacs.d/straight/build/org-plus-contrib/org-crypt hides 
/home/n/.emacs.d/straight/build/org/org-crypt
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-sqlite hides 
/home/n/.emacs.d/straight/build/org/ob-sqlite
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-C hides 
/home/n/.emacs.d/straight/build/org/ob-C
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-publish hides 
/home/n/.emacs.d/straight/build/org/ox-publish
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-html hides 
/home/n/.emacs.d/straight/build/org/ox-html
/home/n/.emacs.d/straight/build/org-plus-contrib/org-tempo hides 
/home/n/.emacs.d/straight/build/org/org-tempo
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-screen hides 
/home/n/.emacs.d/straight/build/org/ob-screen
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-abc hides 
/home/n/.emacs.d/straight/build/org/ob-abc
/home/n/.emacs.d/straight/build/org-plus-contrib/org-faces hides 
/home/n/.emacs.d/straight/build/org/org-faces
/home/n/.emacs.d/straight/build/org-plus-contrib/org-archive hides 
/home/n/.emacs.d/straight/build/org/org-archive
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-icalendar 
hides /home/n/.emacs.d/straight/build/org/ox-icalendar
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-matlab hides 
/home/n/.emacs.d/straight/build/org/ob-matlab
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-bbdb hides 
/home/n/.emacs.d/straight/build/org/ol-bbdb
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-R hides 
/home/n/.emacs.d/straight/build/org/ob-R
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-python hides 
/home/n/.emacs.d/straight/build/org/ob-python
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-w3m hides 
/home/n/.emacs.d/straight/build/org/ol-w3m
/home/n/.emacs.d/straight/build/org-plus-contrib/ol hides 
/home/n/.emacs.d/straight/build/org/ol
/home/n/.emacs.d/straight/build/org-plus-contrib/org-pcomplete 
hides /home/n/.emacs.d/straight/build/org/org-pcomplete
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-beamer hides 
/home/n/.emacs.d/straight/build/org/ox-beamer
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-maxima hides 
/home/n/.emacs.d/straight/build/org/ob-maxima
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-css hides 
/home/n/.emacs.d/straight/build/org/ob-css
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-eshell hides 
/home/n/.emacs.d/straight/build/org/ol-eshell
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-odt hides 
/home/n/.emacs.d/straight/build/org/ox-odt
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-ebnf hides 
/home/n/.emacs.d/straight/build/org/ob-ebnf
/home/n/.emacs.d/straight/build/org-plus-contrib/org-element hides 
/home/n/.emacs.d/straight/build/org/org-element
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-table hides 
/home/n/.emacs.d/straight/build/org/ob-table
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-perl hides 
/home/n/.emacs.d/straight/build/org/ob-perl
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-dot hides 
/home/n/.emacs.d/straight/build/org/ob-dot
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-io hides 
/home/n/.emacs.d/straight/build/org/ob-io
/home/n/.emacs.d/straight/build/org-plus-contrib/org-goto hides 
/home/n/.emacs.d/straight/build/org/org-goto
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-rmail hides 
/home/n/.emacs.d/straight/build/org/ol-rmail
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-eshell hides 
/home/n/.emacs.d/straight/build/org/ob-eshell
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-tangle hides 
/home/n/.emacs.d/straight/build/org/ob-tangle
/home/n/.emacs.d/straight/build/org-plus-contrib/org-num hides 
/home/n/.emacs.d/straight/build/org/org-num
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-mscgen hides 
/home/n/.emacs.d/straight/build/org/ob-mscgen
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-info hides 
/home/n/.emacs.d/straight/build/org/ol-info
/home/n/.emacs.d/straight/build/org-plus-contrib/org-habit hides 
/home/n/.emacs.d/straight/build/org/org-habit
/home/n/.emacs.d/straight/build/org-plus-contrib/ob hides 
/home/n/.emacs.d/straight/build/org/ob
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-org hides 
/home/n/.emacs.d/straight/build/org/ob-org
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-clojure hides 
/home/n/.emacs.d/straight/build/org/ob-clojure
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-eww hides 
/home/n/.emacs.d/straight/build/org/ol-eww
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-bibtex hides 
/home/n/.emacs.d/straight/build/org/ol-bibtex
/home/n/.emacs.d/straight/build/org-plus-contrib/org-clock hides 
/home/n/.emacs.d/straight/build/org/org-clock
/home/n/.emacs.d/straight/build/org-plus-contrib/org-indent hides 
/home/n/.emacs.d/straight/build/org/org-indent
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-lua hides 
/home/n/.emacs.d/straight/build/org/ob-lua
/home/n/.emacs.d/straight/build/org-plus-contrib/org-macro hides 
/home/n/.emacs.d/straight/build/org/org-macro
/home/n/.emacs.d/straight/build/org-plus-contrib/org-attach hides 
/home/n/.emacs.d/straight/build/org/org-attach
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-ruby hides 
/home/n/.emacs.d/straight/build/org/ob-ruby
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-picolisp hides 
/home/n/.emacs.d/straight/build/org/ob-picolisp
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-awk hides 
/home/n/.emacs.d/straight/build/org/ob-awk
/home/n/.emacs.d/straight/build/org-plus-contrib/org-src hides 
/home/n/.emacs.d/straight/build/org/org-src
/home/n/.emacs.d/straight/build/org-plus-contrib/org-agenda hides 
/home/n/.emacs.d/straight/build/org/org-agenda
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-stan hides 
/home/n/.emacs.d/straight/build/org/ob-stan
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-ref hides 
/home/n/.emacs.d/straight/build/org/ob-ref
/home/n/.emacs.d/straight/build/org-plus-contrib/org-capture hides 
/home/n/.emacs.d/straight/build/org/org-capture
/home/n/.emacs.d/straight/build/org-plus-contrib/org-loaddefs 
hides /home/n/.emacs.d/straight/build/org/org-loaddefs
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-latex hides 
/home/n/.emacs.d/straight/build/org/ob-latex
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-md hides 
/home/n/.emacs.d/straight/build/org/ox-md
/home/n/.emacs.d/straight/build/org-plus-contrib/org-keys hides 
/home/n/.emacs.d/straight/build/org/org-keys
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-core hides 
/home/n/.emacs.d/straight/build/org/ob-core
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-plantuml hides 
/home/n/.emacs.d/straight/build/org/ob-plantuml
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-sed hides 
/home/n/.emacs.d/straight/build/org/ob-sed
/home/n/.emacs.d/straight/build/org-plus-contrib/org-feed hides 
/home/n/.emacs.d/straight/build/org/org-feed
/home/n/.emacs.d/straight/build/org-plus-contrib/org-compat hides 
/home/n/.emacs.d/straight/build/org/org-compat
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-js hides 
/home/n/.emacs.d/straight/build/org/ob-js
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-irc hides 
/home/n/.emacs.d/straight/build/org/ol-irc
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-coq hides 
/home/n/.emacs.d/straight/build/org/ob-coq
/home/n/.emacs.d/straight/build/org-plus-contrib/org-list hides 
/home/n/.emacs.d/straight/build/org/org-list
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-sql hides 
/home/n/.emacs.d/straight/build/org/ob-sql
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-calc hides 
/home/n/.emacs.d/straight/build/org/ob-calc
/home/n/.emacs.d/straight/build/org-plus-contrib/org-attach-git 
hides /home/n/.emacs.d/straight/build/org/org-attach-git
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-lilypond hides 
/home/n/.emacs.d/straight/build/org/ob-lilypond
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-asymptote 
hides /home/n/.emacs.d/straight/build/org/ob-asymptote
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-J hides 
/home/n/.emacs.d/straight/build/org/ob-J
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-texinfo hides 
/home/n/.emacs.d/straight/build/org/ox-texinfo
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-forth hides 
/home/n/.emacs.d/straight/build/org/ob-forth
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-scheme hides 
/home/n/.emacs.d/straight/build/org/ob-scheme
/home/n/.emacs.d/straight/build/org-plus-contrib/org-id hides 
/home/n/.emacs.d/straight/build/org/org-id
/home/n/.emacs.d/straight/build/org-plus-contrib/org-protocol 
hides /home/n/.emacs.d/straight/build/org/org-protocol
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-sass hides 
/home/n/.emacs.d/straight/build/org/ob-sass
/home/n/.emacs.d/straight/build/org-plus-contrib/org-footnote 
hides /home/n/.emacs.d/straight/build/org/org-footnote
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-latex hides 
/home/n/.emacs.d/straight/build/org/ox-latex
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-hledger hides 
/home/n/.emacs.d/straight/build/org/ob-hledger
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-ditaa hides 
/home/n/.emacs.d/straight/build/org/ob-ditaa
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-gnuplot hides 
/home/n/.emacs.d/straight/build/org/ob-gnuplot
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-emacs-lisp 
hides /home/n/.emacs.d/straight/build/org/ob-emacs-lisp
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-processing 
hides /home/n/.emacs.d/straight/build/org/ob-processing
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-makefile hides 
/home/n/.emacs.d/straight/build/org/ob-makefile
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-fortran hides 
/home/n/.emacs.d/straight/build/org/ob-fortran
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-lob hides 
/home/n/.emacs.d/straight/build/org/ob-lob
/home/n/.emacs.d/straight/build/org-plus-contrib/org-ctags hides 
/home/n/.emacs.d/straight/build/org/org-ctags
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-shen hides 
/home/n/.emacs.d/straight/build/org/ob-shen
/home/n/.emacs.d/straight/build/org-plus-contrib/org-macs hides 
/home/n/.emacs.d/straight/build/org/org-macs
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-mhe hides 
/home/n/.emacs.d/straight/build/org/ol-mhe
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-man hides 
/home/n/.emacs.d/straight/build/org/ox-man
/home/n/.emacs.d/straight/build/org-plus-contrib/ol-gnus hides 
/home/n/.emacs.d/straight/build/org/ol-gnus
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-vala hides 
/home/n/.emacs.d/straight/build/org/ob-vala
/home/n/.emacs.d/straight/build/org-plus-contrib/org-datetree 
hides /home/n/.emacs.d/straight/build/org/org-datetree
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-org hides 
/home/n/.emacs.d/straight/build/org/ox-org
/home/n/.emacs.d/straight/build/org-plus-contrib/org hides 
/home/n/.emacs.d/straight/build/org/org
/home/n/.emacs.d/straight/build/org-plus-contrib/org-entities 
hides /home/n/.emacs.d/straight/build/org/org-entities
/home/n/.emacs.d/straight/build/org-plus-contrib/org-install hides 
/home/n/.emacs.d/straight/build/org/org-install
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-comint hides 
/home/n/.emacs.d/straight/build/org/ob-comint
/home/n/.emacs.d/straight/build/org-plus-contrib/ox-ascii hides 
/home/n/.emacs.d/straight/build/org/ox-ascii
/home/n/.emacs.d/straight/build/org-plus-contrib/org-mouse hides 
/home/n/.emacs.d/straight/build/org/org-mouse
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-java hides 
/home/n/.emacs.d/straight/build/org/ob-java
/home/n/.emacs.d/straight/build/org-plus-contrib/org-inlinetask 
hides /home/n/.emacs.d/straight/build/org/org-inlinetask
/home/n/.emacs.d/straight/build/org-plus-contrib/org-timer hides 
/home/n/.emacs.d/straight/build/org/org-timer
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-octave hides 
/home/n/.emacs.d/straight/build/org/ob-octave
/home/n/.emacs.d/straight/build/org-plus-contrib/org-refile hides 
/home/n/.emacs.d/straight/build/org/org-refile
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-eval hides 
/home/n/.emacs.d/straight/build/org/ob-eval
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-groovy hides 
/home/n/.emacs.d/straight/build/org/ob-groovy
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-ocaml hides 
/home/n/.emacs.d/straight/build/org/ob-ocaml
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-haskell hides 
/home/n/.emacs.d/straight/build/org/ob-haskell
/home/n/.emacs.d/straight/build/org-plus-contrib/org-table hides 
/home/n/.emacs.d/straight/build/org/org-table
/home/n/.emacs.d/straight/build/org-plus-contrib/ox hides 
/home/n/.emacs.d/straight/build/org/ox
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-ledger hides 
/home/n/.emacs.d/straight/build/org/ob-ledger
/home/n/.emacs.d/straight/build/org-plus-contrib/ob-lisp hides 
/home/n/.emacs.d/straight/build/org/ob-lisp
/home/n/.emacs.d/straight/build/org-plus-contrib/org-mobile hides 
/home/n/.emacs.d/straight/build/org/org-mobile
/home/n/.emacs.d/straight/build/mu4e/mu4e-view hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-view
/home/n/.emacs.d/straight/build/mu4e/mu4e-actions hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-actions
/home/n/.emacs.d/straight/build/mu4e/mu4e-proc hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-proc
/home/n/.emacs.d/straight/build/mu4e/mu4e-icalendar hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-icalendar
/home/n/.emacs.d/straight/build/mu4e/mu4e-speedbar hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-speedbar
/home/n/.emacs.d/straight/build/mu4e/mu4e-main hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-main
/home/n/.emacs.d/straight/build/mu4e/mu4e-contrib hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-contrib
/home/n/.emacs.d/straight/build/mu4e/mu4e-context hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-context
/home/n/.emacs.d/straight/build/mu4e/mu4e-vars hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-vars
/home/n/.emacs.d/straight/build/mu4e/mu4e-mark hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-mark
/home/n/.emacs.d/straight/build/mu4e/mu4e-message hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-message
/home/n/.emacs.d/straight/build/mu4e/mu4e hides 
/usr/share/emacs/site-lisp/mu4e/mu4e
/home/n/.emacs.d/straight/build/mu4e/mu4e-org hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-org
/home/n/.emacs.d/straight/build/mu4e/mu4e-headers hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-headers
/home/n/.emacs.d/straight/build/mu4e/mu4e-draft hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-draft
/home/n/.emacs.d/straight/build/mu4e/org-mu4e hides 
/usr/share/emacs/site-lisp/mu4e/org-mu4e
/home/n/.emacs.d/straight/build/mu4e/mu4e-utils hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-utils
/home/n/.emacs.d/straight/build/mu4e/mu4e-compose hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-compose
/home/n/.emacs.d/straight/build/mu4e/mu4e-lists hides 
/usr/share/emacs/site-lisp/mu4e/mu4e-lists
/home/n/.emacs.d/straight/build/let-alist/let-alist hides 
/usr/share/emacs/28.0.50/lisp/emacs-lisp/let-alist

Features:
(shadow mule-util cal-china lunar solar cal-dst cal-bahai 
cal-islam
cal-hebrew holidays hol-loaddefs diary-lib diary-loaddefs emacsbug
stardict-utils helm-flyspell ox-org ox-odt rng-loc rng-uri 
rng-parse
rng-match rng-dt rng-util rng-pttrn nxml-parse nxml-ns nxml-enc 
xmltok
nxml-util ox-latex ox-icalendar ox-html table ox-ascii ox-publish 
ox
image-file tramp tramp-loaddefs trampver tramp-integration files-x
tramp-compat ls-lisp ffap parse-time iso8601 js imenu cc-mode 
cc-fonts
cc-guess cc-menus cc-cmds cc-styles cc-align cc-engine cc-vars 
cc-defs
elfeed-org evil-collection-elfeed elfeed-show elfeed-search shr 
svg dom
elfeed-csv elfeed elfeed-curl elfeed-log elfeed-db elfeed-lib 
url-queue
xml-query evil-anzu anzu org-region-link misearch multi-isearch
org-eldoc org-journal org-crypt cal-iso writegood-mode
org-better-repeat-mode org-bullets org-fancy-priorities org-indent
org-element avl-tree generator disp-table org-habit org-agenda
org-refile mu4e-alert pcase ht alert log4e notifications dbus gntp
evil-collection-mu4e mu4e desktop frameset mu4e-org mu4e-main 
mu4e-view
mu4e-headers mu4e-compose mu4e-context mu4e-draft mu4e-actions 
rfc2368
mu4e-mark mu4e-message flow-fill mu4e-proc mu4e-utils
evil-collection-doc-view doc-view jka-compr mu4e-lists hl-line 
mu4e-vars
message rmc puny rfc822 mml mml-sec evil-collection-epa epa 
derived epg
epg-config gnus-util rmail rmail-loaddefs mm-decode mm-bodies 
mm-encode
mail-parse rfc2231 mailabbrev gmm-utils mailheader mu4e-meta org 
ob
ob-tangle ob-ref ob-lob ob-table ob-exp org-macro org-footnote 
org-src
ob-comint org-pcomplete org-list org-faces org-entities time-date
evil-collection-outline noutline outline ob-emacs-lisp ob-core 
ob-eval
org-table ol org-keys org-compat org-macs org-loaddefs
evil-collection-calendar cal-menu calendar cal-loaddefs ido
evil-collection-dired dired dired-loaddefs helm-x-files sort
helm-command helm-elisp helm-eval evil-collection-edebug edebug 
tabify
miscellany dimmer autorevert filenotify savehist paren 
skip-buffers
help-fns radix-tree cl-print evil-collection-debug debug backtrace
find-func vc-mtn vc-hg evil-collection-vc-git vc-git
evil-collection-diff-mode diff-mode vc-bzr vc-src vc-sccs vc-svn 
vc-cvs
vc-rcs vc vc-dispatcher project winner flx recentf tree-widget
helm-for-files helm-bookmark helm-adaptive helm-info
evil-collection-bookmark bookmark text-property-search pp 
helm-external
helm-net browse-url xml url url-proxy url-privacy url-expand 
url-methods
url-history url-cookie url-domsuf url-util url-parse url-vars 
mailcap
helm-flx helm-mode evil-collection-helm helm-files helm-buffers
helm-occur helm-tags helm-locate helm-grep helm-regexp format-spec
helm-utils helm-help helm-types helm helm-source eieio-compat
helm-multi-match helm-lib face-remap server 
highlight-indent-guides
doom-modeline doom-modeline-segments doom-modeline-env
doom-modeline-core shrink-path rx f s dash ace-window-autoloads
tongle-autoloads zerodark-theme-autoloads yasnippet-autoloads
writegood-mode-autoloads wikinforg-autoloads 
evil-collection-which-key
which-key which-key-autoloads vterm-autoloads time mine-theme
stardict-utils-autoloads smtpmail auth-source eieio eieio-core
eieio-loaddefs password-cache json map sendmail rfc2047 rfc2045
ietf-drums mm-util mail-prsvr mail-utils slime-autoloads
macrostep-autoloads skip-buffers-autoloads shr-color color
rainbow-mode-autoloads pdf-tools-autoloads tablist-autoloads
org-ql-autoloads peg-autoloads ov-autoloads 
org-super-agenda-autoloads
ts-autoloads org-region-link-autoloads org-make-toc-autoloads
org-mime-autoloads org-live-preview-autoloads 
org-journal-autoloads
org-fancy-priorities-autoloads org-clean-refile-autoloads
org-bullets-autoloads org-better-repeat-mode-autoloads 
all-the-icons
all-the-icons-faces data-material data-weathericons data-octicons
data-fileicons data-faicons data-alltheicons memoize
org-plus-contrib-autoloads novice nov-autoloads esxml-autoloads
mu4e-alert-autoloads ht-autoloads alert-autoloads log4e-autoloads
gntp-autoloads mu4e-autoloads miscellany-autoloads
markdown-mode-autoloads magit-autoloads git-commit-autoloads
with-editor-autoloads transient-autoloads link-hint-autoloads
avy-autoloads js2-mode-autoloads hydra lv hydra-autoloads 
lv-autoloads
htmlize-autoloads highlight-indent-guides-autoloads 
helm-swoop-autoloads
helm-org-rifle-autoloads helm-projectile-autoloads 
projectile-autoloads
helm-flyspell-autoloads helm-flx-autoloads flx-autoloads
helm-descbinds-autoloads helm-describe-modes-autoloads helm-config
helm-easymenu async-bytecomp async helm-autoloads 
helm-core-autoloads
popup-autoloads async-autoloads fontify-face-autoloads
flyspell-correct-autoloads flycheck-package-autoloads
package-lint-autoloads flycheck-autoloads let-alist-autoloads
pkg-info-autoloads epl-autoloads esup-autoloads 
elfeed-org-autoloads
org-autoloads org-version elfeed-autoloads doom-themes-autoloads
doom-modeline-autoloads shrink-path-autoloads f-autoloads
all-the-icons-autoloads memoize-autoloads doct-autoloads
dimmer-autoloads default-text-scale-autoloads 
company-tern-autoloads
s-autoloads dash-functional-autoloads dash-autoloads 
tern-autoloads
company-autoloads buttercup-autoloads auto-tangle-mode-autoloads
asm-mode afternoon-theme-autoloads general general-autoloads
evil-collection-unimpaired evil-collection-simple 
evil-collection-occur
evil-collection-minibuffer evil-collection-info 
evil-collection-image
image-mode exif evil-collection-help evil-collection-elisp-mode
evil-collection-custom evil-collection-comint 
evil-collection-buff-menu
evil-collection annalist evil-collection-autoloads 
annalist-autoloads
anzu-autoloads evil evil-integration undo-tree diff evil-maps
evil-commands reveal flyspell ispell evil-jumps 
evil-command-window
evil-types evil-search evil-ex shell pcomplete comint ansi-color
evil-macros evil-repeat evil-states evil-core advice evil-common
windmove thingatpt rect evil-digraphs evil-vars ring edmacro 
kmacro
cus-edit cus-start cus-load wid-edit evil-autoloads finder-inf
goto-chg-autoloads undo-tree-autoloads cl-seq use-package
use-package-ensure use-package-delight use-package-diminish
use-package-bind-key bind-key easy-mmode use-package-core
use-package-autoloads bind-key-autoloads early-init 
straight-autoloads
info cl-extra help-mode easymenu seq byte-opt straight cl-macs gv
cl-loaddefs cl-lib bytecomp byte-compile cconv 
keychain-environment
subr-x tooltip eldoc electric uniquify ediff-hook vc-hooks
lisp-float-type mwheel term/x-win x-win term/common-win x-dnd 
tool-bar
dnd fontset image regexp-opt fringe tabulated-list replace 
newcomment
text-mode elisp-mode lisp-mode prog-mode register page tab-bar 
menu-bar
rfn-eshadow isearch timer select scroll-bar mouse jit-lock 
font-lock
syntax facemenu font-core term/tty-colors frame minibuffer 
cl-generic
cham georgian utf-8-lang misc-lang vietnamese tibetan thai 
tai-viet lao
korean japanese eucjp-ms cp51932 hebrew greek romanian slovak 
czech
european ethiopic indian cyrillic chinese composite charscript 
charprop
case-table epa-hook jka-cmpr-hook help simple abbrev obarray
cl-preloaded nadvice loaddefs button faces cus-face macroexp files
text-properties overlay sha1 md5 base64 format env code-pages mule
custom widget hashtable-print-readable backquote threads dbusbind
inotify lcms2 dynamic-setting font-render-setting cairo x-toolkit 
x
multi-tty make-network-process emacs)

Memory information:
((conses 16 1690779 1035096)
 (symbols 48 46355 13)
 (strings 32 558470 44790)
 (string-bytes 1 14688181)
 (vectors 16 148173)
 (vector-slots 8 2121865 1058598)
 (floats 8 22663 10467)
 (intervals 56 63918 7919)
 (buffers 1000 57))





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list
  2020-02-26 21:33 bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list No Wayman
@ 2020-02-27  1:38 ` Noam Postavsky
  2020-02-27 17:22   ` No Wayman
  0 siblings, 1 reply; 6+ messages in thread
From: Noam Postavsky @ 2020-02-27  1:38 UTC (permalink / raw)
  To: No Wayman; +Cc: 39805

# seems to be long standing
found 39805 25.3
tags 39805 + confirmed
quit

No Wayman <iarchivedmywholelife@gmail.com> writes:

> While developing a package that utilizes circular lists, I ran 
> into a bug when trying to describe-variable
> a variable that contains circular lists. I've hewed it down to the 
> following:
>
> ** Minimal Reproducible Case
>
> #+begin_src emacs-lisp :results raw h replace
> (condition-case-unless-debug err
>     (with-temp-buffer
>       (insert "(#9=() :key val)")
>       (pp-buffer)
>       nil)

It doesn't fail if the buffer is changed to emacs-lisp-mode before the
pp-buffer call.  I guess scan-sexps doesn't handle the #N= correctly
unless the syntax-table has been set for emacs-lisp.  I note that
pp-to-string does some setup on its temp buffer, so maybe
describe-variable needs to do that too.

For the record, to reproduce the error from describe-variable, a
slightly less minimal example is needed (because the value must be more
than 68 characters long to trigger pretty printing)

    (setq vv '(#1=(a b) :key val #1# :key val :key val :key val :key val))
    (describe-variable 'vv)





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list
  2020-02-27  1:38 ` Noam Postavsky
@ 2020-02-27 17:22   ` No Wayman
  2020-02-28  2:34     ` Noam Postavsky
  0 siblings, 1 reply; 6+ messages in thread
From: No Wayman @ 2020-02-27 17:22 UTC (permalink / raw)
  To: Noam Postavsky; +Cc: 39805


Noam Postavsky <npostavs@gmail.com> writes:

> It doesn't fail if the buffer is changed to emacs-lisp-mode 
> before the
> pp-buffer call.

In the meantime, I'd like to be able to offer the users of my 
package a solution if they hit this bug.
This seems to work for me, but I haven't written much, and am a 
bit leery of, elisp advice.
Would you consider this an appropriate workaround?:

(defun workaround/describe-variable-print-bug (original-function 
&rest args)
  "Put temp buffer in emacs-lisp before ORIGINAL-FUNCTION: 
  `pp-buffer'.
https://lists.gnu.org/archive/html/emacs-bug-tracker/2020-02/msg00376.html"
  (cl-flet ((pp-advice (original-function)
                       (when (string-prefix-p " *temp" 
                       (buffer-name))
                         (let ((mm major-mode))
                           (emacs-lisp-mode)
                           (funcall original-function)
                           (funcall mm)))))
    (advice-add #'pp-buffer :around #'pp-advice)
    (unwind-protect
        (progn
          (apply original-function args)
          nil)
      (advice-remove #'pp-buffer #'pp-advice))))

(advice-add #'describe-variable :around 
#'workaround/describe-variable-print-bug)





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list
  2020-02-27 17:22   ` No Wayman
@ 2020-02-28  2:34     ` Noam Postavsky
  2020-02-28  4:01       ` No Wayman
  2020-03-04  3:09       ` Noam Postavsky
  0 siblings, 2 replies; 6+ messages in thread
From: Noam Postavsky @ 2020-02-28  2:34 UTC (permalink / raw)
  To: No Wayman; +Cc: 39805

[-- Attachment #1: Type: text/plain, Size: 634 bytes --]

retitle 39805 describe-variable fails to print some circular list values
# describe-variable only fails starting from 26.1
notfound 39805 25.3
found 39805 26.1
tags 39805 + patch
quit

For the record, the pp-buffer call in the original report fails in Emacs
25 (and earlier, I assume), but the describe-variable case only fails
starting from 26.1, specifically commit 2c18969c81.

[1: 2c18969c81]: 2017-03-02 02:08:32 -0500
  * lisp/help-fns.el (describe-variable): Use cl-print for the value
  https://git.savannah.gnu.org/cgit/emacs.git/commit/?id=2c18969c810f338d73beda592ee5af7103132e97

Here is the patch intended for emacs-27:


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: patch --]
[-- Type: text/x-diff, Size: 939 bytes --]

From 3b0b1b17c59341b12a502c0ea87c6125cc445494 Mon Sep 17 00:00:00 2001
From: Noam Postavsky <npostavs@gmail.com>
Date: Thu, 27 Feb 2020 21:09:59 -0500
Subject: [PATCH] Fix describe-variable on values with circular syntax
 (Bug#39805)

* lisp/help-fns.el (describe-variable): Set syntax tables before
calling pp-buffer.
---
 lisp/help-fns.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 0e2ae6b3c3..1be8e0ab08 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -1000,6 +1000,8 @@ describe-variable
 		    (terpri)
                     (let ((buf (current-buffer)))
                       (with-temp-buffer
+                        (lisp-mode-variables nil)
+                        (set-syntax-table emacs-lisp-mode-syntax-table)
                         (insert print-rep)
                         (pp-buffer)
                         (let ((pp-buffer (current-buffer)))
-- 
2.11.0


[-- Attachment #3: Type: text/plain, Size: 908 bytes --]


No Wayman <iarchivedmywholelife@gmail.com> writes:

> In the meantime, I'd like to be able to offer the users of my package
> a solution if they hit this bug.  This seems to work for me, but I
> haven't written much, and am a bit leery of, elisp advice.  Would you
> consider this an appropriate workaround?:

Mostly yes, but IMO it's kind of over-engineered.  I would do just:

    (defun workaround/describe-variable-print-bug (original-function &rest args)
      "Put temp buffer in emacs-lisp-mode before `pp-buffer'.
    https://debbugs.gnu.org/39805#8"
      (advice-add #'pp-buffer :before #'emacs-lisp-mode)
      (unwind-protect
          (apply original-function args)
        (advice-remove #'pp-buffer #'emacs-lisp-mode)))

    (when (= emacs-major-version 26) ;; Work around Bug#39805.
      (advice-add #'describe-variable :around
                  #'workaround/describe-variable-print-bug))


^ permalink raw reply related	[flat|nested] 6+ messages in thread

* bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list
  2020-02-28  2:34     ` Noam Postavsky
@ 2020-02-28  4:01       ` No Wayman
  2020-03-04  3:09       ` Noam Postavsky
  1 sibling, 0 replies; 6+ messages in thread
From: No Wayman @ 2020-02-28  4:01 UTC (permalink / raw)
  To: Noam Postavsky; +Cc: 39805, No Wayman

> Mostly yes, but IMO it's kind of over-engineered.  I would do 
> just:
>
>     (defun workaround/describe-variable-print-bug 
>     (original-function &rest args)
>       "Put temp buffer in emacs-lisp-mode before `pp-buffer'.
>     https://debbugs.gnu.org/39805#8"
>       (advice-add #'pp-buffer :before #'emacs-lisp-mode)
>       (unwind-protect
>         (apply original-function args)
>         (advice-remove #'pp-buffer #'emacs-lisp-mode)))
>
>     (when (= emacs-major-version 26) ;; Work around Bug#39805.
>       (advice-add #'describe-variable :around
>               #'workaround/describe-variable-print-bug))

I assumed mine was doing a more than it needed to.
Thanks again for the patch and the workaround.





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list
  2020-02-28  2:34     ` Noam Postavsky
  2020-02-28  4:01       ` No Wayman
@ 2020-03-04  3:09       ` Noam Postavsky
  1 sibling, 0 replies; 6+ messages in thread
From: Noam Postavsky @ 2020-03-04  3:09 UTC (permalink / raw)
  To: No Wayman; +Cc: 39805

tags 39805 fixed
close 39805 27.1
quit

Noam Postavsky <npostavs@gmail.com> writes:
> Subject: [PATCH] Fix describe-variable on values with circular syntax
>  (Bug#39805)
>
> * lisp/help-fns.el (describe-variable): Set syntax tables before
> calling pp-buffer.

Pushed to emacs-27.

[1: 7cafbbe964]: 2020-03-03 22:04:48 -0500
  Fix describe-variable on values with circular syntax (Bug#39805)
  https://git.savannah.gnu.org/cgit/emacs.git/commit/?id=7cafbbe96434ef616abfef364d82f7250bffc1ed





^ permalink raw reply	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2020-03-04  3:09 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2020-02-26 21:33 bug#39805: 28.0.50; scan-sexps (scan_lists) incorrectly parsing circular list No Wayman
2020-02-27  1:38 ` Noam Postavsky
2020-02-27 17:22   ` No Wayman
2020-02-28  2:34     ` Noam Postavsky
2020-02-28  4:01       ` No Wayman
2020-03-04  3:09       ` Noam Postavsky

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).