remove extra using
parent
a81aaa6100
commit
9b5351e81f
|
@ -7,7 +7,6 @@ continuations db.sqlite.lib db.sqlite.ffi db.tuples
|
||||||
words combinators.lib db.types combinators math.intervals
|
words combinators.lib db.types combinators math.intervals
|
||||||
io namespaces.lib accessors vectors math.ranges random
|
io namespaces.lib accessors vectors math.ranges random
|
||||||
math.bitfields.lib ;
|
math.bitfields.lib ;
|
||||||
USE: tools.walker
|
|
||||||
IN: db.sqlite
|
IN: db.sqlite
|
||||||
|
|
||||||
TUPLE: sqlite-db < db path ;
|
TUPLE: sqlite-db < db path ;
|
||||||
|
@ -134,7 +133,6 @@ M: sqlite-db <insert-native-statement> ( tuple -- statement )
|
||||||
") values(" 0%
|
") values(" 0%
|
||||||
[ ", " 0% ] [
|
[ ", " 0% ] [
|
||||||
dup type>> +random-id+ = [
|
dup type>> +random-id+ = [
|
||||||
break
|
|
||||||
dup modifiers>> find-random-generator
|
dup modifiers>> find-random-generator
|
||||||
[
|
[
|
||||||
[
|
[
|
||||||
|
|
Loading…
Reference in New Issue