From 4664fc9a4fdaf564a92f9d5da74037d31325cb92 Mon Sep 17 00:00:00 2001
From: Sam Tobin-Hochstadt <samth@racket-lang.org>
Date: Fri, 2 May 2008 18:03:05 +0000
Subject: [PATCH] Use library nest.

svn: r9598

original commit: 97715dc9fbebf203d5baf90a7fcedcb4c5ae9cf1
---
 collects/typed-scheme/typed-scheme.ss | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/collects/typed-scheme/typed-scheme.ss b/collects/typed-scheme/typed-scheme.ss
index 2b089da6..cb4f38d0 100644
--- a/collects/typed-scheme/typed-scheme.ss
+++ b/collects/typed-scheme/typed-scheme.ss
@@ -22,7 +22,7 @@
           "private/effect-rep.ss"
           "private/rep-utils.ss"
           "private/type-contract.ss"
-          "private/nest.ss"
+          scheme/nest
           syntax/kerncase
           scheme/match))
 
@@ -81,8 +81,7 @@
                           (local-expand #`(#%plain-module-begin 
                                            forms ...)
                                         'module-begin 
-                                        null
-                                        #;stop-list)])]
+                                        null)])]
            [with-syntax ([(pmb body2 ...) #'new-mod])]
            [begin (do-time "Local Expand Done")]
            [with-syntax ([after-code (parameterize ([orig-module-stx stx]