From 837f1e24e58418fa56fd909a9c7393f86ba7c057 Mon Sep 17 00:00:00 2001 From: Jon Rafkind Date: Thu, 6 May 2010 18:55:40 -0600 Subject: [PATCH] test --- collects/honu/private/macro.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/collects/honu/private/macro.rkt b/collects/honu/private/macro.rkt index 3077e3d849..09e79f73ae 100644 --- a/collects/honu/private/macro.rkt +++ b/collects/honu/private/macro.rkt @@ -424,6 +424,7 @@ (define (X) (raise-syntax-error (syntax->datum #'name) "implement for this context")) (values ;; this is sort of ugly, is there a better way? + ;; foo (cond [(type-context? ctx) (X)] [(type-or-expression-context? ctx) (X)]