 
 [ "no such vocab, fool!" deploy ] [ bad-vocab-name? ] must-fail-with
 
-{ } [ "hello-world" shake-and-bake 550000 small-enough? ] unit-test
+{ } [ "hello-world" shake-and-bake 550000 small-enough? ] long-unit-test
 
 ! XXX: deploy-path is "resource:" by default, but deploying there in a
 ! test would pollute the Factor directory, so deploy test to temp.

        "hello-world" deploy-path 1array
        ascii [ lines ] with-process-reader
    ] with-variables
] unit-test

{ } [ "sudoku" shake-and-bake 800000 small-enough? ] unit-test

! [ ] [ "hello-ui" shake-and-bake 1605000 small-enough? ] unit-test
{ } [ "hello-ui" shake-and-bake 2242000 small-enough? ] unit-test

{ "math-threads-compiler-io-ui" } [
    "hello-ui" deploy-config config>profile
    staging-image-name file-name "." split second
] unit-test

! [ ] [ "maze" shake-and-bake 1520000 small-enough? ] unit-test
{ } [ "maze" shake-and-bake 2150000 small-enough? ] unit-test

! [ ] [ "tetris" shake-and-bake 1734000 small-enough? ] unit-test
{ } [ "tetris" shake-and-bake 2462008 small-enough? ] unit-test

! [ ] [ "spheres" shake-and-bake 1557000 small-enough? ] unit-test
{ } [ "spheres" shake-and-bake 2184500 small-enough? ] unit-test

! [ ] [ "terrain" shake-and-bake 2053000 small-enough? ] unit-test
{ } [ "terrain" shake-and-bake 2685300 small-enough? ] unit-test

! [ ] [ "gpu.demos.raytrace" shake-and-bake 2764000 small-enough? ] unit-test
{ } [ "gpu.demos.raytrace" shake-and-bake 3557800 small-enough? ] unit-test

! { } [ "bunny" shake-and-bake 2559640 small-enough? ] unit-test
{ } [ "bunny" shake-and-bake 2590476 small-enough? ] unit-test

{ } [ "gpu.demos.bunny" shake-and-bake 3600000 small-enough? ] unit-test

os macosx? [
    [ ] [ "webkit-demo" shake-and-bake 600000 small-enough? ] unit-test
] when

{ } [ "benchmark.regex-dna" shake-and-bake 900000 small-enough? ] unit-test

{
    "tools.deploy.test.1"

    { } swap [
        shake-and-bake
        run-temp-image
    ] curry long-unit-test
] each

USING: http.client http.server http.server.dispatchers
