Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

[factor.git] / basis / db / queries / queries.factor

diff --git a/basis/db/queries/queries.factor b/basis/db/queries/queries.factor
index c4aa47d383b3a1281ff091887449bb6e6ad39be6..e9aa01feb4bb9568486c4a9b37268c247664311d 100755 (executable)
--- a/basis/db/queries/queries.factor
+++ b/basis/db/queries/queries.factor
@@ -75,7 +75,7 @@ M: db-connection <update-tuple-statement> ( class -- statement )
 M: random-id-generator eval-generator ( singleton -- obj )
     drop
     system-random-generator get [
-        63 [ random-bits ] keep 1- set-bit
+        63 [ random-bits ] keep 1 - set-bit
     ] with-random ;
 
 : interval-comparison ( ? str -- str )