From 44a8c8b6b136f186b50f674cff1b5cdae20552bf Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Mon, 26 May 2008 19:59:11 +0000 Subject: [PATCH] fix minor 'unit' phase problems svn: r9964 --- collects/mzlib/private/unit-compiletime.ss | 1 - collects/mzlib/unit.ss | 3 +-- 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/collects/mzlib/private/unit-compiletime.ss b/collects/mzlib/private/unit-compiletime.ss index e5c970993c..50be3c22de 100644 --- a/collects/mzlib/private/unit-compiletime.ss +++ b/collects/mzlib/private/unit-compiletime.ss @@ -2,7 +2,6 @@ (require-for-syntax syntax/struct) (require syntax/boundmap mzlib/list - "unit-runtime.ss" "unit-syntax.ss") (require-for-template mzscheme "unit-keywords.ss" diff --git a/collects/mzlib/unit.ss b/collects/mzlib/unit.ss index 11ef796fb2..c38df307e8 100644 --- a/collects/mzlib/unit.ss +++ b/collects/mzlib/unit.ss @@ -11,8 +11,7 @@ (require mzlib/etc "private/unit-keywords.ss" - "private/unit-runtime.ss" - (only "private/unit-compiletime.ss" apply-mac)) + "private/unit-runtime.ss") (provide define-signature-form struct open define-signature provide-signature-elements