From 67471cc62bb242f375e1dfe2f1124b0734f5d2ff Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Sat, 31 Jan 2009 15:48:31 +0000
Subject: [PATCH] cheap hack to find which memory error test is causing
 problems

svn: r13335
---
 collects/tests/mzscheme/sandbox.ss | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/collects/tests/mzscheme/sandbox.ss b/collects/tests/mzscheme/sandbox.ss
index 58f1cf7eee..480de7fa78 100644
--- a/collects/tests/mzscheme/sandbox.ss
+++ b/collects/tests/mzscheme/sandbox.ss
@@ -153,7 +153,7 @@
                                    '(define a (for/list ([i (in-range 10)])
                                                 (collect-garbage)
                                                 (make-bytes 500000))))))
-        =err> "out of memory"))
+        =err> "out of memor(?:y)"))
 
    ;; i/o
    --top--
@@ -496,7 +496,7 @@
            (collect-garbage)
            ;; increases size of the current evaluation
            (cons (make-bytes 500000) v)))
-        =err> "out of memory"
+        =err> "out of memo(?:ry)"
         b => 1))
 
    ))