(use-modules (db sqlite3))

(define db-path ":memory:")
(define db (sqlite3-open db-path))

(sqlite3-execute-sql db
    "create table tbl (x integer)")

(let loop ((i 0))
    (when (< i 10)
        (sqlite3-execute-sql db
            "insert into tbl (x) values (?)"
            (list i))
        (loop (1+ i))))

(for-each
    (lambda (row)
        (display row)
        (newline))
    (sqlite3-execute-sql db
        "select x from tbl where ?=? order by x"
        (list 1 1)))