bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

commit 4fc918a4d7cf7bfdd22fb80fcc2cff1831607ccb
parent c5bbbc090704c0bd817e4e1a3c4bd6b5f2d4fdce
Author: Eli Barzilay <eli@racket-lang.org>
Date:   Fri, 21 Aug 2009 11:11:21 +0000

In Scheme mode @|| will also throw an error instead of being read as a
comment.  This is to avoid confusing situations like

  (define foo (list x '@|| y))

which quoted the `y' since @|| was read as a comment.

svn: r15789

original commit: 1ea8c6651112f9c0bb8257bf9636b53b93c50cf9

Diffstat:
M
collects/tests/scribble/reader.ss
 | 
16
++++++++++++++++

1 file changed, 16 insertions(+), 0 deletions(-)
diff --git a/collects/tests/scribble/reader.ss b/collects/tests/scribble/reader.ss
@@ -636,6 +636,22 @@ bar}
 ---
 \foo{\" -\error-> #rx":1:6: read: expected a closing '\"'$"
 ---
+@|1 2|
+-@error->
+#rx"a @|...| form in Scheme mode must have exactly one escaped expression"
+---
+@||
+-@error->
+#rx"a @|...| form in Scheme mode must have exactly one escaped expression"
+---
+\|1 2|
+-\error->
+#rx"a \\\\|...| form in Scheme mode must have exactly one escaped expression"
+---
+\||
+-\error->
+#rx"a \\\\|...| form in Scheme mode must have exactly one escaped expression"
+---
 ;; -------------------- inside-reader
 ---
 foo bar baz  -@i->  "foo bar baz"