diff options
| author | Andrea Corallo | 2019-06-30 10:42:13 +0200 |
|---|---|---|
| committer | Andrea Corallo | 2020-01-01 11:33:47 +0100 |
| commit | dc963cf0c8a6f009bc3f2ddbb8224b57ded53339 (patch) | |
| tree | ff529257eb314baad4ae925124182fc6a6acb9f1 /test | |
| parent | b5b0e63bbc23a6584e5aaa49861a37b832a0def3 (diff) | |
| download | emacs-dc963cf0c8a6f009bc3f2ddbb8224b57ded53339.tar.gz emacs-dc963cf0c8a6f009bc3f2ddbb8224b57ded53339.zip | |
inline setcdr support
Diffstat (limited to 'test')
| -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 47c61c82bdd..d2b8f56d36f 100644 --- a/test/src/comp-tests.el +++ b/test/src/comp-tests.el | |||
| @@ -289,6 +289,11 @@ | |||
| 289 | err | 289 | err |
| 290 | (comp-tests-setcar-f 3 10) | 290 | (comp-tests-setcar-f 3 10) |
| 291 | (error err)) | 291 | (error err)) |
| 292 | '(wrong-type-argument consp 3))) | ||
| 293 | (should (equal (condition-case | ||
| 294 | err | ||
| 295 | (comp-tests-setcdr-f 3 10) | ||
| 296 | (error err)) | ||
| 292 | '(wrong-type-argument consp 3)))) | 297 | '(wrong-type-argument consp 3)))) |
| 293 | 298 | ||
| 294 | (defun comp-bubble-sort () | 299 | (defun comp-bubble-sort () |