Fixed command-line options for gambit in benchmarks.

This commit is contained in:
Vincent St-Amour 2010-11-16 14:34:04 -05:00
parent a888325d78
commit 102419f009
2 changed files with 5 additions and 3 deletions

View File

@ -457,8 +457,7 @@ exec racket -qu "$0" ${1+"$@"}
run-gambit-exe
extract-gambit-times
clean-up-o1
(append '(nucleic2)
racket-specific-progs))
racket-specific-progs)
(make-impl 'larceny
setup-larceny
mk-larceny

View File

@ -6,5 +6,8 @@
(when (file-exists? (format "~a.o1" name))
(delete-file (format "~a.o1" name)))
(system (format "gsc -:m10000 -dynamic -prelude '(include \"gambit-prelude.sch\")' ~a.sch"
(system (format "gsc -:m10000~a -dynamic -prelude '(include \"gambit-prelude.sch\")' ~a.sch"
(if (memq (string->symbol name) '(nucleic2))
",s"
"")
name))