From d863e0749275fe2e72cbf1e45c56c6190a53b0b2 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Fri, 21 Aug 2009 11:40:29 +0000
Subject: [PATCH] minor reorganization

svn: r15790
---
 collects/tests/scribble/reader.ss | 86 +++++++++++++++----------------
 1 file changed, 43 insertions(+), 43 deletions(-)

diff --git a/collects/tests/scribble/reader.ss b/collects/tests/scribble/reader.ss
index 43755b7773..fba0938384 100644
--- a/collects/tests/scribble/reader.ss
+++ b/collects/tests/scribble/reader.ss
@@ -609,49 +609,6 @@ bar}
 -@->
 (foo "bar" "\n" baz " bbb" "\n" x1 x2 " x3 x4" "\n" " waaaah")
 ---
-;; -------------------- errors
----
-(  -@error-> "inp:1:0: read: expected a `)' to close `('" ; check -@error->
----
-@foo{ -@error-> #rx":1:0: missing closing `}'$"
----
-\foo{ -\error-> #rx":1:0: missing closing `}'$"
----
-@foo{@bar{ -@error-> #rx":1:5: missing closing `}'$"
----
-\foo{\bar{ -\error-> #rx":1:5: missing closing `}'$"
----
-@foo{@bar{} -@error-> #rx":1:0: missing closing `}'$"
----
-@foo{@bar|{} -@error-> #rx":1:5: missing closing `}\\|'$"
----
-@foo{@bar|-{} -@error-> #rx":1:5: missing closing `}-\\|'$"
----
-@foo{@bar|-{} -@error-> #rx":1:5: missing closing `}-\\|'$"
----
-\foo{\bar|-{} -\error-> #rx":1:5: missing closing `}-\\|'$"
----
-@foo{@" -@error-> #rx":1:6: read: expected a closing '\"'$"
-;; " <-- (balance this file)
----
-\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"
@@ -699,6 +656,49 @@ foo
 -\i->
 (foo 1 "bar" "\n" "  " "baz " (nested "\\form{}") "\n" "blah") "\n" (bar)
 ---
+;; -------------------- errors
+---
+(  -@error-> "inp:1:0: read: expected a `)' to close `('" ; check -@error->
+---
+@foo{ -@error-> #rx":1:0: missing closing `}'$"
+---
+\foo{ -\error-> #rx":1:0: missing closing `}'$"
+---
+@foo{@bar{ -@error-> #rx":1:5: missing closing `}'$"
+---
+\foo{\bar{ -\error-> #rx":1:5: missing closing `}'$"
+---
+@foo{@bar{} -@error-> #rx":1:0: missing closing `}'$"
+---
+@foo{@bar|{} -@error-> #rx":1:5: missing closing `}\\|'$"
+---
+@foo{@bar|-{} -@error-> #rx":1:5: missing closing `}-\\|'$"
+---
+@foo{@bar|-{} -@error-> #rx":1:5: missing closing `}-\\|'$"
+---
+\foo{\bar|-{} -\error-> #rx":1:5: missing closing `}-\\|'$"
+---
+@foo{@" -@error-> #rx":1:6: read: expected a closing '\"'$"
+;; " <-- (balance this file)
+---
+\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"
+---
 ;; -------------------- some code tests
 ---
 @string-append{1 @(number->string (+ 2 3)) 4}  -@eval-> "1 5 4"