From 853d470179ef51bd3077ade778b93735416edfd0 Mon Sep 17 00:00:00 2001 From: Alexander Iljin Date: Tue, 28 Jun 2016 09:13:16 +0300 Subject: [PATCH] db.errors: update ignore-error parameter list to be more self-documented --- basis/db/errors/errors.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/db/errors/errors.factor b/basis/db/errors/errors.factor index dab0a69330..e35eab1c21 100644 --- a/basis/db/errors/errors.factor +++ b/basis/db/errors/errors.factor @@ -48,7 +48,7 @@ TUPLE: sql-index-exists < sql-error name ; : ( name -- error ) f swap sql-index-exists boa ; -: ignore-error ( quot word -- ) +: ignore-error ( quot check: ( error -- ? ) -- ) '[ dup @ [ drop ] [ rethrow ] if ] recover ; inline : ignore-table-exists ( quot -- )