fix circular dependency

db4
Doug Coleman 2008-04-21 15:06:39 -05:00
parent 750e2c5655
commit 364b3a94c4
2 changed files with 2 additions and 2 deletions

View File

@ -6,7 +6,6 @@ math.bitfields.lib namespaces.lib db db.tuples db.types
math.intervals ;
IN: db.queries
GENERIC: eval-generator ( singleton -- obj )
GENERIC: where ( specs obj -- )
: maybe-make-retryable ( statement -- statement )

View File

@ -3,7 +3,7 @@
USING: arrays assocs classes db kernel namespaces
classes.tuple words sequences slots math accessors
math.parser io prettyprint db.types continuations
mirrors sequences.lib tools.walker combinators.lib db.queries ;
mirrors sequences.lib tools.walker combinators.lib ;
IN: db.tuples
: define-persistent ( class table columns -- )
@ -50,6 +50,7 @@ HOOK: <select-by-slots-statement> db ( tuple class -- tuple )
HOOK: insert-tuple* db ( tuple statement -- )
GENERIC: eval-generator ( singleton -- obj )
SINGLETON: retryable
: make-retryable ( obj -- obj' )