using ignore-errors instead of [ drop ] recover.

basis/compiler/tests/optimizer.factor

@@ -450,5 +450,5 @@ STRUCT: BitmapData { Scan0 void* } ;
 
 ! #1187
 { } [
-    10 [ [ minor-gc split-slice ] [ drop ] recover ] times
+    10 [ [ minor-gc split-slice ] ignore-errors ] times
 ] unit-test

basis/db/tuples/tuples-tests.factor

@@ -293,7 +293,7 @@ TUPLE: serialize-me id data ;
         { "id" "ID" +db-assigned-id+ }
         { "data" "DATA" FACTOR-BLOB }
     } define-persistent
-    [ serialize-me drop-table ] [ drop ] recover
+    [ serialize-me drop-table ] ignore-errors
     [ ] [ serialize-me create-table ] unit-test
 
     [ ] [ T{ serialize-me f f H{ { 1 2 } } } insert-tuple ] unit-test
@@ -327,7 +327,7 @@ TUPLE: exam id name score ;
         { "name" "NAME" TEXT }
         { "score" "SCORE" INTEGER }
     } define-persistent
-    [ exam drop-table ] [ drop ] recover
+    [ exam drop-table ] ignore-errors
     [ ] [ exam create-table ] unit-test
 
     [ ] [ T{ exam f f "Kyle" 100 } insert-tuple ] unit-test

basis/io/files/unique/unique-tests.factor

@@ -16,7 +16,7 @@ IN: io.files.unique.tests
 { t } [
     [
         current-directory get
-        [ [ "FAILDOG" throw ] cleanup-unique-directory ] [ drop ] recover
+        [ [ "FAILDOG" throw ] cleanup-unique-directory ] ignore-errors
         current-directory get =
     ] with-temp-directory
 ] unit-test

basis/io/sockets/secure/openssl/openssl-tests.factor

@@ -26,5 +26,5 @@ TUPLE: fake-fd fd ;
 M: fake-fd cancel-operation ( obj -- ) drop ;
 
 { f } [
-    33 fake-fd boa <ssl-handle> [ maybe-handshake ] [ drop ] recover connected>>
+    33 fake-fd boa <ssl-handle> [ maybe-handshake ] ignore-errors connected>>
 ] unit-test

extra/classes/tuple/change-tracking/change-tracking-tests.factor

@@ -7,4 +7,4 @@ TUPLE: resource < change-tracking-tuple
 : <resource> ( pathname -- resource ) f swap resource boa ;
 
 { t } [ "foo" <resource> "bar" >>pathname changed?>> ] unit-test
-{ f } [ "foo" <resource> [ 123 >>pathname ] [ drop ] recover changed?>> ] unit-test
+{ f } [ "foo" <resource> [ 123 >>pathname ] ignore-errors changed?>> ] unit-test

extra/fuel/eval/eval.factor

@@ -63,7 +63,7 @@ t eval-res-flag set-global
     [ [ eval-error set-global ] [ print-error ] bi ] recover ;
 
 : eval-usings ( usings -- )
-    [ [ use-vocab ] curry [ drop ] recover ] each ;
+    [ [ use-vocab ] curry ignore-errors ] each ;
 
 : eval-in ( in -- )
     [ set-current-vocab ] when* ;