diff options
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/lread-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/src/lread-tests.el b/test/src/lread-tests.el index 99eec9d5487..f190f14781e 100644 --- a/test/src/lread-tests.el +++ b/test/src/lread-tests.el | |||
| @@ -318,8 +318,8 @@ literals (Bug#20852)." | |||
| 318 | '(## . 2)))) | 318 | '(## . 2)))) |
| 319 | 319 | ||
| 320 | (ert-deftest lread-escaped-lf () | 320 | (ert-deftest lread-escaped-lf () |
| 321 | ;; ?\LF should produce LF (only inside string literals do we ignore \LF). | 321 | ;; ?\LF should signal an error; \LF is ignored inside string literals. |
| 322 | (should (equal (read-from-string "?\\\n") '(?\n . 3))) | 322 | (should-error (read-from-string "?\\\n x")) |
| 323 | (should (equal (read-from-string "\"a\\\nb\"") '("ab" . 6)))) | 323 | (should (equal (read-from-string "\"a\\\nb\"") '("ab" . 6)))) |
| 324 | 324 | ||
| 325 | ;;; lread-tests.el ends here | 325 | ;;; lread-tests.el ends here |