                            (instance? Integer x)
                            (instance? Float   x)))
 
-(defn- clj-val->db-val
-  "Returns an AttributeValue object for given Clojure value."
+(defn- clj-val->db-val "Returns an AttributeValue object for given Clojure value."
   ^AttributeValue [x]
   (cond
    (string? x)

(defn- str->num [^String s] (if (.contains s ".") (Double. s) (Long. s)))
(defn- bb->ba   [^ByteBuffer bb] (.array bb))

(defn- db-val->clj-val
  "Returns the Clojure value of given AttributeValue object."
  [^AttributeValue x]
  (or (.getS x)
      (some->> (.getN  x) str->num)

             ProvisionedThroughput
             ProvisionedThroughputDescription
             PutItemRequest
             PutItemResult ;;+
             PutRequest
             QueryRequest
             QueryResult ;;++
             ResourceNotFoundException
             ScanRequest
             ScanResult
             UpdateItemRequest ;;+
             UpdateTableRequest ;;+
             WriteRequest]
            com.amazonaws.ClientConfiguration
            com.amazonaws.auth.BasicAWSCredentials
