#lang scheme/base

(require (planet schematics/sake:1))

(define-task compile
  ()
  (action:compile "all-benchmark-tests.ss"))

(define-task test
  (compile)
  (action:test "all-benchmark-tests.ss" 'all-benchmark-tests))

(define-task planet-install
  (test)
  (when (file-exists? "benchmark.plt")
    (delete-file "benchmark.plt"))
  (action:planet-archive ".")
  (rename-file-or-directory "trunk.plt" "benchmark.plt")
  (action:planet-remove "schematics" "benchmark.plt" 2 1)
  (action:planet-install "schematics" "benchmark.plt" 2 1))

(define-task all
  (planet-install))

(define-task default
  (all))