From ce59444e81a8725d740ba6a4dda314e62e8934b5 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Wed, 20 Feb 2008 21:18:48 +0000
Subject: [PATCH] removed union from scheme/contract

svn: r8745

original commit: 79f4b8ff30fa8e8f90288e6f9dc2cbef3891a15e
---
 collects/mzlib/contract.ss | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/collects/mzlib/contract.ss b/collects/mzlib/contract.ss
index 55b232f..f0b0a67 100644
--- a/collects/mzlib/contract.ss
+++ b/collects/mzlib/contract.ss
@@ -78,4 +78,5 @@
          name-prop name-pred? name-get
          stronger-prop stronger-pred? stronger-get
          flat-prop flat-pred? flat-get
-         first-order-prop first-order-get)
+         first-order-prop first-order-get
+         (rename-out [or/c union]))