fix arity error

This commit is contained in:
Robby Findler 2014-01-12 23:35:00 -06:00
parent 4d123bb26d
commit e2070a4abc

View File

@ -57,7 +57,7 @@
(define (substitute . x) (error 'substitute "~s" x)) (define (substitute . x) (error 'substitute "~s" x))
(define (run es) (traces threads reductions `((store) (threads ,@es)))) (define (run es) (traces reductions `((store) (threads ,@es))))
(provide run) (provide run)
(define (count x) (define (count x)