diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm index 63c3525987890b8777771479f015b3e2d435c780..587dc2ddb50f53bd288fd7f8a1b5359faaffe58a 100644 --- a/src/cuirass/database.scm +++ b/src/cuirass/database.scm @@ -1290,7 +1290,6 @@ AND (:system IS NULL (stmt (sqlite-prepare db stmt-text #:cache? #t))) (apply sqlite-bind-arguments stmt (query->bind-arguments query)) - (sqlite-reset stmt) (let ((rows (sqlite-fold-right cons '() stmt))) (sqlite-reset stmt) (and=> (expect-one-row rows) vector->list))))) @@ -1311,7 +1310,6 @@ AND (:system IS NULL (stmt (sqlite-prepare db stmt-text #:cache? #t))) (apply sqlite-bind-arguments stmt (query->bind-arguments query)) - (sqlite-reset stmt) (let ((rows (sqlite-fold-right cons '() stmt))) (sqlite-reset stmt) (and=> (expect-one-row rows) vector->list)))))