From 46d66b4542662240ea9bef66d2852b1713118a5c Mon Sep 17 00:00:00 2001 From: Matthias Felleisen Date: Tue, 9 Mar 2010 02:06:32 +0000 Subject: [PATCH 1/2] bug report 10816 svn: r18490 --- collects/2htdp/info.ss | 6 +----- collects/2htdp/private/check-aux.ss | 2 ++ 2 files changed, 3 insertions(+), 5 deletions(-) diff --git a/collects/2htdp/info.ss b/collects/2htdp/info.ss index a6b48e261c..3e1fe6961c 100644 --- a/collects/2htdp/info.ss +++ b/collects/2htdp/info.ss @@ -2,8 +2,4 @@ (define name "HtDP/2e Teachpacks") (define compile-omit-paths - '("hangman-world.ss" - "hangman-world-play.ss" - "tests" - "extended-key" - "utest")) + '("tests" "uchat" "utest")) diff --git a/collects/2htdp/private/check-aux.ss b/collects/2htdp/private/check-aux.ss index 7584c5703b..a5b7a665b4 100644 --- a/collects/2htdp/private/check-aux.ss +++ b/collects/2htdp/private/check-aux.ss @@ -1,3 +1,4 @@ + #lang scheme (require htdp/error) @@ -84,6 +85,7 @@ [(string? x) true] [(symbol? x) true] [(number? x) true] + [(boolean? x) true] [(char? x) true] [(pair? x) (and (list? x) (andmap sexp? x))] [else false])) From 89aa9b6ed59c0eb90653dd208ee7f299da91f9b1 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Tue, 9 Mar 2010 08:50:28 +0000 Subject: [PATCH 2/2] Welcome to a new PLT day. svn: r18491 --- collects/repos-time-stamp/stamp.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/repos-time-stamp/stamp.ss b/collects/repos-time-stamp/stamp.ss index 177bdd2835..d439d97551 100644 --- a/collects/repos-time-stamp/stamp.ss +++ b/collects/repos-time-stamp/stamp.ss @@ -1 +1 @@ -#lang scheme/base (provide stamp) (define stamp "8mar2010") +#lang scheme/base (provide stamp) (define stamp "9mar2010")