diff --git a/extra/tools/deploy/deploy-tests.factor b/extra/tools/deploy/deploy-tests.factor
index 86691e89a0..8a0f0e5468 100755
--- a/extra/tools/deploy/deploy-tests.factor
+++ b/extra/tools/deploy/deploy-tests.factor
@@ -12,42 +12,36 @@ namespaces continuations layouts accessors ;
     ] with-directory ;
 
 : small-enough? ( n -- ? )
-    >r "test.image" temp-file file-info size>> r> <= ;
+    >r "test.image" temp-file file-info size>> r> cell 4 / * <= ;
 
 [ ] [ "hello-world" shake-and-bake ] unit-test
 
-[ t ] [
-    cell 8 = 8 5 ? 100000 * small-enough?
-] unit-test
+[ t ] [ 50000 small-enough? ] unit-test
 
 [ ] [ "sudoku" shake-and-bake ] unit-test
 
-[ t ] [
-    cell 8 = 20 10 ? 100000 * small-enough?
-] unit-test
+[ t ] [ 80000 small-enough? ] unit-test
 
 [ ] [ "hello-ui" shake-and-bake ] unit-test
 
+[ t ] [ 130000 small-enough? ] unit-test
+
 [ "staging.math-compiler-ui-strip.image" ] [
     "hello-ui" deploy-config
     [ bootstrap-profile staging-image-name file-name ] bind
 ] unit-test
 
-[ t ] [
-    cell 8 = 35 17 ? 100000 * small-enough?
-] unit-test
-
 [ ] [ "maze" shake-and-bake ] unit-test
 
-[ t ] [
-    cell 8 = 30 15 ? 100000 * small-enough?
-] unit-test
+[ t ] [ 120000 small-enough? ] unit-test
+
+[ ] [ "tetris" shake-and-bake ] unit-test
+
+[ t ] [ 120000 small-enough? ] unit-test
 
 [ ] [ "bunny" shake-and-bake ] unit-test
 
-[ t ] [
-    cell 8 = 50 30 ? 100000 * small-enough?
-] unit-test
+[ t ] [ 250000 small-enough? ] unit-test
 
 {
     "tools.deploy.test.1"