fix sqlite -- wasn't settin gthe bound? flag
parent
ad2d06806b
commit
869cfd5463
|
@ -64,7 +64,8 @@ M: sqlite-statement bind-tuple ( tuple statement -- )
|
|||
[ sql-spec-type ] tri 3array
|
||||
] with map
|
||||
] keep
|
||||
[ set-statement-bind-params ] keep bind-statement* ;
|
||||
[ set-statement-bind-params ] keep
|
||||
t over set-statement-bound? bind-statement* ;
|
||||
|
||||
: last-insert-id ( -- id )
|
||||
db get db-handle sqlite3_last_insert_rowid
|
||||
|
|
|
@ -81,7 +81,7 @@ person "PERSON"
|
|||
1 "billy" 10 3.14 <assigned-person> the-person1 set
|
||||
2 "johnny" 10 3.14 <assigned-person> the-person2 set
|
||||
|
||||
test-sqlite
|
||||
! test-sqlite
|
||||
! test-postgresql
|
||||
|
||||
TUPLE: paste n summary author channel mode contents timestamp annotations ;
|
||||
|
|
Loading…
Reference in New Issue