(defprotocol IO
  (get-pos [key])
  (set-pos [key pos])
  )

(defrecord CrawlerIO [crawler_name])

(extend-type CrawlerIO
  IO
  (get-pos [key] (info "."))
  (set-pos [key pos] (info "..."))
  )