From 1086cefc7a1966364877c292d0f7773482fadbd4 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 8 Jan 2010 13:38:48 +0000
Subject: [PATCH] add empty to the list of things that are not structs for HtDP
 langs

svn: r17563
---
 collects/lang/private/teachprims.ss | 1 +
 1 file changed, 1 insertion(+)

diff --git a/collects/lang/private/teachprims.ss b/collects/lang/private/teachprims.ss
index e1ab3aa309..83d9800aa9 100644
--- a/collects/lang/private/teachprims.ss
+++ b/collects/lang/private/teachprims.ss
@@ -221,6 +221,7 @@ namespace.
   (lambda (x)
     (not (or (number? x)
              (boolean? x)
+             (empty? x)
              (pair? x)
              (symbol? x)
              (string? x)