anchor.diff:  (define-command set (key :key) (value :bulk) "Set a key to a string value.")
   (define-command get (key :key) "Return the string value of the key.")
   (define-command getset (key :key) (value :bulk) "Set a key to a string returning the old value of the key.")
  -(define-command mget (keys :keys) "Multi-get, return the string values of the keys.")
  +(define-command mget (list keys :key) "Multi-get, return the string values of the keys.")
   (define-command setnx :boolean (key :key) (value :bulk) "Set a key to a string value if the key does not exist.")
   (define-command setex (key :key) (time :integer) (value :bulk) "Set+Expire combo command")
  -;; TODO: mset
  -;; TODO: msetnx
  +(define-command mset (list keys/vals :key :bulk) "Set multiple keys to multiple values in a single atomic operation.")
  +(define-command msetnx (list keys/vals :key :bulk) "Set multiple keys to multiple values in a single atomic operation if none of the keys already exist.")
   (define-command incr (key :key) "Increment the integer value of key.")
   (define-command incrby (key :key) (integer :integer) "Increment the integer value of key by integer.")
   (define-command decr (key :key) "Decrement the integer value of key.")
  
positive.code: 
  (define-command hset (key :key) (field :string) (value :bulk) "Set the hash field to the specified value.  Creates the hash if needed.")
  (define-command hget (key :key) (field :bulk) "Retrieve the value of the specified hash field.")
  ;; TODO: hmset
  (define-command hincrby (key :key) (field :string) (integer :integer) "Increment the integer value of the hash at key on field with integer.")
  (define-command hexists :boolean (key :key) (field :bulk) "Test for existence of a specified field in a hash.")
  (define-command hdel (key :key) (field :bulk) "Remove the specified field from a hash.")
  
negative.code:    #:mget
     #:setnx
     #:setex
     #:mset
     #:msetnx
     #:incr
     #:incrby
     #:decr
  