diff options
| author | Eli Zaretskii | 2022-09-13 16:49:02 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2022-09-13 16:49:02 +0300 |
| commit | 543b8717c7b4d82e2e0afdfe339be1d6bfdf5c97 (patch) | |
| tree | 4552d924a71876bd47b2a2976d8c3bcde971d22f /test/src | |
| parent | 7df898d532f922ea2a7acce4446bc35eec1da38e (diff) | |
| download | emacs-543b8717c7b4d82e2e0afdfe339be1d6bfdf5c97.tar.gz emacs-543b8717c7b4d82e2e0afdfe339be1d6bfdf5c97.zip | |
; Add commentary to comp-tests.el
Sigh... why do people insist on removing useful comments and leave
their tricky code more obfuscated than it must be??
* test/src/comp-tests.el (comp-tests-type-spec-tests): Add a
comment explaining why the expressions are quoted. (Bug#51104)
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/comp-tests.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el index a400a1a50a1..1edbd1777c6 100644 --- a/test/src/comp-tests.el +++ b/test/src/comp-tests.el | |||
| @@ -860,6 +860,11 @@ Return a list of results." | |||
| 860 | 860 | ||
| 861 | (cl-eval-when (compile eval load) | 861 | (cl-eval-when (compile eval load) |
| 862 | (defconst comp-tests-type-spec-tests | 862 | (defconst comp-tests-type-spec-tests |
| 863 | ;; Why we quote everything here, you ask? So that values of | ||
| 864 | ;; `most-positive-fixnum' and `most-negative-fixnum', which can be | ||
| 865 | ;; architecture-dependent, do not end up hardcoded in the | ||
| 866 | ;; resulting byte-compiled file, and thus we could run the same | ||
| 867 | ;; .elc file on several architectures without fear. | ||
| 863 | '( | 868 | '( |
| 864 | ;; 1 | 869 | ;; 1 |
| 865 | ((defun comp-tests-ret-type-spec-f (x) | 870 | ((defun comp-tests-ret-type-spec-f (x) |