From 575a348e8aa6c40060f677cea8a83087eec53e18 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Sun, 7 Jun 2009 09:21:41 +0000 Subject: [PATCH] fix bad syntax svn: r15110 --- collects/games/loa/loa.ss | 1 + collects/tests/mzscheme/structc.ss | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/games/loa/loa.ss b/collects/games/loa/loa.ss index 8ba9a613e2..9085afb1e0 100644 --- a/collects/games/loa/loa.ss +++ b/collects/games/loa/loa.ss @@ -155,3 +155,4 @@ (send frame show #t)) +) diff --git a/collects/tests/mzscheme/structc.ss b/collects/tests/mzscheme/structc.ss index 2e7d616fb6..d467628fa9 100644 --- a/collects/tests/mzscheme/structc.ss +++ b/collects/tests/mzscheme/structc.ss @@ -167,7 +167,7 @@ (error-test '(struct-case-lambda x . 5) syntaxe?) (error-test '(struct-case-lambda x ()) syntaxe?) (error-test '(struct-case-lambda x else) syntaxe?) -(error-test '(struct-case-lambda x (else 9) (exn? 8)) syntaxe?)) +(error-test '(struct-case-lambda x (else 9) (exn? 8)) syntaxe?) (define time-branch (lambda (proc list)