query_' :: (P.FromRow r) => DBState -> P.Query -> IO [r]
query_' st q =
    P.query_ (db' st) q
query_' :: (P.FromRow r) => DBState -> P.Query -> IO [r]
query_' st q =
    P.query_ (db' st) q
query_' st q =
    P.query_ (db' st) q