diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-03-12 10:24:29 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-03-12 13:11:45 +0100 |
| commit | d9cd55a4f1c3f391b996dfbe77ed24306b37ac9f (patch) | |
| tree | 916eb99149e57b84baa3d2f58e503308ecdd0e0f /lisp/emacs-lisp/bytecomp.el | |
| parent | 0144764d1dde8a2f1d413d042d46cea3e10a7d0a (diff) | |
| download | emacs-d9cd55a4f1c3f391b996dfbe77ed24306b37ac9f.tar.gz emacs-d9cd55a4f1c3f391b996dfbe77ed24306b37ac9f.tar.bz2 emacs-d9cd55a4f1c3f391b996dfbe77ed24306b37ac9f.zip | |
Implement `no-native-compile' (bug#46983)
* lisp/emacs-lisp/bytecomp.el (byte-compile-from-buffer): Capture
`no-native-compile'.
* lisp/emacs-lisp/comp.el (no-native-compile): Define new
variable.
(comp-spill-lap-function): Throw when `no-native-compile' was
captured non-nil.
(comp--native-compile): Catch `no-native-compile' if necessary and
return nil in case.
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 94424fc38af..8ca4adc6a96 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -2275,6 +2275,9 @@ With argument ARG, insert value in current buffer after the form." (push `(comp-debug . ,comp-debug) byte-native-qualities) (defvar comp-native-driver-options) (push `(comp-native-driver-options . ,comp-native-driver-options) + byte-native-qualities) + (defvar no-native-compile) + (push `(no-native-compile . ,no-native-compile) byte-native-qualities)) ;; Compile the forms from the input buffer. |