From 089ebfe49203fe8aa55571a773e659eca1a078a4 Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Tue, 3 Mar 2009 20:01:41 +0000 Subject: [PATCH] Typed wrapper for md5.ss from YC. svn: r13921 --- collects/typed/file/md5.ss | 4 ++++ 1 file changed, 4 insertions(+) create mode 100644 collects/typed/file/md5.ss diff --git a/collects/typed/file/md5.ss b/collects/typed/file/md5.ss new file mode 100644 index 0000000000..0cab46d7ba --- /dev/null +++ b/collects/typed/file/md5.ss @@ -0,0 +1,4 @@ +#lang typed-scheme +(require/typed file/md5 + [md5 ((U Bytes Input-Port) -> Bytes)]) +(provide md5)