Renamed simple-contract and simple-flat-contract to make-contract and make-flat-contract.

svn: r18259 original commit: 1d6111c5328dc9b9ecfc14832879a7c47717d7a3
2010-02-22 02:51:16 +00:00 · 2010-02-22 02:51:16 +00:00 · 8f366a3613
commit 8f366a3613
parent b0a08fe0b8 b2ea0474f2 5a47ebf0c7 3cfe752100
1 changed files with 1 additions and 1 deletions
--- a/collects/typed-scheme/utils/any-wrap.ss
+++ b/collects/typed-scheme/utils/any-wrap.ss
@ -31,7 +31,7 @@
  t)
  
 (define any-wrap/c
-  (simple-contract 
+  (make-contract 
   #:name 'Any
   #:projection (compose traverse blame-original?)))