Flexible Lisp Blogware. Fork for personal use. Mirrored from https://github.com/kingcons/coleslaw originally.

storage.lisp 673B

1234567891011121314151617181920
  1. (in-package :coleslaw)
  2. (defparameter *storage* nil
  3. "A db-spec for postmodern or a hash-table cache of metadata.
  4. It is expected that *storage* has methods for each Generic Function
  5. in coleslaw-core implemented.")
  6. (defgeneric find-by-id (id)
  7. (:documentation "Retrieve a POST object from *storage* matching ID."))
  8. (defgeneric find-by-tag (tag)
  9. (:documentation "Retrieve all POST objects from *storage* tagged with TAG."))
  10. (defgeneric find-by-date (date)
  11. (:documentation "Retrieve all POST objects from *storage* matching DATE."))
  12. (defgeneric find-by-range (start end)
  13. (:documentation "Retrieve all POST objects from *storage* with ids between
  14. START and END."))