From: John Benediktsson <mrjbq7@gmail.com>
Date: Mon, 22 Mar 2021 03:57:05 +0000 (-0700)
Subject: db.sqlite.lib: stop using sequences.extras.
X-Git-Tag: 0.99~2396
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=cc635b8ec5572ee39487aeccedfe6198ac2cf94a

db.sqlite.lib: stop using sequences.extras.

Unfortunately, this temporarily results in slightly worse looking code.
---

diff --git a/basis/db/sqlite/lib/lib.factor b/basis/db/sqlite/lib/lib.factor
index 3c54990096..d324fee763 100644
--- a/basis/db/sqlite/lib/lib.factor
+++ b/basis/db/sqlite/lib/lib.factor
@@ -4,11 +4,13 @@ USING: accessors alien.c-types alien.data arrays calendar.format
 calendar.parser combinators db db.errors db.sqlite.errors
 db.sqlite.ffi db.types io.backend io.encodings.string
 io.encodings.utf8 kernel math namespaces present sequences
-sequences.extras serialize urls ;
+serialize urls ;
 IN: db.sqlite.lib
 
 : sqlite-compile-options ( -- seq )
-    [ sqlite3_compileoption_get ] zero-loop>array ;
+    0 [
+        [ 1 + ] [ sqlite3_compileoption_get ] bi dup
+    ] [ ] produce 2nip ;
 
 ERROR: sqlite-error < db-error n string ;