From b9b5e14c3b30bed75fb3ba730d6f2f077d3a2c7c Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Mon, 26 Nov 2018 03:01:53 +0000 Subject: [PATCH] Test escapes in symbol notation too. --- tests/runtime/test-readwrite.scm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/tests/runtime/test-readwrite.scm b/tests/runtime/test-readwrite.scm index 09918bb9a..1b098e133 100644 --- a/tests/runtime/test-readwrite.scm +++ b/tests/runtime/test-readwrite.scm @@ -118,7 +118,10 @@ USA. ("+nan.0+inf.0i" ,assert-complex-nonreal) ("\"|\"" ,assert-string) ("\"\\\"\"" ,assert-string) - ("\"\\\\\"" ,assert-string)) + ("\"\\\\\"" ,assert-string) + ("|\"|" ,assert-symbol) + ("|\\\||" ,assert-symbol) + ("|\\\\|" ,assert-symbol)) (lambda (string #!optional assertion xfail?) (with-expected-failure xfail? (lambda () -- 2.25.1