require md5 from file/md5

svn: r17364
This commit is contained in:
Eli Barzilay 2009-12-20 09:46:09 +00:00
parent aa7bf0d31c
commit 4cd3d34b43
4 changed files with 4 additions and 4 deletions

View File

@ -3,7 +3,7 @@
(Section 'md5) (Section 'md5)
(require mzlib/md5) (require file/md5)
(test #"d41d8cd98f00b204e9800998ecf8427e" md5 #"") (test #"d41d8cd98f00b204e9800998ecf8427e" md5 #"")
(test #"0cc175b9c0f1b6a831c399e269772661" md5 #"a") (test #"0cc175b9c0f1b6a831c399e269772661" md5 #"a")

View File

@ -3,7 +3,7 @@
exec mred "$0" "$@" exec mred "$0" "$@"
|# |#
#lang scheme #lang scheme
(require plot mzlib/md5 scheme/runtime-path) (require plot file/md5 scheme/runtime-path)
(define-runtime-path here "./") (define-runtime-path here "./")

View File

@ -1,6 +1,6 @@
#lang scheme/base #lang scheme/base
(require mzlib/contract (require mzlib/contract
mzlib/md5 file/md5
mzlib/port mzlib/port
mzlib/list mzlib/list
mzlib/plt-match mzlib/plt-match

View File

@ -1,5 +1,5 @@
#lang scheme #lang scheme
(require mzlib/md5) (require file/md5)
(provide/contract (provide/contract
[make-labeling (bytes? . -> . (-> symbol?))]) [make-labeling (bytes? . -> . (-> symbol?))])