(flet ((extract-row-data (row)
(declare (type sqlite:sqlite-row-pointer-type row))
(loop for i from 0 below n-col
collect (clsql-uffi:convert-raw-field
(sqlite:sqlite-raw-aref row i)
(flet ((extract-row-data (row)
(declare (type sqlite:sqlite-row-pointer-type row))
(loop for i from 0 below n-col
collect (clsql-uffi:convert-raw-field
(sqlite:sqlite-raw-aref row i)