diff options
| author | AndreaCorallo | 2020-02-25 22:37:20 +0000 |
|---|---|---|
| committer | Andrea Corallo | 2020-02-26 12:57:45 +0000 |
| commit | 511415f6f656a5bf4da4f5f49d58de9dc7d5d64d (patch) | |
| tree | 92fbc78682e8e51589e88199115752ab626e7713 /src/print.c | |
| parent | 6898161a2b4d6af2d4b4b8f20a813304938bed53 (diff) | |
| download | emacs-511415f6f656a5bf4da4f5f49d58de9dc7d5d64d.tar.gz emacs-511415f6f656a5bf4da4f5f49d58de9dc7d5d64d.zip | |
Store optimize qualities into .eln files
For now just comp-speed and comp-debug are stored.
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/print.c b/src/print.c index ce8dd625b68..9b8308a6758 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -1840,8 +1840,11 @@ print_vectorlike (Lisp_Object obj, Lisp_Object printcharfun, bool escapeflag, | |||
| 1840 | #ifdef HAVE_NATIVE_COMP | 1840 | #ifdef HAVE_NATIVE_COMP |
| 1841 | case PVEC_NATIVE_COMP_UNIT: | 1841 | case PVEC_NATIVE_COMP_UNIT: |
| 1842 | { | 1842 | { |
| 1843 | print_c_string ("#<native compilation unit ", printcharfun); | 1843 | struct Lisp_Native_Comp_Unit *cu = XNATIVE_COMP_UNIT (obj); |
| 1844 | print_string (XNATIVE_COMP_UNIT (obj)->file, printcharfun); | 1844 | print_c_string ("#<native compilation unit: ", printcharfun); |
| 1845 | print_string (cu->file, printcharfun); | ||
| 1846 | printchar (' ', printcharfun); | ||
| 1847 | print_object (cu->optimize_qualities, printcharfun, escapeflag); | ||
| 1845 | printchar ('>', printcharfun); | 1848 | printchar ('>', printcharfun); |
| 1846 | } | 1849 | } |
| 1847 | break; | 1850 | break; |