fix semantic-db
parent
3e3397ccb9
commit
f7bb19724d
|
@ -76,7 +76,7 @@ arc "arc"
|
||||||
create-node-table create-arc-table create-bootstrap-nodes create-bootstrap-arcs ;
|
create-node-table create-arc-table create-bootstrap-nodes create-bootstrap-arcs ;
|
||||||
|
|
||||||
: param ( value key type -- param )
|
: param ( value key type -- param )
|
||||||
swapd 3array ;
|
swapd <sqlite-low-level-binding> ;
|
||||||
|
|
||||||
: single-int-results ( bindings sql -- array )
|
: single-int-results ( bindings sql -- array )
|
||||||
f f <simple-statement> [ do-bound-query ] with-disposal
|
f f <simple-statement> [ do-bound-query ] with-disposal
|
||||||
|
|
Loading…
Reference in New Issue