diff options
| author | Basil L. Contovounesios | 2022-05-07 20:17:23 +0300 |
|---|---|---|
| committer | Basil L. Contovounesios | 2022-05-07 20:18:51 +0300 |
| commit | ca3e3c947192e97f2c494ac12a26ff0d259f0459 (patch) | |
| tree | f15f33475eb9f93a08444d7e49ed5101bc50de3f /test/src | |
| parent | 090d5f4446e89df4bc5ad9a043294b711493c7ac (diff) | |
| download | emacs-ca3e3c947192e97f2c494ac12a26ff0d259f0459.tar.gz emacs-ca3e3c947192e97f2c494ac12a26ff0d259f0459.zip | |
; Pacify some --without-x byte-compiler warnings.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/image-tests.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/src/image-tests.el b/test/src/image-tests.el index 3885981e0b2..f710aadea74 100644 --- a/test/src/image-tests.el +++ b/test/src/image-tests.el | |||
| @@ -53,6 +53,8 @@ | |||
| 53 | 53 | ||
| 54 | ;;;; image-test-size | 54 | ;;;; image-test-size |
| 55 | 55 | ||
| 56 | (declare-function image-size "image.c" (spec &optional pixels frame)) | ||
| 57 | |||
| 56 | (ert-deftest image-tests-image-size/gif () | 58 | (ert-deftest image-tests-image-size/gif () |
| 57 | (image-skip-unless 'gif) | 59 | (image-skip-unless 'gif) |
| 58 | (pcase (image-size (create-image (cdr (assq 'gif image-tests--images)))) | 60 | (pcase (image-size (create-image (cdr (assq 'gif image-tests--images)))) |
| @@ -126,6 +128,8 @@ | |||
| 126 | 128 | ||
| 127 | ;;;; image-mask-p | 129 | ;;;; image-mask-p |
| 128 | 130 | ||
| 131 | (declare-function image-mask-p "image.c" (spec &optional frame)) | ||
| 132 | |||
| 129 | (ert-deftest image-tests-image-mask-p/gif () | 133 | (ert-deftest image-tests-image-mask-p/gif () |
| 130 | (image-skip-unless 'gif) | 134 | (image-skip-unless 'gif) |
| 131 | (should-not (image-mask-p (create-image | 135 | (should-not (image-mask-p (create-image |
| @@ -176,6 +180,8 @@ | |||
| 176 | 180 | ||
| 177 | ;;;; image-metadata | 181 | ;;;; image-metadata |
| 178 | 182 | ||
| 183 | (declare-function image-metadata "image.c" (spec &optional frame)) | ||
| 184 | |||
| 179 | ;; TODO: These tests could be expanded with files that actually | 185 | ;; TODO: These tests could be expanded with files that actually |
| 180 | ;; contain metadata. | 186 | ;; contain metadata. |
| 181 | 187 | ||
| @@ -238,6 +244,7 @@ | |||
| 238 | 244 | ||
| 239 | (ert-deftest image-tests-init-image-library () | 245 | (ert-deftest image-tests-init-image-library () |
| 240 | (skip-unless (fboundp 'init-image-library)) | 246 | (skip-unless (fboundp 'init-image-library)) |
| 247 | (declare-function init-image-library "image.c" (type)) | ||
| 241 | (should (init-image-library 'pbm)) ; built-in | 248 | (should (init-image-library 'pbm)) ; built-in |
| 242 | (should-not (init-image-library 'invalid-image-type))) | 249 | (should-not (init-image-library 'invalid-image-type))) |
| 243 | 250 | ||