From 755b5e2b93b1d57bf3d425e7ccf8cdf13dccd963 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jens=20Axel=20S=C3=B8gaard?= <jensaxel@soegaard.net>
Date: Mon, 2 Jul 2012 12:40:36 +0200
Subject: [PATCH] Improved error message

---
 bracket/bracket.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bracket/bracket.rkt b/bracket/bracket.rkt
index 6ba45b90a..9990ebb41 100644
--- a/bracket/bracket.rkt
+++ b/bracket/bracket.rkt
@@ -236,7 +236,7 @@
       [(reserved? u)        'reserved]
       [(symbolic-id? u)     'symbolic-id]
       [(list? u)            (operator u)]
-      [else (error 'kind "Internal error: Unhandled simplified expression type: " u)]))
+      [else (error 'kind "Internal Bracket Error: Unhandled simplified expression type: " u)]))
   
   (define (complete-sub-expressions u)
     ; return a list of all complete sub-expressions of u