SQLite logging

This commit is contained in:
Emery Hemingway 2024-02-05 23:00:09 +01:00
parent 89f23f14f5
commit 25d1e40990
1 changed files with 2 additions and 0 deletions

View File

@ -81,6 +81,7 @@ proc extractTuple(stmt: Stmt; arity: cint): Value =
proc spawnSqliteActor*(turn: var Turn; root: Cap): Actor {.discardable.} =
spawn("sqlite-actor", turn) do (turn: var Turn):
during(turn, root, ?:SqliteArguments) do (path: string, ds: Cap):
stderr.writeLine("opening SQLite database ", path)
var db: Sqlite3
if open_v2(path, addr db, SQLITE_OPEN_READONLY, nil) != SQLITE_OK:
logError(db, path)
@ -104,6 +105,7 @@ proc spawnSqliteActor*(turn: var Turn; root: Cap): Actor {.discardable.} =
if finalize(stmt) != SQLITE_OK: logError(db, statement)
do:
close(db)
stderr.writeLine("closed SQLite database ", path)
when isMainModule:
runActor("main") do (turn: var Turn; root: Cap):