(defcomp
  (&key data)
  :affinity :server
  (let-match
    {:stats stats :desc desc :title title :filename filename :platform-interface platform-interface :sections sections}
    data
    (~docs/page
      :title (str title " — Explorer")
      (~specs-explorer/spec-explorer-header
        :filename filename
        :title title
        :desc desc
        :slug (replace filename ".sx" ""))
      (~specs-explorer/spec-explorer-stats :stats stats)
      (map
        (fn
          (section)
          (~specs-explorer/spec-explorer-section
            :section section
            :filename filename))
        sections)
      (when
        (not (empty? platform-interface))
        (~specs-explorer/spec-platform-interface :items platform-interface)))))