From a39a9ddfb75bd83e020e8758e286bc4fc4aceffc Mon Sep 17 00:00:00 2001
From: Sam Tobin-Hochstadt <samth@racket-lang.org>
Date: Mon, 28 Apr 2008 21:21:29 +0000
Subject: [PATCH] comment out exampled

svn: r9521
---
 collects/typed-scheme/private/unit-utils.ss | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/collects/typed-scheme/private/unit-utils.ss b/collects/typed-scheme/private/unit-utils.ss
index b802c60025..728edcd193 100644
--- a/collects/typed-scheme/private/unit-utils.ss
+++ b/collects/typed-scheme/private/unit-utils.ss
@@ -103,12 +103,11 @@
 (define z 45)
 
 (define-values/link-units/infer (export x^) x@ y@)
-|#
 (define-signature y^ (y))
  (define-unit x@ (import y^) (export))
  (define-unit z@ (import y^) (export))
  (define-values/link-units/infer x@ z@)
 
 ;(define-values/link-units/infer x@ y@)
-
+|#