redis.command-writer: adding SWAPDB command.

See: https://github.com/antirez/redis/commit/c7a4e694ad3689d934897b0d2c37144d7b2d0b97

diff --git a/extra/redis/command-writer/command-writer.factor b/extra/redis/command-writer/command-writer.factor
index f407a125061584076a395509f941e161a035c012..1e9c643ccd2491bae3cfa9f433cb1047fb215630 100644 (file)
--- 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 ;