diff options
| author | Andrea Corallo | 2019-10-05 14:51:56 +0200 |
|---|---|---|
| committer | Andrea Corallo | 2020-01-01 11:37:55 +0100 |
| commit | 0cbe9c204e938977fef12dd4cc47d43a702ebfa9 (patch) | |
| tree | 6309a4cc1e709a69aa92a7d60b65e0fa2b742f62 /test/src | |
| parent | 0ae14c17a24545dacf8ed309b2a75f8f1ed7da5c (diff) | |
| download | emacs-0cbe9c204e938977fef12dd4cc47d43a702ebfa9.tar.gz emacs-0cbe9c204e938977fef12dd4cc47d43a702ebfa9.zip | |
add comp-test-silly-frame to tests
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/comp-test-funcs.el | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/test/src/comp-test-funcs.el b/test/src/comp-test-funcs.el index e43db6973b7..3d8d3437bda 100644 --- a/test/src/comp-test-funcs.el +++ b/test/src/comp-test-funcs.el | |||
| @@ -338,4 +338,15 @@ | |||
| 338 | (setq comp-test-up-val 24)) | 338 | (setq comp-test-up-val 24)) |
| 339 | (setq comp-test-up-val 999))) | 339 | (setq comp-test-up-val 999))) |
| 340 | 340 | ||
| 341 | ;; Non tested functions that proved just to be difficult to compile. | ||
| 342 | |||
| 343 | (defun comp-test-callee (_ _) t) | ||
| 344 | (defun comp-test-silly-frame (x) | ||
| 345 | (cl-case x | ||
| 346 | (0 (comp-test-callee | ||
| 347 | (pcase comp-tests-var1 | ||
| 348 | (1 1) | ||
| 349 | (2 2)) | ||
| 350 | 3)))) | ||
| 351 | |||
| 341 | ;;; comp-test-funcs.el ends here | 352 | ;;; comp-test-funcs.el ends here |