redis.command-writer: adding SWAPDB command.

See: c7a4e694ad
2016-10-14 16:54:32 -07:00 · 2016-10-14 16:54:32 -07:00 · d8554ad24e
parent d59b2d2f3d
commit d8554ad24e
1 changed files with 1 additions and 0 deletions
--- a/extra/redis/command-writer/command-writer.factor
+++ b/extra/redis/command-writer/command-writer.factor
@ -106,6 +106,7 @@ PRIVATE>
 ! Multiple db
 : select ( integer -- ) 1array "SELECT" write-command ;
 : move ( integer key -- ) 2array "MOVE" write-command ;
+: swapdb ( old new -- ) 2array "SWAPDB" write-command ;
 : flushdb ( -- ) { "FLUSHDB" } write-resp ;
 : flushall ( -- ) { "FLUSHALL" } write-resp ;