fix bitrot in sqlite library
parent
01b0cae9a5
commit
19bc49ece3
|
@ -35,6 +35,7 @@ USE: compiler
|
|||
USE: errors
|
||||
USE: strings
|
||||
USE: namespaces
|
||||
USE: sequences
|
||||
|
||||
BEGIN-STRUCT: sqlite3
|
||||
END-STRUCT
|
||||
|
@ -172,7 +173,7 @@ END-STRUCT
|
|||
#! Prepare a SQL statement. Returns the statement which
|
||||
#! can have values bound to parameters or simply executed.
|
||||
#! TODO: Support multiple statements in the SQL string.
|
||||
dup string-length <sqlite3-stmt-indirect> dup >r
|
||||
dup length <sqlite3-stmt-indirect> dup >r
|
||||
<char*-indirect> sqlite3_prepare sqlite-check-result
|
||||
r> sqlite3-stmt-indirect-pointer ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue