c7173cd1c6
* Move sha1 test to the same place, to be run like the others. * Unify tests for untar and unzip. * Also improve them: test results instead of failing with errors. Also, generate random text to archive, and use 0 for group+other permission bits (to avoid world writable results on an error).
16 lines
335 B
Racket
16 lines
335 B
Racket
#lang racket/base
|
|
|
|
(require tests/eli-tester
|
|
(prefix-in gzip: "gzip.rkt")
|
|
(prefix-in md5: "md5.rkt")
|
|
(prefix-in sha1: "sha1.rkt")
|
|
(prefix-in unpackers: "unpackers.rkt"))
|
|
|
|
(define (tests)
|
|
(test do (gzip:tests)
|
|
do (md5:tests)
|
|
do (sha1:tests)
|
|
do (unpackers:tests)))
|
|
|
|
(tests)
|