From 343856307e98cece7a8a4289d0185fb0345be8b8 Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Wed, 14 Apr 2010 21:58:52 -0700 Subject: [PATCH] db.sqlite.ffi: use FUNCTION-ALIAS: --- basis/db/sqlite/ffi/ffi.factor | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/basis/db/sqlite/ffi/ffi.factor b/basis/db/sqlite/ffi/ffi.factor index d9da317c89..c06581e1a2 100644 --- a/basis/db/sqlite/ffi/ffi.factor +++ b/basis/db/sqlite/ffi/ffi.factor @@ -119,9 +119,8 @@ FUNCTION: int sqlite3_bind_double ( sqlite3_stmt* pStmt, int index, double x ) ; FUNCTION: int sqlite3_bind_int ( sqlite3_stmt* pStmt, int index, int n ) ; FUNCTION: int sqlite3_bind_int64 ( sqlite3_stmt* pStmt, int index, sqlite3_int64 n ) ; ! Bind the same function as above, but for unsigned 64bit integers -: sqlite3-bind-uint64 ( pStmt index in64 -- int ) - int "sqlite" "sqlite3_bind_int64" - { pointer: sqlite3_stmt int sqlite3_uint64 } alien-invoke ; +FUNCTION-ALIAS: sqlite3-bind-uint64 ( pStmt index in64 -- int ) + int sqlite3_bind_int64 ( sqlite3_stmt* pStmt, int index, sqlite3_uint64 in64 ) ; FUNCTION: int sqlite3_bind_null ( sqlite3_stmt* pStmt, int n ) ; FUNCTION: int sqlite3_bind_text ( sqlite3_stmt* pStmt, int index, c-string text, int len, int destructor ) ; FUNCTION: int sqlite3_bind_parameter_index ( sqlite3_stmt* pStmt, c-string name ) ; @@ -133,9 +132,8 @@ FUNCTION: c-string sqlite3_column_decltype ( sqlite3_stmt* pStmt, int col ) ; FUNCTION: int sqlite3_column_int ( sqlite3_stmt* pStmt, int col ) ; FUNCTION: sqlite3_int64 sqlite3_column_int64 ( sqlite3_stmt* pStmt, int col ) ; ! Bind the same function as above, but for unsigned 64bit integers -: sqlite3-column-uint64 ( pStmt col -- uint64 ) - sqlite3_uint64 "sqlite" "sqlite3_column_int64" - { pointer: sqlite3_stmt int } alien-invoke ; +FUNCTION-ALIAS: sqlite3-column-uint64 ( pStmt col -- uint64 ) + sqlite3_uint64 sqlite3_column_int64 ( sqlite3_stmt* pStmt, int col ) ; FUNCTION: double sqlite3_column_double ( sqlite3_stmt* pStmt, int col ) ; FUNCTION: c-string sqlite3_column_name ( sqlite3_stmt* pStmt, int col ) ; FUNCTION: c-string sqlite3_column_text ( sqlite3_stmt* pStmt, int col ) ;