]> gitweb.factorcode.org Git - factor.git/commitdiff
db.sqlite.lib: stop using sequences.extras.
authorJohn Benediktsson <mrjbq7@gmail.com>
Mon, 22 Mar 2021 03:57:05 +0000 (20:57 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Mon, 22 Mar 2021 03:57:05 +0000 (20:57 -0700)
Unfortunately, this temporarily results in slightly worse looking code.

basis/db/sqlite/lib/lib.factor

index 3c54990096b8fa7522b0ec0928be84f2e307f859..d324fee7630daff878675601d1fd8e4cfbd24de7 100644 (file)
@@ -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 ;