bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Jingtao Xu]

Hi, emacs maintainer,

I have developed a library:
   https://github.com/jingtaozf/literate-elisp

This library can load org file as an emacs lisp source file like this:
   (load "~/projects/literate-elisp.el")
   (literate-load "test.org")

in function `literate-load', I will bind the global variable `load-read-function' to function `literate-load`.
(defun literate-load (path)
   (let ((load-read-function (symbol-function 'literate-read)))
      (load path)))

Now I want to byte compile this org file to a 'elc' file with the following codes:
(defun literate-byte-compile-file (file &optional load)
  (interactive "f")
  (let ((load-read-function (symbol-function 'literate-read)))
    (byte-compile-file file load)))

But `byte-compile-file' will call `byte-compile-from-buffer' which will use function `read'
instead of the gloal variable `load-read-function' when read emacs lisp forms.

So I think it should be a bug of function `byte-compile-from-buffer'.

Can you fix it in the future emacs version?

With Best Regards,
Thanks.






In GNU Emacs 26.1 (build 1, x86_64-pc-linux-gnu, GTK+ Version 2.24.31)
 of 2018-10-31 built on funtoo
Windowing system distributor 'The X.Org Foundation', version 11.0.11903000
Recent messages:
Making completion list... [4 times]
Type "q" in help window to restore its previous buffer.
mouse-2, RET: find function's definition [3 times]
No event to add
Mark saved where search started
Type C-x 1 to delete the help window.
No event to add [3 times]
Quit [3 times]
mouse-2, RET: Display more help on this symbol [4 times]
No event to add [2 times]

Configured using:
 'configure --prefix=/usr --build=x86_64-pc-linux-gnu --host=x86_64-pc-linux-gnu
 --mandir=/usr/share/man --infodir=/usr/share/info --datadir=/usr/share --sysconfdir=/etc
 --localstatedir=/var/lib --disable-silent-rules --docdir=/usr/share/doc/emacs-26.1-r3
 --htmldir=/usr/share/doc/emacs-26.1-r3/html --libdir=/usr/lib64
 --program-suffix=-emacs-26 --infodir=/usr/share/info/emacs-26 --localstatedir=/var
 --enable-locallisppath=/etc/emacs:/usr/share/emacs/site-lisp --without-compress-install
 --without-hesiod --without-pop --with-file-notification=inotify --enable-acl --with-dbus
 --with-modules --without-gameuser --with-gpm --without-kerberos --without-kerberos5
 --without-lcms2 --without-xml2 --with-mailutils --without-selinux --with-gnutls
 --without-libsystemd --with-threads --without-wide-int --with-zlib --with-sound=alsa
 --with-x --without-ns --without-gconf --without-gsettings --without-toolkit-scroll-bars
 --with-gif --with-jpeg --with-png --with-rsvg --with-tiff --with-xpm --with-imagemagick
 --with-xft --without-cairo --without-libotf --without-m17n-flt --with-x-toolkit=gtk2
 --without-xwidgets 'CFLAGS=-march=native -O2 -pipe' CPPFLAGS= 'LDFLAGS=-Wl,-O1
 -Wl,--sort-common -Wl,--as-needed''

Configured features:
XPM JPEG TIFF GIF PNG RSVG IMAGEMAGICK SOUND GPM DBUS NOTIFY ACL GNUTLS FREETYPE XFT ZLIB
GTK2 X11 MODULES THREADS

Important settings:
  value of $LC_COLLATE: POSIX
  value of $LANG: en_US.UTF-8
  locale-coding-system: utf-8

Major mode: Apropos

Minor modes in effect:
  TeX-PDF-mode: t
  async-bytecomp-package-mode: t
  winner-mode: t
  display-time-mode: t
  diff-auto-refine-mode: t
  global-company-mode: t
  global-eclim-mode: t
  which-function-mode: t
  recentf-mode: t
  global-undo-tree-mode: t
  undo-tree-mode: t
  shell-dirtrack-mode: t
  evil-mode: t
  evil-local-mode: t
  Info-breadcrumbs-in-mode-line-mode: t
  savehist-mode: t
  auto-image-file-mode: t
  show-paren-mode: t
  tabbar-mode: t
  global-auto-revert-mode: t
  save-place-mode: t
  override-global-mode: t
  tooltip-mode: t
  global-eldoc-mode: t
  electric-indent-mode: t
  global-prettify-symbols-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
  buffer-read-only: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t
  abbrev-mode: t

Load-path shadows:
/home/jingtao/Dropbox/lisp/quicklisp/dists/quicklisp/software/slime-v2.22/slime hides /home/jingtao/Dropbox/emacs/elpa/slime-20181130.2009/slime
/home/jingtao/Dropbox/lisp/quicklisp/dists/quicklisp/software/slime-v2.22/slime-autoloads hides /home/jingtao/Dropbox/emacs/elpa/slime-20181130.2009/slime-autoloads
/home/jingtao/Dropbox/lisp/quicklisp/dists/quicklisp/software/slime-v2.22/slime-tests hides /home/jingtao/Dropbox/emacs/elpa/slime-20181130.2009/slime-tests
~/projects/dummy/site-lisp/custom hides /usr/share/emacs/26.1/lisp/custom
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/md4 hides /usr/share/emacs/26.1/lisp/md4
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/hex-util hides /usr/share/emacs/26.1/lisp/hex-util
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-fortran hides /usr/share/emacs/26.1/lisp/org/ob-fortran
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-scheme hides /usr/share/emacs/26.1/lisp/org/ob-scheme
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-plot hides /usr/share/emacs/26.1/lisp/org/org-plot
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-icalendar hides /usr/share/emacs/26.1/lisp/org/ox-icalendar
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-rmail hides /usr/share/emacs/26.1/lisp/org/org-rmail
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-js hides /usr/share/emacs/26.1/lisp/org/ob-js
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-haskell hides /usr/share/emacs/26.1/lisp/org/ob-haskell
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-ebnf hides /usr/share/emacs/26.1/lisp/org/ob-ebnf
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-org hides /usr/share/emacs/26.1/lisp/org/ob-org
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-eshell hides /usr/share/emacs/26.1/lisp/org/org-eshell
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-abc hides /usr/share/emacs/26.1/lisp/org/ob-abc
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-table hides /usr/share/emacs/26.1/lisp/org/ob-table
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-ascii hides /usr/share/emacs/26.1/lisp/org/ox-ascii
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-loaddefs hides /usr/share/emacs/26.1/lisp/org/org-loaddefs
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-entities hides /usr/share/emacs/26.1/lisp/org/org-entities
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-groovy hides /usr/share/emacs/26.1/lisp/org/ob-groovy
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-bibtex hides /usr/share/emacs/26.1/lisp/org/org-bibtex
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-beamer hides /usr/share/emacs/26.1/lisp/org/ox-beamer
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-habit hides /usr/share/emacs/26.1/lisp/org/org-habit
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-faces hides /usr/share/emacs/26.1/lisp/org/org-faces
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-html hides /usr/share/emacs/26.1/lisp/org/ox-html
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-publish hides /usr/share/emacs/26.1/lisp/org/ox-publish
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-shell hides /usr/share/emacs/26.1/lisp/org/ob-shell
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-src hides /usr/share/emacs/26.1/lisp/org/org-src
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-indent hides /usr/share/emacs/26.1/lisp/org/org-indent
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-vala hides /usr/share/emacs/26.1/lisp/org/ob-vala
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-exp hides /usr/share/emacs/26.1/lisp/org/ob-exp
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-capture hides /usr/share/emacs/26.1/lisp/org/org-capture
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-w3m hides /usr/share/emacs/26.1/lisp/org/org-w3m
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-ref hides /usr/share/emacs/26.1/lisp/org/ob-ref
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-J hides /usr/share/emacs/26.1/lisp/org/ob-J
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-stan hides /usr/share/emacs/26.1/lisp/org/ob-stan
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-hledger hides /usr/share/emacs/26.1/lisp/org/ob-hledger
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-info hides /usr/share/emacs/26.1/lisp/org/org-info
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-sqlite hides /usr/share/emacs/26.1/lisp/org/ob-sqlite
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-eval hides /usr/share/emacs/26.1/lisp/org/ob-eval
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-compat hides /usr/share/emacs/26.1/lisp/org/org-compat
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-crypt hides /usr/share/emacs/26.1/lisp/org/org-crypt
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-ruby hides /usr/share/emacs/26.1/lisp/org/ob-ruby
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-macro hides /usr/share/emacs/26.1/lisp/org/org-macro
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-maxima hides /usr/share/emacs/26.1/lisp/org/ob-maxima
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-irc hides /usr/share/emacs/26.1/lisp/org/org-irc
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-keys hides /usr/share/emacs/26.1/lisp/org/ob-keys
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-tangle hides /usr/share/emacs/26.1/lisp/org/ob-tangle
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-forth hides /usr/share/emacs/26.1/lisp/org/ob-forth
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-awk hides /usr/share/emacs/26.1/lisp/org/ob-awk
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-io hides /usr/share/emacs/26.1/lisp/org/ob-io
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-ditaa hides /usr/share/emacs/26.1/lisp/org/ob-ditaa
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-colview hides /usr/share/emacs/26.1/lisp/org/org-colview
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-comint hides /usr/share/emacs/26.1/lisp/org/ob-comint
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-mouse hides /usr/share/emacs/26.1/lisp/org/org-mouse
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-mhe hides /usr/share/emacs/26.1/lisp/org/org-mhe
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-perl hides /usr/share/emacs/26.1/lisp/org/ob-perl
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-odt hides /usr/share/emacs/26.1/lisp/org/ox-odt
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-eww hides /usr/share/emacs/26.1/lisp/org/org-eww
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-lob hides /usr/share/emacs/26.1/lisp/org/ob-lob
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-mobile hides /usr/share/emacs/26.1/lisp/org/org-mobile
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-R hides /usr/share/emacs/26.1/lisp/org/ob-R
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-timer hides /usr/share/emacs/26.1/lisp/org/org-timer
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-processing hides /usr/share/emacs/26.1/lisp/org/ob-processing
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-dot hides /usr/share/emacs/26.1/lisp/org/ob-dot
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-table hides /usr/share/emacs/26.1/lisp/org/org-table
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-agenda hides /usr/share/emacs/26.1/lisp/org/org-agenda
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-ctags hides /usr/share/emacs/26.1/lisp/org/org-ctags
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-plantuml hides /usr/share/emacs/26.1/lisp/org/ob-plantuml
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org hides /usr/share/emacs/26.1/lisp/org/org
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-element hides /usr/share/emacs/26.1/lisp/org/org-element
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-mscgen hides /usr/share/emacs/26.1/lisp/org/ob-mscgen
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-octave hides /usr/share/emacs/26.1/lisp/org/ob-octave
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-man hides /usr/share/emacs/26.1/lisp/org/ox-man
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-inlinetask hides /usr/share/emacs/26.1/lisp/org/org-inlinetask
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-clock hides /usr/share/emacs/26.1/lisp/org/org-clock
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-ocaml hides /usr/share/emacs/26.1/lisp/org/ob-ocaml
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-archive hides /usr/share/emacs/26.1/lisp/org/org-archive
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-lint hides /usr/share/emacs/26.1/lisp/org/org-lint
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox hides /usr/share/emacs/26.1/lisp/org/ox
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-md hides /usr/share/emacs/26.1/lisp/org/ox-md
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-texinfo hides /usr/share/emacs/26.1/lisp/org/ox-texinfo
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-screen hides /usr/share/emacs/26.1/lisp/org/ob-screen
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-bbdb hides /usr/share/emacs/26.1/lisp/org/org-bbdb
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-macs hides /usr/share/emacs/26.1/lisp/org/org-macs
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-duration hides /usr/share/emacs/26.1/lisp/org/org-duration
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-lisp hides /usr/share/emacs/26.1/lisp/org/ob-lisp
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-shen hides /usr/share/emacs/26.1/lisp/org/ob-shen
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-lilypond hides /usr/share/emacs/26.1/lisp/org/ob-lilypond
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-sed hides /usr/share/emacs/26.1/lisp/org/ob-sed
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-clojure hides /usr/share/emacs/26.1/lisp/org/ob-clojure
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-feed hides /usr/share/emacs/26.1/lisp/org/org-feed
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-picolisp hides /usr/share/emacs/26.1/lisp/org/ob-picolisp
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-datetree hides /usr/share/emacs/26.1/lisp/org/org-datetree
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-id hides /usr/share/emacs/26.1/lisp/org/org-id
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-footnote hides /usr/share/emacs/26.1/lisp/org/org-footnote
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-emacs-lisp hides /usr/share/emacs/26.1/lisp/org/ob-emacs-lisp
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-matlab hides /usr/share/emacs/26.1/lisp/org/ob-matlab
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-asymptote hides /usr/share/emacs/26.1/lisp/org/ob-asymptote
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-sql hides /usr/share/emacs/26.1/lisp/org/ob-sql
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-ledger hides /usr/share/emacs/26.1/lisp/org/ob-ledger
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-protocol hides /usr/share/emacs/26.1/lisp/org/org-protocol
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-attach hides /usr/share/emacs/26.1/lisp/org/org-attach
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-org hides /usr/share/emacs/26.1/lisp/org/ox-org
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-list hides /usr/share/emacs/26.1/lisp/org/org-list
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-makefile hides /usr/share/emacs/26.1/lisp/org/ob-makefile
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-version hides /usr/share/emacs/26.1/lisp/org/org-version
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-gnus hides /usr/share/emacs/26.1/lisp/org/org-gnus
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-docview hides /usr/share/emacs/26.1/lisp/org/org-docview
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-gnuplot hides /usr/share/emacs/26.1/lisp/org/ob-gnuplot
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-sass hides /usr/share/emacs/26.1/lisp/org/ob-sass
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-lua hides /usr/share/emacs/26.1/lisp/org/ob-lua
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ox-latex hides /usr/share/emacs/26.1/lisp/org/ox-latex
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob hides /usr/share/emacs/26.1/lisp/org/ob
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-C hides /usr/share/emacs/26.1/lisp/org/ob-C
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-css hides /usr/share/emacs/26.1/lisp/org/ob-css
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-core hides /usr/share/emacs/26.1/lisp/org/ob-core
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-java hides /usr/share/emacs/26.1/lisp/org/ob-java
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-calc hides /usr/share/emacs/26.1/lisp/org/ob-calc
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-python hides /usr/share/emacs/26.1/lisp/org/ob-python
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-coq hides /usr/share/emacs/26.1/lisp/org/ob-coq
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-pcomplete hides /usr/share/emacs/26.1/lisp/org/org-pcomplete
/home/jingtao/Dropbox/emacs/elpa/org-20181203/ob-latex hides /usr/share/emacs/26.1/lisp/org/ob-latex
/home/jingtao/Dropbox/emacs/elpa/org-20181203/org-install hides /usr/share/emacs/26.1/lisp/org/org-install
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/ntlm hides /usr/share/emacs/26.1/lisp/net/ntlm
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/hmac-def hides /usr/share/emacs/26.1/lisp/net/hmac-def
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/sasl hides /usr/share/emacs/26.1/lisp/net/sasl
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/sasl-cram hides /usr/share/emacs/26.1/lisp/net/sasl-cram
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/hmac-md5 hides /usr/share/emacs/26.1/lisp/net/hmac-md5
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/sasl-digest hides /usr/share/emacs/26.1/lisp/net/sasl-digest
/home/jingtao/Dropbox/emacs/elpa/flim-20180328.2324/sasl-ntlm hides /usr/share/emacs/26.1/lisp/net/sasl-ntlm

Features:
(shadow mel-q-ccl emacsbug slime-tests ert ewoc pulse evil-numbers eieio-opt speedbar
sb-image ezimage dframe ppm-gen wl-fldmgr cl-print debug sh-script smie executable
pcmpl-unix sort dired+ image-dired dired-aux dabbrev time-stamp add-log helm-x-files
helm-for-files helm-bookmark helm-adaptive helm-external misearch multi-isearch animate
network-stream starttls slime-banner slime-asdf slime-xref-browser slime-media helm-slime
slime-clipboard helm-command helm-elisp helm-eval edebug helm-info helm-mode helm-files
helm-buffers helm-tags helm-locate helm-grep helm-regexp helm-types todochiku growl
company-oddmuse company-keywords company-etags company-gtags company-dabbrev-code
company-dabbrev company-files company-capf company-cmake company-xcode company-clang
company-semantic company-template company-bbdb cl-indent-patches clisp-indent cl-indent
clisp-color cal-iso vc-git disp-table org-duration org-indent org-rmail org-mhe org-irc
org-info org-gnus nnir org-docview org-bbdb offlineimap elmo-maildir modb-legacy
modb-standard wl-mime mime-play filename mime-edit mime-setup mail-mime-setup semi-setup
mime-image wl-demo wl-draft eword-encode wl-template sendmail elmo-net elmo-cache elmo-map
elmo-dop wl-address wl-thread wl-action wl-summary ps-print ps-print-loaddefs ps-def lpr
wl-refile wl-message elmo-mime mmelmo-buffer mmelmo-imap mime-view mime-conf calist
semi-def mmimap mime-parse mmbuffer mmgeneric wl-highlight elmo-multi wl-folder wl wl-e21
wl-util elmo-flag elmo-localdir wl-vars wl-version elmo elmo-signal elmo-msgdb modb
modb-generic modb-entity mime elmo-util emu invisible inv-23 poem poem-e20 poem-e20_3
eword-decode mel mime-def alist mcharset mcs-20 mcs-e20 pces pces-e20 pces-20 pcustom
elmo-date elmo-vars path-util elmo-version luna std11 pccl pccl-20 ccl broken poe pym
static apel-ver product my-anki jss jss-debugger jss-console jss-io jss-http-repl
jss-io-pretty-printers jss-prompt jss-browser jss-browser-firefox jss-browser-webkit
websocket jss-remote-value jss-script jss-browser-api jss-super-mode jss-deferred
jss-utils baidu-fanyi pcache baidu-pcs virsh pyim pyim-probe pyim-pymap posframe mime-w3m
bbdb bbdb-site vlf-setup grep-a-lot latex latex-flymake tex-ispell tex-style tex dbus
ido-completing-read+ memoize minibuf-eldef crm dired-extension dired-tar poly-org polymode
poly-lock polymode-base polymode-weave polymode-export polymode-compat polymode-methods
polymode-core polymode-classes eieio-custom eieio-base toc-org org-ref org-ref-helm-bibtex
org-ref-helm helm-utils helm-bibtex bibtex-completion biblio biblio-download
biblio-dissemin biblio-hal biblio-dblp biblio-crossref biblio-arxiv timezone biblio-doi
biblio-core let-alist url-queue helm-net helm-help helm-config helm-easymenu
async-bytecomp org-ref-core reftex-cite reftex reftex-loaddefs reftex-vars parsebib
org-ref-glossary org-ref-bibtex org-ref-citeproc key-chord hydra lv doi-utils
org-ref-utils org-ref-pdf pdf-tools pdf-view pdf-cache pdf-info tq pdf-util url-http
url-auth nsm org-bibtex bibtex htmlize ob-C ob-plantuml ob-css ob-ruby ob-clojure ob-scala
ob-perl ob-js ob-org ob-python ob-elasticsearch es-parse ob-R ob-lisp ob-gnuplot ob-ditaa
ob-dot ob-shell ob-asymptote ob-sqlite ox-gfm ox-md 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 appt diary-lib diary-loaddefs epa-file
org-crypt org-agenda org-table org-w3m remember iimage cal-china-x cal-china lunar solar
cal-dst holidays hol-loaddefs fricas fricas-cpl winner time lldb-mi cdb-mi tree-mode
sql-impala hive sql view mode-local slime-tramp imenu+ parenface slime-repl-ansi-color
slime-fancy slime-trace-dialog slime-fontifying-fu slime-package-fu slime-references
slime-compiler-notes-tree slime-scratch slime-presentations bridge slime-macrostep
macrostep slime-mdot-fu slime-enclosing-context slime-fuzzy slime-fancy-trace
slime-fancy-inspector slime-c-p-c slime-editing-commands slime-autodoc slime-repl elp
slime-parse slime lisp-mnt apropos hyperspec browse-url info-look help-fns radix-tree elpy
find-file-in-project elpy-shell pyvenv esh-var esh-io esh-cmd esh-opt esh-ext esh-proc
esh-arg esh-groups eshell esh-module esh-mode esh-util elpy-profile elpy-django
elpy-refactor ido files-x python tramp-sh tramp tramp-compat tramp-loaddefs trampver
ucs-normalize ensime ensime-mode ensime-sbt sbt-mode sbt-mode-rgrep grep sbt-mode-comint
sbt-mode-buffer sbt-mode-project sbt-mode-vars ensime-http ensime-ui
ensime-semantic-highlight ensime-doc ensime-search ensime-helm helm helm-source
helm-multi-match helm-lib async ensime-undo ensime-startup ensime-refactor diff-mode
ensime-popup ensime-eldoc ensime-notes ensime-company ensime-editor ensime-ivy
ensime-model ivy delsel colir color ivy-overlay ensime-debug gdb-mi bindat
ensime-stacktrace ensime-inf ensime-overlay ensime-completion-util ensime-config
ensime-util ensime-client ensime-vars url-gw scala-mode scala-mode-prettify-symbols
scala-mode-imenu scala-mode-map scala-mode-fontlock scala-mode-indent scala-mode-paragraph
scala-mode-syntax scala-mode-lib hideshow flymake-proc flymake warnings ensime-macros
gradle-mode cus-edit cus-start cus-load google-c-style help-at-pt company-emacs-eclim
company pcase eclim-completion es-mode request url url-proxy url-privacy url-expand
url-methods url-history url-cookie url-domsuf url-util yasnippet elec-pair eclim
eclim-scala eclim-debug gud eclim-java-run xml eclim-maven compile eclim-java
eclim-problems hl-line eclim-project eclim-ant eclimd eclim-common eclim-macros popup
arc-mode archive-mode js2-mode etags xref project js-comint js sgml-mode dom json map
cc-mode cc-fonts cc-guess cc-menus cc-cmds web-beautify skeleton cc-styles cc-align
cc-engine cc-vars cc-defs which-func imenu recentf tree-widget evil evil-keybindings
evil-integration undo-tree diff evil-maps evil-commands ffap reveal flyspell ispell
evil-jumps evil-command-window evil-types evil-search evil-ex shell evil-macros
evil-repeat evil-states evil-core evil-common windmove rect evil-digraphs evil-vars info+
thingatpt savehist assoc image-file avoid paren tabbar desktop frameset autorevert
filenotify saveplace bookmark+ bookmark+-key dired-x bookmark+-1 gnus-sum gnus-group
gnus-undo gnus-start gnus-cloud nnimap nnmail mail-source tls gnutls utf7 netrc nnoo
gnus-spec gnus-int gnus-range message rmc puny rfc822 mml mml-sec epa derived epg
mm-decode mm-bodies mm-encode mail-parse rfc2231 mailabbrev gmm-utils mailheader gnus-win
gnus nnheader gnus-util rmail rmail-loaddefs rfc2047 rfc2045 ietf-drums mail-utils mm-util
mail-prsvr wid-edit bookmark+-bmu bookmark+-lit bookmark+-mac bm bookmark pp org-clock
org-element avl-tree generator org org-macro org-footnote org-pcomplete pcomplete org-list
org-faces org-entities noutline outline org-version ob-emacs-lisp ob ob-tangle org-src
ob-ref ob-lob ob-table ob-keys ob-exp ob-comint comint ansi-color ring ob-core ob-eval
org-compat org-macs org-loaddefs format-spec find-func cal-menu calendar cal-loaddefs
rect-mark ibuf-macs ibuf-ext ibuffer ibuffer-loaddefs mailcap keychain-environment
doc-view jka-compr image-mode dired dired-loaddefs header2 server parse-time f dash s
use-package use-package-ensure use-package-delight use-package-diminish
use-package-bind-key bind-key easy-mmode use-package-core finder-inf tex-site edmacro
kmacro gh-common marshal eieio-compat httpd-autoloads advice slime-autoloads info package
epg-config url-handlers url-parse auth-source eieio eieio-core eieio-loaddefs
password-cache url-vars seq byte-opt bytecomp byte-compile cconv subr-x cl-extra help-mode
easymenu literate-elisp cl-seq cl-macs cl gv cl-loaddefs cl-lib site-gentoo time-date
mule-util 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
menu-bar rfn-eshadow isearch timer select scroll-bar mouse jit-lock font-lock syntax
facemenu font-core term/tty-colors frame 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 minibuffer
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 dbusbind inotify dynamic-setting font-render-setting move-toolbar gtk x-toolkit
x multi-tty make-network-process emacs)

Memory information:
((conses 16 1856199 774437)
 (symbols 48 108538 31)
 (miscs 40 4409 11532)
 (strings 32 317947 95252)
 (string-bytes 1 9913480)
 (vectors 16 142895)
 (vector-slots 8 2999075 726288)
 (floats 8 1723 4003)
 (intervals 56 56185 7354)
 (buffers 992 111))

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Eli Zaretskii]

> Date: Thu, 13 Dec 2018 19:17:17 +0800
> From: Jingtao Xu <jingtaozf@gmail.com>
> 
> But `byte-compile-file' will call `byte-compile-from-buffer' which will use function `read'
> instead of the gloal variable `load-read-function' when read emacs lisp forms.
> 
> So I think it should be a bug of function `byte-compile-from-buffer'.
> 
> Can you fix it in the future emacs version?

I think this is an enhancement request, because load-read-function is
documented to be relevant only to 'eval-region' and 'load', not to
'byte-compile'.

Thanks.

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Richard Stallman]

[[[ To any NSA and FBI agents reading my email: please consider    ]]]
[[[ whether defending the US Constitution against all enemies,     ]]]
[[[ foreign or domestic, requires you to follow Snowden's example. ]]]

Would you like to show emacs-devel what this does?
What does "literate Lisp" look like?  What are the rules
for writing it?

-- 
Dr Richard Stallman
President, Free Software Foundation (https://gnu.org, https://fsf.org)
Internet Hall-of-Famer (https://internethalloffame.org)

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Jingtao Xu]

literate Lisp is just an org mode file like this:

* head1
This can be both document and code in one org file:
#+BEGIN_SRC elisp :tangle yes
(defun test1 ()
  (message "test1"))
#+END_SRC

and function `literate-load' will ignore lines out of source code block and load elisp codes inside the code block.

More details of `literate-elisp can be found in https://github.com/jingtaozf/literate-elisp

Anyway, I need to use a custom read function to load and compile this org file.


On Fri, 14 Dec 2018 05:14:20 +0800,
Richard Stallman wrote:
> 
> [[[ To any NSA and FBI agents reading my email: please consider    ]]]
> [[[ whether defending the US Constitution against all enemies,     ]]]
> [[[ foreign or domestic, requires you to follow Snowden's example. ]]]
> 
> Would you like to show emacs-devel what this does?
> What does "literate Lisp" look like?  What are the rules
> for writing it?
> 
> -- 
> Dr Richard Stallman
> President, Free Software Foundation (https://gnu.org, https://fsf.org)
> Internet Hall-of-Famer (https://internethalloffame.org)
> 
> 

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Richard Stallman]

[[[ To any NSA and FBI agents reading my email: please consider    ]]]
[[[ whether defending the US Constitution against all enemies,     ]]]
[[[ foreign or domestic, requires you to follow Snowden's example. ]]]

If we settle on a "literate" format for Lisp
that we like, we could add facilities to the Lisp reader to handle it.
A file-local variable set in the -*- line could control whether to do it.

-- 
Dr Richard Stallman
President, Free Software Foundation (https://gnu.org, https://fsf.org)
Internet Hall-of-Famer (https://internethalloffame.org)

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Jingtao Xu]

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

But how to do with my issue here?
Do I have to tangle it to el before compiling and you mean this is not a
bug of byte compile library?

On Fri, Dec 14, 2018 at 23:43 Richard Stallman <rms@gnu.org> wrote:

> [[[ To any NSA and FBI agents reading my email: please consider    ]]]
> [[[ whether defending the US Constitution against all enemies,     ]]]
> [[[ foreign or domestic, requires you to follow Snowden's example. ]]]
>
> If we settle on a "literate" format for Lisp
> that we like, we could add facilities to the Lisp reader to handle it.
> A file-local variable set in the -*- line could control whether to do it.
>
> --
> Dr Richard Stallman
> President, Free Software Foundation (https://gnu.org, https://fsf.org)
> Internet Hall-of-Famer (https://internethalloffame.org)
>
>
>

[-- Attachment #2: Type: text/html, Size: 1334 bytes --]

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Richard Stallman]

[[[ To any NSA and FBI agents reading my email: please consider    ]]]
[[[ whether defending the US Constitution against all enemies,     ]]]
[[[ foreign or domestic, requires you to follow Snowden's example. ]]]

  > But how to do with my issue here?
  > Do I have to tangle it to el before compiling and you mean this is not a
  > bug of byte compile library?

I will leave that question to others.

-- 
Dr Richard Stallman
President, Free Software Foundation (https://gnu.org, https://fsf.org)
Internet Hall-of-Famer (https://internethalloffame.org)

bug#33723: 26.1; function `byte-compile-file` use function `read` instead of the variable value of `load-read-function`

[Lars Ingebrigtsen]

Eli Zaretskii <eliz@gnu.org> writes:

> I think this is an enhancement request, because load-read-function is
> documented to be relevant only to 'eval-region' and 'load', not to
> 'byte-compile'.

I think it's reasonable to use it in 'byte-compile-from-buffer', too, so
I've now made that change (and adjusted the doc string).

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no