anchor.diff:   
   (defgeneric to-json-internal (json-library object))
  -(defgeneric to-json-string-internal (json-library json))
   (defgeneric json-get-internal (json-library json key))
   
   (defclass json-library ()
  
positive.code:                 object)
      (apply #'st-json:jso (nreverse fields))))
  
  (defmethod to-json-string-internal ((json-library st-json) json)
    (st-json:write-json-to-string json))
  
  (defmethod json-get-internal ((json-library st-json) json key)
    (st-json:getjso key json))
  
  
negative.code:                 object)
      table))
  
  (defmethod json-get-internal ((json-library yason) json key)
    (gethash key json))
  
  