From 649f6b39df0eb7ed697f305dbc8f39d8bf7fc602 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 12 Feb 2003 03:54:29 +0000 Subject: [PATCH] . original commit: b87c3b50e6c01727564d1991cb1d7d98cd603a6b --- collects/mzlib/contract.ss | 2 -- 1 file changed, 2 deletions(-) diff --git a/collects/mzlib/contract.ss b/collects/mzlib/contract.ss index c92e1d7..d1f7466 100644 --- a/collects/mzlib/contract.ss +++ b/collects/mzlib/contract.ss @@ -348,7 +348,6 @@ [contract-id (mangle-id "provide/contract-contract-id" id)] [pos-module-source (mangle-id "provide/contract-pos-module-source" id)] [pos-stx (datum->syntax-object provide-stx 'here)] - [module-source-as-symbol (datum->syntax-object provide-stx 'module-source-as-symbol)] [id id] [ctrct ctrct]) (syntax/loc stx @@ -409,7 +408,6 @@ (with-syntax ([(bodies ...) (code-for-each-clause (syntax->list (syntax (p/c-ele ...))))]) (syntax (begin - (require (lib "contract-helpers.scm" "mzlib" "private")) bodies ...))))]))