fix execution of 'auto.ss'
svn: r16697
This commit is contained in:
parent
70fa8fb2c4
commit
ccbb55ec11
|
@ -202,6 +202,13 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
extract-mzscheme-times
|
extract-mzscheme-times
|
||||||
clean-up-nothing
|
clean-up-nothing
|
||||||
mutable-pair-progs)
|
mutable-pair-progs)
|
||||||
|
(make-impl 'mzscheme3m
|
||||||
|
mk-mzscheme
|
||||||
|
(lambda (bm)
|
||||||
|
(system (format "mzscheme3m -u ~a.ss" bm)))
|
||||||
|
extract-mzscheme-times
|
||||||
|
clean-up-nothing
|
||||||
|
mutable-pair-progs)
|
||||||
(make-impl 'plt-r5rs
|
(make-impl 'plt-r5rs
|
||||||
mk-plt-r5rs
|
mk-plt-r5rs
|
||||||
(lambda (bm)
|
(lambda (bm)
|
||||||
|
@ -272,7 +279,7 @@ exec mzscheme -qu "$0" ${1+"$@"}
|
||||||
clean-up-nothing
|
clean-up-nothing
|
||||||
'(fft))))
|
'(fft))))
|
||||||
|
|
||||||
(define obsolte-impls '(mzscheme mzscheme-j mzschemecgc-tl mzc))
|
(define obsolte-impls '(mzscheme mzscheme-j mzschemecgc-tl mzc mz-old))
|
||||||
|
|
||||||
(define benchmarks
|
(define benchmarks
|
||||||
'(conform
|
'(conform
|
||||||
|
|
Loading…
Reference in New Issue
Block a user