diff options
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/json-tests.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test/src/json-tests.el b/test/src/json-tests.el index 8bd679b886e..911bc49730d 100644 --- a/test/src/json-tests.el +++ b/test/src/json-tests.el | |||
| @@ -278,5 +278,13 @@ Test with both unibyte and multibyte strings." | |||
| 278 | :type 'no-catch) | 278 | :type 'no-catch) |
| 279 | (should (equal calls 1))))) | 279 | (should (equal calls 1))))) |
| 280 | 280 | ||
| 281 | (ert-deftest json-serialize/bignum () | ||
| 282 | (skip-unless (fboundp 'json-serialize)) | ||
| 283 | (should (equal (json-serialize (vector (1+ most-positive-fixnum) | ||
| 284 | (1- most-negative-fixnum))) | ||
| 285 | (format "[%d,%d]" | ||
| 286 | (1+ most-positive-fixnum) | ||
| 287 | (1- most-negative-fixnum))))) | ||
| 288 | |||
| 281 | (provide 'json-tests) | 289 | (provide 'json-tests) |
| 282 | ;;; json-tests.el ends here | 290 | ;;; json-tests.el ends here |