diff options
| author | Andrea Corallo | 2024-02-15 17:48:43 +0100 |
|---|---|---|
| committer | Andrea Corallo | 2024-02-15 17:48:43 +0100 |
| commit | 4a0d430bdc3650ca3dfd8bdd14781764fbcbdc7e (patch) | |
| tree | 9fcd36329a34bb0c14b822f9a7c9353350d71d37 /test/src | |
| parent | aa849984896ce393afe92dd4fb7fbce494e131a4 (diff) | |
| download | emacs-4a0d430bdc3650ca3dfd8bdd14781764fbcbdc7e.tar.gz emacs-4a0d430bdc3650ca3dfd8bdd14781764fbcbdc7e.zip | |
Update some native comp tests
* test/src/comp-tests.el (comp-tests-ret-type-spec-13)
(comp-tests-ret-type-spec-35): Update.
* test/lisp/emacs-lisp/comp-cstr-tests.el (comp-cstr-test-62)
(comp-cstr-test-75): Likewise.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/comp-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el index 54a9a6c11cc..8bfe939fb23 100644 --- a/test/src/comp-tests.el +++ b/test/src/comp-tests.el | |||
| @@ -1022,7 +1022,7 @@ Return a list of results." | |||
| 1022 | (if (= x y) | 1022 | (if (= x y) |
| 1023 | x | 1023 | x |
| 1024 | 'foo)) | 1024 | 'foo)) |
| 1025 | '(or (member foo) number-or-marker)) | 1025 | '(or (member foo) number-or-marker integer-or-marker)) |
| 1026 | 1026 | ||
| 1027 | ;; 14 | 1027 | ;; 14 |
| 1028 | ((defun comp-tests-ret-type-spec-f (x) | 1028 | ((defun comp-tests-ret-type-spec-f (x) |
| @@ -1162,7 +1162,7 @@ Return a list of results." | |||
| 1162 | ((defun comp-tests-ret-type-spec-f (x) | 1162 | ((defun comp-tests-ret-type-spec-f (x) |
| 1163 | (when (> x 1.0) | 1163 | (when (> x 1.0) |
| 1164 | x)) | 1164 | x)) |
| 1165 | '(or null number-or-marker)) | 1165 | '(or null number-or-marker integer-or-marker)) |
| 1166 | 1166 | ||
| 1167 | ;; 36 | 1167 | ;; 36 |
| 1168 | ((defun comp-tests-ret-type-spec-f (x y) | 1168 | ((defun comp-tests-ret-type-spec-f (x y) |