From 916f5d8ede186b3c9f8c0edafe18ea29b76bd619 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Sat, 9 Feb 2013 11:30:40 -0600 Subject: [PATCH] add a test case related to PR 13505 --- collects/2htdp/tests/test-image.rkt | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/collects/2htdp/tests/test-image.rkt b/collects/2htdp/tests/test-image.rkt index 84de83bfd4..af902eacbb 100644 --- a/collects/2htdp/tests/test-image.rkt +++ b/collects/2htdp/tests/test-image.rkt @@ -2257,6 +2257,10 @@ => #rx"^beside/align") +(test/exn (beside (empty-scene 10 10) (empty-scene 10 10) '()) + => + #rx"^beside:") + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;; testing the wxme connection for 2htdp/image images