Hello John, I have the same test for all the files.
Thanks Colum On Tue, Sep 28, 2010 at 9:48 PM, John Clements <[email protected]>wrote: > > On Sep 28, 2010, at 5:27 PM, A Z wrote: > > > Hello, > > > > Can anyone please tell me how to process all the files in a directory. > > > > This is what I am doing: > > > > (check-progs (directory-list "/home/racket/progs")) > > > > (define (check-progs flist) > > (if(list? flist) > > (if(null? (cdr flist)) > > '() > > (check-progs (cdr flist))) > > (process (simple-form-path (car flist))))) > > > > > > (define (process path) > > (local-require path) > > (local-require rackunit) > > (check-equal? (twice 2) 4) > > > > Hmm... perhaps the first question is this: usually, you have different > tests for each file. Is that not true for you? > > John Clements > >
_________________________________________________ For list-related administrative tasks: http://lists.racket-lang.org/listinfo/users
