Ticket #851: sqlite3.patch
File sqlite3.patch, 450 bytes (added by , 11 years ago) |
---|
-
tests/run.scm
57 57 (with-database [db ":memory:"] 58 58 (let-values ([(stmt tail) (prepare db "SELECT 42; -- tail")]) 59 59 (dynamic-wind 60 noop60 void 61 61 (lambda () 62 62 (let* ([s0 (step! stmt)] 63 63 [s1 (step! stmt)])